Symbol Description Uses
IFLAG 24


File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 3158 PSI 
      CALL PHI( Z,X1,Y1,IFLAG,IBIT )
./pkg/fizhi/fizhi_turb.F 3159 PSI 
      CALL PHI( Z0,X0,Y0,IFLAG,IBIT )
./pkg/fizhi/fizhi_turb.F 3165 PSI 
      IF(IFLAG.GE.3) GO TO 75
./pkg/fizhi/fizhi_turb.F 3201 PSI 
      IF(IFLAG.EQ.2) GO TO 100
./pkg/fizhi/fizhi_turb.F 3307 PSI 
      IF( IFLAG.GE.3 ) GO TO 225
./pkg/fizhi/fizhi_turb.F 3329 PSI 
       IF(IFLAG.EQ.2)GO TO 300