| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1524 |
TRBFLX |
_RL VPSIG(irun),VPSIHG(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 |
2495 |
SFCFLX |
VPSIHG(I) = VPSIM(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2526 |
SFCFLX |
VPSIHG(I) = VPSIM(I) + VDPSIH(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2534 |
SFCFLX |
VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I)) |
|
./pkg/fizhi/fizhi_turb.F |
2551 |
SFCFLX |
VPSIHG(I) = VPSIM(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2552 |
SFCFLX |
VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I)) |
|
./pkg/fizhi/fizhi_turb.F |
2623 |
SFCFLX |
VPSIHG(I) = VPSIH(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2628 |
SFCFLX |
VAPSIHG(I) = 1. / VPSIHG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2629 |
SFCFLX |
VRIB1(I) = VAPSIM(I) * VAPSIM(I) * VPSIHG(I) * VZETA(I) |
|
./pkg/fizhi/fizhi_turb.F |
2682 |
SFCFLX |
VPSIHG(I) = VPSIH(I) + VDPSIH(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2683 |
SFCFLX |
VCT(I) = VK / VPSIHG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2709 |
SFCFLX |
VTEMP(I) = ( VPSIH2(I) + VPSIG(I) ) / VPSIHG(I) |