FORTRAN 77 Language Reference

Example

Example: MAP:


       STRUCTURE /STUDENT/ 
       CHARACTER*32  NAME 
              INTEGER*2  CLASS 
              UNION 
                     MAP 
                            CHARACTER*16 MAJOR 
                     END MAP 
                     MAP 
                            INTEGER*2  CREDITS 
                            CHARACTER*8  GRAD_DATE 
                     END MAP 
              END UNION 
       END STRUCTURE