| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
2769 |
SFCFLX |
1 VSH2,VPK,VPKE,VPE,VZ0,IVWATER,VHS, |
|
./pkg/fizhi/fizhi_turb.F |
2828 |
SFCFLX |
_RL VZ0(IRUN),VHS(IRUN),VAHS(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
2900 |
SFCFLX |
IF (IVWATER(I).EQ.1) VZ0(I) = 0.0003 |
|
./pkg/fizhi/fizhi_turb.F |
2911 |
SFCFLX |
VHZ(I) = VHS(I) / VZ0(I) |
|
./pkg/fizhi/fizhi_turb.F |
2931 |
SFCFLX |
1 VWS,VZ0,VUSTAR,IVWATER, |
|
./pkg/fizhi/fizhi_turb.F |
2943 |
SFCFLX |
VZ0(I) = VZ0(I) + VDZ0(I) |
|
./pkg/fizhi/fizhi_turb.F |
2946 |
SFCFLX |
IF ( VZ0(I) .LE. Z0MIN ) VZ0(I) = Z0MIN |
|
./pkg/fizhi/fizhi_turb.F |
2966 |
SFCFLX |
VZH(I) = VZ0(I) * VAHS(I) |
|
./pkg/fizhi/fizhi_turb.F |
2989 |
SFCFLX |
VZ0(I) = VTEMP(I) |
|
./pkg/fizhi/fizhi_turb.F |
2990 |
SFCFLX |
IF ( VZ0(I) .LE. Z0MIN ) VZ0(I) = Z0MIN |
|
./pkg/fizhi/fizhi_turb.F |
3003 |
SFCFLX |
1 VWS,VZ0,VUSTAR,IVWATER, |
|
./pkg/fizhi/fizhi_turb.F |
3022 |
SFCFLX |
VZ0(I) = VZ0(I) + VZ0L(I) * VDZ0(I) |
|
./pkg/fizhi/fizhi_turb.F |
3023 |
SFCFLX |
IF (VZ0(I) .LE. Z0MIN ) VZ0(I) = Z0MIN |
|
./pkg/fizhi/fizhi_turb.F |
3036 |
SFCFLX |
VZH(I) = VZ0(I) * VAHS(I) |
|
./pkg/fizhi/fizhi_turb.F |
3063 |
SFCFLX |
1 VWS,VZ0,VUSTAR,IVWATER, |
|
./pkg/fizhi/fizhi_turb.F |
3078 |
SFCFLX |
VZ0L(I) = VZ0(I) |
|
./pkg/fizhi/fizhi_turb.F |
3091 |
SFCFLX |
VZ0(I) = VZ0(I) * ( 1. + VDZ0(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
3092 |
SFCFLX |
IF (VZ0(I) .LE. Z0MIN ) VZ0(I) = Z0MIN |
|
./pkg/fizhi/fizhi_turb.F |
3129 |
SFCFLX |
VZH(I) = VZ0(I) * 0.1 |