Symbol Description Uses
INT3 7



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 4433 ZCSUB
      integer INT2(IRUN),INT3(IRUN),INT4(IRUN)
./pkg/fizhi/fizhi_turb.F 4451 ZCSUB
        INT3(I) = 1
./pkg/fizhi/fizhi_turb.F 4453 ZCSUB
        INT3(I) = 0
./pkg/fizhi/fizhi_turb.F 4457 ZCSUB
       IF(INT3(I).EQ.1) VUSTAR(I) = 1.e-6
./pkg/fizhi/fizhi_turb.F 4473 ZCSUB
        INT3(I) = 1
./pkg/fizhi/fizhi_turb.F 4475 ZCSUB
        INT3(I) = 0
./pkg/fizhi/fizhi_turb.F 4490 ZCSUB
        IF( INT3(I).EQ.1 )  AA(I,K) = AA3(K)