File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1563 |
TRBFLX |
_RL VPSIM(irun),VAPSIM(irun) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1898 |
TRBFLX |
4 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2388 |
SFCFLX |
7 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2452 |
SFCFLX |
_RL VHZ(irun),VPSIM(irun),VAPSIM(irun),VPSIG(irun),VPSIHG(irun) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2526 |
SFCFLX |
VAPSIM(I) = 1. / VPSIM(I) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2527 |
SFCFLX |
VCU(I) = VK * VAPSIM(I) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2545 |
SFCFLX |
2 VAPSIM,VTEMP,VTEMP, |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2555 |
SFCFLX |
VCU(I) = VCU(I) * (1. - VDPSIM(I)*VAPSIM(I)) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2617 |
SFCFLX |
2 VAPSIM,VAPSIHG,VPSIH, |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2666 |
SFCFLX |
VAPSIM(I) = VCU(I) * RVK |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2668 |
SFCFLX |
VRIB1(I) = VAPSIM(I) * VAPSIM(I) * VPSIHG(I) * VZETA(I) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2677 |
SFCFLX |
2 VAPSIM,VAPSIHG,VPSIH, |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4108 |
LINADJ |
1 VAPSIM, VAPSIHG,VPSIH,VPSIG,VX,VX0,VY,VY0,ITYPE,LWATER,IRUN, |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4159 |
LINADJ |
_RL VAPSIM(IRUN),VAPSIHG(IRUN) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4198 |
LINADJ |
IF (IWATER(I).EQ.1) VX0PSIM(I) = VAPSIM(I) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4203 |
LINADJ |
VX0PSIM(I) = VX0(I) * VAPSIM(I) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4251 |
LINADJ |
VDXPSIM(I) = VDX(I) * VAPSIM(I) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4391 |
LINADJ |
VDPSIMC(I) = -0.9 - VDPSIM(I) * VAPSIM(I) |
./pkg/fizhi/fizhi_turb.F |
1523 |
TRBFLX |
_RL VPSIM(irun),VAPSIM(irun) |
./pkg/fizhi/fizhi_turb.F |
1858 |
TRBFLX |
4 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
./pkg/fizhi/fizhi_turb.F |
2349 |
SFCFLX |
7 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
./pkg/fizhi/fizhi_turb.F |
2413 |
SFCFLX |
_RL VHZ(irun),VPSIM(irun),VAPSIM(irun),VPSIG(irun),VPSIHG(irun) |
./pkg/fizhi/fizhi_turb.F |
2487 |
SFCFLX |
VAPSIM(I) = 1. / VPSIM(I) |
./pkg/fizhi/fizhi_turb.F |
2488 |
SFCFLX |
VCU(I) = VK * VAPSIM(I) |
./pkg/fizhi/fizhi_turb.F |
2506 |
SFCFLX |
2 VAPSIM,VTEMP,VTEMP, |
./pkg/fizhi/fizhi_turb.F |
2516 |
SFCFLX |
VCU(I) = VCU(I) * (1. - VDPSIM(I)*VAPSIM(I)) |
./pkg/fizhi/fizhi_turb.F |
2578 |
SFCFLX |
2 VAPSIM,VAPSIHG,VPSIH, |
./pkg/fizhi/fizhi_turb.F |
2627 |
SFCFLX |
VAPSIM(I) = VCU(I) * RVK |
./pkg/fizhi/fizhi_turb.F |
2629 |
SFCFLX |
VRIB1(I) = VAPSIM(I) * VAPSIM(I) * VPSIHG(I) * VZETA(I) |
./pkg/fizhi/fizhi_turb.F |
2638 |
SFCFLX |
2 VAPSIM,VAPSIHG,VPSIH, |
./pkg/fizhi/fizhi_turb.F |
4069 |
LINADJ |
1 VAPSIM, VAPSIHG,VPSIH,VPSIG,VX,VX0,VY,VY0,ITYPE,LWATER,IRUN, |
./pkg/fizhi/fizhi_turb.F |
4120 |
LINADJ |
_RL VAPSIM(IRUN),VAPSIHG(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4159 |
LINADJ |
IF (IWATER(I).EQ.1) VX0PSIM(I) = VAPSIM(I) |
./pkg/fizhi/fizhi_turb.F |
4164 |
LINADJ |
VX0PSIM(I) = VX0(I) * VAPSIM(I) |
./pkg/fizhi/fizhi_turb.F |
4212 |
LINADJ |
VDXPSIM(I) = VDX(I) * VAPSIM(I) |
./pkg/fizhi/fizhi_turb.F |
4352 |
LINADJ |
VDPSIMC(I) = -0.9 - VDPSIM(I) * VAPSIM(I) |