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 |