Examples

Example 1: A DO WHILE without a statement number:

       INTEGER A(4,4), C, R 
       ... 
       C = 4 
       R = 1 
       DO WHILE ( C .GT. R ) 
              A(C,R) = 1 
              C = C - 1 
       END DO 

Example 2: A DO WHILE with a statement number:

       INTEGER A(4,4), C, R 
       ... 
       DO 10 WHILE ( C .NE. R ) 
              A(C,R) = A(C,R) + 1 
       C = C+1 
10     CONTINUE