FORCHECK PC V11.10  MS5 compiler emulation  20-Jan-94  11:49:37  page: 1 
 ASSIGN.FOR  /RI


      1 c
      2 c                       FORCHECK
      3 c               Detect unassigned items
      4 
      5         DO i = 1, 10
      6 
      7           k = k + 1
      8 
   K                               
 **[115 E] no value assigned to this item
      9           IF (k .EQ. 1) THEN
     10             PRINT *, l
   L                               
 **[359 I] possibly no value assigned to this item
     11           ELSE
     12             READ *, l
     13           ENDIF
     14 
     15         ENDDO
     16 
     17         END

 

 FORCHECK PC V11.10          .MAIN.          20-Jan-94  11:49:37  page: 2 
 ASSIGN.FOR  /RI


 ENTRY          TYPE NARG  LINE

    .MAIN.         P


 VARIABLE  TYPE     RANK  OPERATIONS  LINES

    I       I*4                  L     5#
    K       I*4                A   R   7#  9
    L       I*4                 I   O 10  12#

 FORCHECK PC V11.10  MS5 compiler emulation  20-Jan-94  11:49:37  page: 3 


 *END OF ANALYSIS*

 messages presented:
    1x[115 E] no value assigned to this item
    1x[359 I] possibly no value assigned to this item

 number of error messages:                1
 number of informative messages:          1

                                      total  not-included
 number of noncomment source lines:       9             9
 number of nonempty comment lines:        2             2
 number of statements:                    9             9
 number of subprograms:                   1
 number of source files:                  1