Symbol Description Uses
AITR 8



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1617 TRBFLX
      AITR   = 1. / FLOAT(ITRTRB)
./pkg/fizhi/fizhi_turb.F 2698 TRBFLX
        EU(I,L) = EU(I,L) + AITR*KM(I,L)
./pkg/fizhi/fizhi_turb.F 2699 TRBFLX
        ET(I,L) = ET(I,L) + AITR*KH(I,L)
./pkg/fizhi/fizhi_turb.F 2703 TRBFLX
      scu(I) = scu(I) + AITR*cu(I)
./pkg/fizhi/fizhi_turb.F 2706 TRBFLX
      sct(I) = sct(I) + AITR*ct(I)
./pkg/fizhi/fizhi_turb.F 2714 TRBFLX
         XLDIAG(I,L) = XLDIAG(I,L) + AITR*XL(I,L)
./pkg/fizhi/fizhi_turb.F 2761 TRBFLX
        WU(I,L) =  WU(I,L) * AITR
./pkg/fizhi/fizhi_turb.F 2762 TRBFLX
        WV(I,L) =  WV(I,L) * AITR