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/ ...