FORTRAN 77 Language Reference

Examples

Example 1: Character, integer, and real scalars. Real arrays:


       CHARACTER TTL*16 
       REAL VEC(5), PAIR(2) 
       DATA TTL /'Arbitrary Titles'/, 
&            M /9/, N /0/, 
&            PAIR(1) /9.0/, 
&            VEC /3*9.0, 0.1, 0.9/ 
       ... 

Example 2: Arrays--implied DO:


       REAL R(3,2), S(4,4) 
       DATA ( S(I,I), I=1,4)/4*1.0/, 
&           ( R(I,J), J=1,3), I=1,2)/6*1.0/ 
       ... 

Example 3: Mixing an integer and a character:


       CHARACTER CR*1 
       INTEGER I*2, N*4 
       DATA I /'00'/,N/4Hs12t/,CR/13/
       ...