| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1585 |
TRBFLX |
_RL VPSIG(irun),VPSIHG(irun) |
|
./pkg/fizhi/fizhi_turb.F |
2024 |
TRBFLX |
4 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
|
./pkg/fizhi/fizhi_turb.F |
2775 |
SFCFLX |
7 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
|
./pkg/fizhi/fizhi_turb.F |
2839 |
SFCFLX |
_RL VHZ(irun),VPSIM(irun),VAPSIM(irun),VPSIG(irun),VPSIHG(irun) |
|
./pkg/fizhi/fizhi_turb.F |
2917 |
SFCFLX |
VPSIG(I) = VH0(I) * VUSTAR(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
2918 |
SFCFLX |
if(VPSIG(I).lt.0.) VPSIG(I) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
2919 |
SFCFLX |
VPSIG(I) = SQRT( VPSIG(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
2920 |
SFCFLX |
VPSIG(I) = BMDL * VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2921 |
SFCFLX |
VPSIHG(I) = VPSIM(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2948 |
SFCFLX |
VPSIG(I) = VH0(I) * VCU(I) * VWS(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
2949 |
SFCFLX |
if(VPSIG(I).lt.0.) VPSIG(I) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
2950 |
SFCFLX |
VPSIG(I) = SQRT( VPSIG(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
2951 |
SFCFLX |
VPSIG(I) = BMDL * VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2952 |
SFCFLX |
VPSIHG(I) = VPSIM(I) + VDPSIH(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2973 |
SFCFLX |
VPSIG(I) = VH0(I) * VCU(I) * VWS(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
2974 |
SFCFLX |
if(VPSIG(I).lt.0.) VPSIG(I) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
2975 |
SFCFLX |
VPSIG(I) = SQRT(VPSIG(I)) |
|
./pkg/fizhi/fizhi_turb.F |
2976 |
SFCFLX |
VPSIG(I) = BMDL * VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2977 |
SFCFLX |
VPSIHG(I) = VPSIM(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
3005 |
SFCFLX |
3 VPSIG,VXX,VXX0, |
|
./pkg/fizhi/fizhi_turb.F |
3045 |
SFCFLX |
VPSIG(I) = VH0(I) * VUSTAR(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
3046 |
SFCFLX |
if(VPSIG(I).lt.0.) VPSIG(I) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
3047 |
SFCFLX |
VPSIG(I) = SQRT(VPSIG(I)) |
|
./pkg/fizhi/fizhi_turb.F |
3048 |
SFCFLX |
VPSIG(I) = BMDL * VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
3049 |
SFCFLX |
VPSIHG(I) = VPSIH(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
3065 |
SFCFLX |
3 VPSIG,VXX,VXX0, |
|
./pkg/fizhi/fizhi_turb.F |
3104 |
SFCFLX |
VPSIG(I) = VH0(I) * VUSTAR(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
3105 |
SFCFLX |
if(VPSIG(I).lt.0.) VPSIG(I) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
3106 |
SFCFLX |
VPSIG(I) = SQRT(VPSIG(I)) |
|
./pkg/fizhi/fizhi_turb.F |
3107 |
SFCFLX |
VPSIG(I) = BMDL * VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
3108 |
SFCFLX |
VPSIHG(I) = VPSIH(I) + VDPSIH(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
3135 |
SFCFLX |
VTEMP(I) = ( VPSIH2(I) + VPSIG(I) ) / VPSIHG(I) |
|
./pkg/fizhi/fizhi_turb.F |
4649 |
LINADJ |
1 VAPSIM, VAPSIHG,VPSIH,VPSIG,VX,VX0,VY,VY0,ITYPE,LWATER,IRUN, |
|
./pkg/fizhi/fizhi_turb.F |
4701 |
LINADJ |
_RL VPSIH(IRUN),VPSIG(IRUN),VX(IRUN) |