Symbol | Description | Uses |
IBIT1 | 10 |
File | Line number | Procedure | Code |
./pkg/fizhi/fizhi_turb.F | 2975 | PHI |
IBIT1 = 0 |
./pkg/fizhi/fizhi_turb.F | 2979 | PHI |
IF(Z(I).GE.0.15)IBIT1 = IBIT1 + 1 |
./pkg/fizhi/fizhi_turb.F | 2983 | PHI |
IF( IBIT1 .LE. 0 ) GO TO 200 |
./pkg/fizhi/fizhi_turb.F | 3031 | PHI |
IF( IBIT1 .GE. N ) GO TO 500 |