Symbol Description Uses
VDPSIM 19



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1587 TRBFLX
      _RL VDZ0(irun),VDPSIM(irun)
./pkg/fizhi/fizhi_turb.F 2024 TRBFLX
     4   VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM,
./pkg/fizhi/fizhi_turb.F 2775 SFCFLX
     7      VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM,
./pkg/fizhi/fizhi_turb.F 2840 SFCFLX
      _RL VTEMP(irun),VDZETA(irun),VDZ0(irun),VDPSIM(irun)
./pkg/fizhi/fizhi_turb.F 2935 SFCFLX
     5  VDZ0,VDPSIM,VDPSIH,
./pkg/fizhi/fizhi_turb.F 2942 SFCFLX
         VCU(I) = VCU(I) * (1. - VDPSIM(I)*VAPSIM(I))
./pkg/fizhi/fizhi_turb.F 3007 SFCFLX
     5  VDZ0,VDPSIM,VDPSIH,
./pkg/fizhi/fizhi_turb.F 3067 SFCFLX
     5  VDZ0,VDPSIM,VDPSIH,
./pkg/fizhi/fizhi_turb.F 3100 SFCFLX
         VPSIM(I) = VPSIM(I) + VDPSIM(I)
./pkg/fizhi/fizhi_turb.F 4650 LINADJ
     2 VDZETA,VDZ0,VDPSIM,VDPSIH,INTRIB,
./pkg/fizhi/fizhi_turb.F 4704 LINADJ
      _RL VDZETA(IRUN),VDZ0(IRUN),VDPSIM(IRUN)
./pkg/fizhi/fizhi_turb.F 4909 LINADJ
         VDPSIM(I) = - VDZ0(I) * VAZ0(I)
./pkg/fizhi/fizhi_turb.F 4910 LINADJ
         VDPSIH(I) = VDPSIM(I)
./pkg/fizhi/fizhi_turb.F 4917 LINADJ
        VDPSIM(I) = VDX(I) * VDZETA(I)
./pkg/fizhi/fizhi_turb.F 4921 LINADJ
          VDPSIM(I) = VDPSIM(I) - VX0(I) * VDZ0(I)
./pkg/fizhi/fizhi_turb.F 4932 LINADJ
        VDPSIMC(I) = -0.9 - VDPSIM(I) * VAPSIM(I)
./pkg/fizhi/fizhi_turb.F 4954 LINADJ
         VDPSIM(I) = VDPSIM(I) + VDX(I) * VR1MG0(I) * VDZETA1(I)