Symbol Description Uses
VDPSIHC 24



File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1578 TRBFLX
      _RL VDPSIMC(irun),VDPSIHC(irun)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1903 TRBFLX
     3   VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2393 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2463 SFCFLX
      _RL VDPSIMC(irun),VDPSIHC(irun)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2552 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2624 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2684 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4112 LINADJ
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4172 LINADJ
      _RL VDPSIMC(irun),VDPSIHC(irun)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4392 LINADJ
        VDPSIHC(I) = -0.9 *  VPSIH(I) - VDPSIH(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4398 LINADJ
        IF ( VDPSIHC(I).GT.0.  ) THEN
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4408 LINADJ
             VDZETA2(I) =  VDPSIHC(I) / VTEMPLIN(I)
./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 2354 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./pkg/fizhi/fizhi_turb.F 2424 SFCFLX
      _RL VDPSIMC(irun),VDPSIHC(irun)
./pkg/fizhi/fizhi_turb.F 2513 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./pkg/fizhi/fizhi_turb.F 2585 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./pkg/fizhi/fizhi_turb.F 2645 SFCFLX
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./pkg/fizhi/fizhi_turb.F 4073 LINADJ
     5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC)
./pkg/fizhi/fizhi_turb.F 4133 LINADJ
      _RL VDPSIMC(irun),VDPSIHC(irun)
./pkg/fizhi/fizhi_turb.F 4353 LINADJ
        VDPSIHC(I) = -0.9 *  VPSIH(I) - VDPSIH(I)
./pkg/fizhi/fizhi_turb.F 4359 LINADJ
        IF ( VDPSIHC(I).GT.0.  ) THEN
./pkg/fizhi/fizhi_turb.F 4369 LINADJ
             VDZETA2(I) =  VDPSIHC(I) / VTEMPLIN(I)