
  TYPE
    jmt$defined_classes = array [1 .. * ] of jmt$defined_class;

  TYPE
    jmt$defined_class = record
      name: ost$name,
      index: ost$non_negative_integers,
    recend;

*copyc osd$integer_limits
*copyc ost$name
