Symbol Description Uses
IBIT1 5



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 2949 PHI
      IBIT1 = 0
./pkg/fizhi/fizhi_turb.F 2953 PHI
       IF(Z(I).GE.0.15)IBIT1 = IBIT1 + 1
./pkg/fizhi/fizhi_turb.F 2957 PHI
      IF( IBIT1 .LE. 0 ) GO TO 200
./pkg/fizhi/fizhi_turb.F 3005 PHI
      IF( IBIT1 .GE. N ) GO TO 500