1 dcl       type(24:28) fixed bin(15) int static init
2           (         42,       /* character */
3                     18,       /* real fixed dec */
4                     22,       /* cplx fixed dec */
5                     20,       /* real float dec */
6                     24);      /* cplx float dec */