
  TYPE
    stt$set_ordinal = record
      case entry_type: stt$entry_type of
      = stc$unused =
        ,
      = stc$valid =
        unique_set_name: stt$unique_set_name,
      casend,
    recend;

*copyc stt$entry_type
*copyc stt$unique_set_name
