
*copyc tut$flag_ordinals

  TYPE
    tut$flags = packed array [tut$flag_ordinals] of boolean;

