Symbol Description Uses
AITR 8



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1447 TRBFLX
      AITR   = 1. / FLOAT(ITRTRB)
./pkg/fizhi/fizhi_turb.F 2262 TRBFLX
        EU(I,L) = EU(I,L) + AITR*KM(I,L)
./pkg/fizhi/fizhi_turb.F 2263 TRBFLX
        ET(I,L) = ET(I,L) + AITR*KH(I,L)
./pkg/fizhi/fizhi_turb.F 2267 TRBFLX
      scu(I) = scu(I) + AITR*cu(I)
./pkg/fizhi/fizhi_turb.F 2270 TRBFLX
      sct(I) = sct(I) + AITR*ct(I)
./pkg/fizhi/fizhi_turb.F 2275 TRBFLX
         XLDIAG(I,L) = XLDIAG(I,L) + AITR*XL(I,L)
./pkg/fizhi/fizhi_turb.F 2309 TRBFLX
        WU(I,L) =  WU(I,L) * AITR
./pkg/fizhi/fizhi_turb.F 2310 TRBFLX
        WV(I,L) =  WV(I,L) * AITR