Code: Select all
TYPE data_type POSSREP { value CHAR };
Code: Select all
TYPE Ntest2 IS { INTEGER CONSTRAINT INTEGER < 10 };
Code: Select all
TYPE data_type UNION;
Code: Select all
TYPE data_type UNION POSSREP { domain ID, name ID, T ID };
Code: Select all
TYPE art IS { data_type POSSREP { T ID CONSTRAINT THE_VALUE ( T ) = "art" } };
Code: Select all
TYPE two IS { data_type POSSREP { T ID } };
Code: Select all
TYPE arbitrary_defn IS { data_type POSSREP {
domain ID, name ID, T ID CONSTRAINT THE_T ( T ) = ID ( "arbitrary_defn" ) } };
TYPE boolean_defn IS { data_type POSSREP {
domain ID, name ID, T ID CONSTRAINT THE_T ( T ) = ID ( "boolean_defn" ) } };