
  CONST
    bac$maximum_block = 16777216 {2**24 bytes} ;

  TYPE
    bat$v1_max_block_length = 1 .. bac$maximum_block - 1;

