Symbol Description Uses
INT4 4



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 4433 ZCSUB
      integer INT2(IRUN),INT3(IRUN),INT4(IRUN)
./pkg/fizhi/fizhi_turb.F 4466 ZCSUB
        INT4(I) = 1
./pkg/fizhi/fizhi_turb.F 4468 ZCSUB
        INT4(I) = 0
./pkg/fizhi/fizhi_turb.F 4491 ZCSUB
        IF( INT4(I).EQ.1 )  AA(I,K) = AA4(K)