?? RIGHT := 110 ??

  CONST
    ioc$request_heap_count = 2047,
    ioc$command_heap_count = 31999,
    ioc$command_group = 1,
    ioc$command_map_count = (ioc$command_heap_count DIV ioc$command_group);

  TYPE
    iot$request_heap_map = packed array [0 .. ioc$request_heap_count] of boolean,
    iot$request_heap = array [0 .. ioc$request_heap_count] of iot$io_disk_request,
    iot$command_heap_map = packed array [0 .. ioc$command_map_count] of boolean,
    iot$command_heap = array [0 .. ioc$command_heap_count] of mmt$rma_list_entry;

*copyc iot$io_disk_request
*copyc mmt$rma_list
