
FTNCHEK Version 3.3 November 2004

File pure-function.f:

      1       real function notpure(a,b,c)
      2       real a,b,c
      3       common /shared/ x,y,z
      4       b = a + c
      5       z = x + y
      6       notpure = a*x + b*y + c*z
      7       end
      8 
      9       

Module NOTPURE: func: real

Common blocks referenced:

    SHARED         


Warning in module NOTPURE at line 4: Function modifies argument B

Warning in module NOTPURE at line 5: Function modifies common variable Z
Variables:
 
      Name Type Dims     Name Type Dims     Name Type Dims     Name Type Dims
         A real             B real             C real       NOTPURE real   
         X real*            Y real*            Z real*  

* Variable not declared. Type has been implicitly defined.



Warning in module NOTPURE: Names longer than 6 chars (nonstandard):
    NOTPURE declared at line 1

 0 syntax errors detected in file pure-function.f
 4 warnings issued in file pure-function.f

No main program found
Warning: Common block SHARED Elements used but never set:
    X Y
