Symbol Description Uses
ZKH 32



File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3739 TRBL20
      SUBROUTINE TRBL20 (RI,STRT,DW2,XL,ZKM,ZKH,QE,QQE,INTSTB,NLEV,
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3770 TRBL20
      _RL XL(irun,NLEV),ZKM(irun,NLEV),ZKH(irun,NLEV)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3821 TRBL20
      ZKH(I,1) =   ( RFC-RF(I,1) ) / (1.-RF(I,1))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3823 TRBL20
      ZKM(I,1) = ZKH(I,1)*ZKM(I,1) / (RF2-RF(I,1))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3824 TRBL20
      ZKH(I,1) = CH      *ZKH(I,1)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3825 TRBL20
       QE(I,1) = ZKM(I,1)*DW2(I,1) - ZKH(I,1)*STRT(I,1)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3842 TRBL25
      SUBROUTINE TRBL25(Q,XL,STRT,DW2,INTSTB,INTQ,ZKM,ZKH,P3,NLEV,
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3875 TRBL25
      _RL ZKM(irun,NLEV),ZKH(irun,NLEV),P3(irun,NLEV)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3914 TRBL25
       ZKH(I,1) = (F4(I,1) *     F2(I,1))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3916 TRBL25
       ZKH(I,1) = (F2(I,1) + A3*DW2(I,1))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3917 TRBL25
     .          / ZKH(I,1)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3918 TRBL25
       ZKM(I,1) = A1 * (F3(I,1)*ZKH(I,1)+A5)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3920 TRBL25
       ZKH(I,1) = A2 * ZKH(I,1)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3921 TRBL25
        P3(I,1) = ZKH(I,1)*STRT(I,1) + B3
./pkg/fizhi/fizhi_turb.F 3700 TRBL20
      SUBROUTINE TRBL20 (RI,STRT,DW2,XL,ZKM,ZKH,QE,QQE,INTSTB,NLEV,
./pkg/fizhi/fizhi_turb.F 3731 TRBL20
      _RL XL(irun,NLEV),ZKM(irun,NLEV),ZKH(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 3782 TRBL20
      ZKH(I,1) =   ( RFC-RF(I,1) ) / (1.-RF(I,1))
./pkg/fizhi/fizhi_turb.F 3784 TRBL20
      ZKM(I,1) = ZKH(I,1)*ZKM(I,1) / (RF2-RF(I,1))
./pkg/fizhi/fizhi_turb.F 3785 TRBL20
      ZKH(I,1) = CH      *ZKH(I,1)
./pkg/fizhi/fizhi_turb.F 3786 TRBL20
       QE(I,1) = ZKM(I,1)*DW2(I,1) - ZKH(I,1)*STRT(I,1)
./pkg/fizhi/fizhi_turb.F 3803 TRBL25
      SUBROUTINE TRBL25(Q,XL,STRT,DW2,INTSTB,INTQ,ZKM,ZKH,P3,NLEV,
./pkg/fizhi/fizhi_turb.F 3836 TRBL25
      _RL ZKM(irun,NLEV),ZKH(irun,NLEV),P3(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 3875 TRBL25
       ZKH(I,1) = (F4(I,1) *     F2(I,1))
./pkg/fizhi/fizhi_turb.F 3877 TRBL25
       ZKH(I,1) = (F2(I,1) + A3*DW2(I,1))
./pkg/fizhi/fizhi_turb.F 3878 TRBL25
     .          / ZKH(I,1)
./pkg/fizhi/fizhi_turb.F 3879 TRBL25
       ZKM(I,1) = A1 * (F3(I,1)*ZKH(I,1)+A5)
./pkg/fizhi/fizhi_turb.F 3881 TRBL25
       ZKH(I,1) = A2 * ZKH(I,1)
./pkg/fizhi/fizhi_turb.F 3882 TRBL25
        P3(I,1) = ZKH(I,1)*STRT(I,1) + B3