File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
1429 |
TRBFLX |
_RL VDPSIMC(irun),VDPSIHC(irun) |
./pkg/fizhi/fizhi_turb.F |
1777 |
TRBFLX |
3 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC) |
./pkg/fizhi/fizhi_turb.F |
2331 |
SFCFLX |
5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC) |
./pkg/fizhi/fizhi_turb.F |
2398 |
SFCFLX |
_RL VDPSIMC(irun),VDPSIHC(irun) |
./pkg/fizhi/fizhi_turb.F |
2487 |
SFCFLX |
5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC) |
./pkg/fizhi/fizhi_turb.F |
2559 |
SFCFLX |
5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC) |
./pkg/fizhi/fizhi_turb.F |
2619 |
SFCFLX |
5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC) |
./pkg/fizhi/fizhi_turb.F |
4088 |
LINADJ |
5 VZCOEF2,VZCOEF1,VTEMPLIN,VDPSIMC,VDPSIHC) |
./pkg/fizhi/fizhi_turb.F |
4144 |
LINADJ |
_RL VDPSIMC(irun),VDPSIHC(irun) |
./pkg/fizhi/fizhi_turb.F |
4362 |
LINADJ |
VDPSIMC(I) = -0.9 - VDPSIM(I) * VAPSIM(I) |
./pkg/fizhi/fizhi_turb.F |
4364 |
LINADJ |
IF ( VDPSIMC(I).GT.0. ) THEN |
./pkg/fizhi/fizhi_turb.F |
4375 |
LINADJ |
IF(VINT1(I).EQ.1) VDZETA1(I) = VDPSIMC(I) / VDXPSIM(I) |