1 DEFINE ORDINAL  ordinal-type-name (
2 %ordinal-value-list
3 )
4? PRECISION  (integer)
5? 
5 SIGNED
5 UNSIGNED
6 ;
7 %ordinal-value-list:
8+ ,
8 member
8.1? VALUE(integer)