| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
2322 |
SFCFLX |
3 VUSTAR,VXX,VYY,VCU,VCT,VRIB,VZETA,VWS, |
|
./pkg/fizhi/fizhi_turb.F |
2381 |
SFCFLX |
_RL VYY(IRUN),VCU(IRUN),VCT(IRUN),VRIB(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
2462 |
SFCFLX |
VCU(I) = VK * VAPSIM(I) |
|
./pkg/fizhi/fizhi_turb.F |
2463 |
SFCFLX |
VUSTAR(I) = VCU(I) * VWS(I) |
|
./pkg/fizhi/fizhi_turb.F |
2490 |
SFCFLX |
VCU(I) = VCU(I) * (1. - VDPSIM(I)*VAPSIM(I)) |
|
./pkg/fizhi/fizhi_turb.F |
2496 |
SFCFLX |
VPSIG(I) = VH0(I) * VCU(I) * VWS(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
2508 |
SFCFLX |
VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I)) |
|
./pkg/fizhi/fizhi_turb.F |
2520 |
SFCFLX |
VCU(I) = VK / VPSIM(I) |
|
./pkg/fizhi/fizhi_turb.F |
2521 |
SFCFLX |
VPSIG(I) = VH0(I) * VCU(I) * VWS(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
2526 |
SFCFLX |
VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I)) |
|
./pkg/fizhi/fizhi_turb.F |
2532 |
SFCFLX |
IF (IVWATER(I).EQ.1) VUSTAR(I) = VCU(I) * VWS(I) |
|
./pkg/fizhi/fizhi_turb.F |
2590 |
SFCFLX |
VCU(I) = VK / VPSIM(I) |
|
./pkg/fizhi/fizhi_turb.F |
2591 |
SFCFLX |
VUSTAR(I) = VCU(I) * VWS(I) |
|
./pkg/fizhi/fizhi_turb.F |
2601 |
SFCFLX |
VAPSIM(I) = VCU(I) * RVK |
|
./pkg/fizhi/fizhi_turb.F |
2649 |
SFCFLX |
VCU(I) = VK / VPSIM(I) |
|
./pkg/fizhi/fizhi_turb.F |
2650 |
SFCFLX |
VUSTAR(I) = VCU(I) * VWS(I) |
|
./pkg/fizhi/fizhi_turb.F |
2733 |
SFCFLX |
VKM(I) = VUSTAR(I) * VCU(I) |