1 %  DECLARE
2+ ,
2 %identifier description
3 ;
4 %identifier description:
5 identifier
5.1? (-| dimension | )
5 (
5.1+ ,
5.1 identifier
5.1.1? (-| dimension | )
5.1.2 )
6? %attributes

dimension:

1+ ,
1.0? lbound :
1.1 hbound
1+ ,
1 *

attributes:

1! CHARACTER
1?
1 FIXED
2? 
2 EXTERNAL
2! INTERNAL
3? 
3 NOSCAN
3 SCAN
3! RESCAN