1 dcl (     real_fixed_bin_1_type         init(1),
 2           real_fixed_bin_2_type         init(2),
 3           real_float_bin_1_type         init(3),
 4           real_float_bin_2_type         init(4),
 5           complex_fixed_bin_1_type      init(5),
 6           complex_fixed_bin_2_type      init(6),
 7           complex_float_bin_1_type      init(7),
 8           complex_float_bin_2_type      init(8),
 9           real_fixed_dec_type           init(9),
10           real_float_dec_type           init(10),
11           complex_fixed_dec_type        init(11),
12           complex_float_dec_type        init(12),
13           pointer_type                  init(13),
14           offset_type                   init(14),
15           label_type                    init(15),
16           entry_type                    init(16),
17           structure_type                init(17),
18           area_type                     init(18),
19           bit_type                      init(19),
20           varying_bit_type              init(20),
21           char_type                     init(21),
22           varying_char_type             init(22),
23           file_type                     init(23)) fixed bin int static;