  CONST
    rmc$highest_unit_type = rmc$cartridge;

*copyc rmt$tape_unit_types
