! RECORD Templates.
  RECORD Test
      INTEGER Test_integers(2) ! 3-element array of integers.
      GROUP Group_1 ! Single GROUP containing:
        REAL My_number ! a real number and
        STRING Group_1_string ! a 16-character (default) string
      END GROUP
      GROUP Group_2(5) ! A 6-element GROUP, each element containing:
        INTEGER My_number ! an integer and
        DECIMAL Group_2_decimal ! a DECIMAL number.
      END GROUP
  END RECORD
  ! Declarations
  DECLARE Test Array_of_test(10) ! Create an 11-element array of type Test...
  DECLARE Test Single_test ! ...and a separate single instance of type
                                                  ! Test.