| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
2771 |
SFCFLX |
3 VUSTAR,VXX,VYY,VCU,VCT,VRIB,VZETA,VWS, |
|
./pkg/fizhi/fizhi_turb.F |
2833 |
SFCFLX |
_RL VYY(IRUN),VCU(IRUN),VCT(IRUN),VRIB(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
2914 |
SFCFLX |
VCU(I) = VK * VAPSIM(I) |
|
./pkg/fizhi/fizhi_turb.F |
2915 |
SFCFLX |
VUSTAR(I) = VCU(I) * VWS(I) |
|
./pkg/fizhi/fizhi_turb.F |
2942 |
SFCFLX |
VCU(I) = VCU(I) * (1. - VDPSIM(I)*VAPSIM(I)) |
|
./pkg/fizhi/fizhi_turb.F |
2948 |
SFCFLX |
VPSIG(I) = VH0(I) * VCU(I) * VWS(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
2960 |
SFCFLX |
VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I)) |
|
./pkg/fizhi/fizhi_turb.F |
2972 |
SFCFLX |
VCU(I) = VK / VPSIM(I) |
|
./pkg/fizhi/fizhi_turb.F |
2973 |
SFCFLX |
VPSIG(I) = VH0(I) * VCU(I) * VWS(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
2978 |
SFCFLX |
VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I)) |
|
./pkg/fizhi/fizhi_turb.F |
2984 |
SFCFLX |
IF (IVWATER(I).EQ.1) VUSTAR(I) = VCU(I) * VWS(I) |
|
./pkg/fizhi/fizhi_turb.F |
3042 |
SFCFLX |
VCU(I) = VK / VPSIM(I) |
|
./pkg/fizhi/fizhi_turb.F |
3043 |
SFCFLX |
VUSTAR(I) = VCU(I) * VWS(I) |
|
./pkg/fizhi/fizhi_turb.F |
3053 |
SFCFLX |
VAPSIM(I) = VCU(I) * RVK |
|
./pkg/fizhi/fizhi_turb.F |
3101 |
SFCFLX |
VCU(I) = VK / VPSIM(I) |
|
./pkg/fizhi/fizhi_turb.F |
3102 |
SFCFLX |
VUSTAR(I) = VCU(I) * VWS(I) |
|
./pkg/fizhi/fizhi_turb.F |
3185 |
SFCFLX |
VKM(I) = VUSTAR(I) * VCU(I) |