
  VAR
    bav$max_indirect_tape_block: [XREF] integer;
