Symbol Description Uses
VDPSIMC 24



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1538 TRBFLX
      _RL VDPSIMC(irun),VDPSIHC(irun)
./pkg/fizhi/fizhi_turb.F 1863 TRBFLX
     3   VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./pkg/fizhi/fizhi_turb.F 2372 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./pkg/fizhi/fizhi_turb.F 2442 SFCFLX
      _RL VDPSIMC(irun),VDPSIHC(irun)
./pkg/fizhi/fizhi_turb.F 2531 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./pkg/fizhi/fizhi_turb.F 2603 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./pkg/fizhi/fizhi_turb.F 2663 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./pkg/fizhi/fizhi_turb.F 4091 LINADJ
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./pkg/fizhi/fizhi_turb.F 4151 LINADJ
      _RL VDPSIMC(irun),VDPSIHC(irun)
./pkg/fizhi/fizhi_turb.F 4370 LINADJ
        VDPSIMC(I) = -0.9 - VDPSIM(I) * VAPSIM(I)
./pkg/fizhi/fizhi_turb.F 4372 LINADJ
        IF ( VDPSIMC(I).GT.0.  ) THEN
./pkg/fizhi/fizhi_turb.F 4383 LINADJ
        IF(VINT1(I).EQ.1) VDZETA1(I) = VDPSIMC(I) / VDXPSIM(I)
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 1538 TRBFLX
      _RL VDPSIMC(irun),VDPSIHC(irun)
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 1863 TRBFLX
     3   VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 2354 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 2424 SFCFLX
      _RL VDPSIMC(irun),VDPSIHC(irun)
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 2513 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 2585 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 2645 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 4073 LINADJ
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 4133 LINADJ
      _RL VDPSIMC(irun),VDPSIHC(irun)
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 4352 LINADJ
        VDPSIMC(I) = -0.9 - VDPSIM(I) * VAPSIM(I)
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 4354 LINADJ
        IF ( VDPSIMC(I).GT.0.  ) THEN
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 4365 LINADJ
        IF(VINT1(I).EQ.1) VDZETA1(I) = VDPSIMC(I) / VDXPSIM(I)