| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1415 |
TRBFLX |
_RL VPSIG(irun),VPSIHG(irun) |
|
./pkg/fizhi/fizhi_turb.F |
1772 |
TRBFLX |
4 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
|
./pkg/fizhi/fizhi_turb.F |
2326 |
SFCFLX |
7 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
|
./pkg/fizhi/fizhi_turb.F |
2387 |
SFCFLX |
_RL VHZ(irun),VPSIM(irun),VAPSIM(irun),VPSIG(irun),VPSIHG(irun) |
|
./pkg/fizhi/fizhi_turb.F |
2465 |
SFCFLX |
VPSIG(I) = VH0(I) * VUSTAR(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
2466 |
SFCFLX |
if(VPSIG(I).lt.0.) VPSIG(I) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
2467 |
SFCFLX |
VPSIG(I) = SQRT( VPSIG(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
2468 |
SFCFLX |
VPSIG(I) = BMDL * VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2469 |
SFCFLX |
VPSIHG(I) = VPSIM(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2496 |
SFCFLX |
VPSIG(I) = VH0(I) * VCU(I) * VWS(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
2497 |
SFCFLX |
if(VPSIG(I).lt.0.) VPSIG(I) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
2498 |
SFCFLX |
VPSIG(I) = SQRT( VPSIG(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
2499 |
SFCFLX |
VPSIG(I) = BMDL * VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2500 |
SFCFLX |
VPSIHG(I) = VPSIM(I) + VDPSIH(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2521 |
SFCFLX |
VPSIG(I) = VH0(I) * VCU(I) * VWS(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
2522 |
SFCFLX |
if(VPSIG(I).lt.0.) VPSIG(I) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
2523 |
SFCFLX |
VPSIG(I) = SQRT(VPSIG(I)) |
|
./pkg/fizhi/fizhi_turb.F |
2524 |
SFCFLX |
VPSIG(I) = BMDL * VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2525 |
SFCFLX |
VPSIHG(I) = VPSIM(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2553 |
SFCFLX |
3 VPSIG,VXX,VXX0, |
|
./pkg/fizhi/fizhi_turb.F |
2593 |
SFCFLX |
VPSIG(I) = VH0(I) * VUSTAR(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
2594 |
SFCFLX |
if(VPSIG(I).lt.0.) VPSIG(I) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
2595 |
SFCFLX |
VPSIG(I) = SQRT(VPSIG(I)) |
|
./pkg/fizhi/fizhi_turb.F |
2596 |
SFCFLX |
VPSIG(I) = BMDL * VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2597 |
SFCFLX |
VPSIHG(I) = VPSIH(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2613 |
SFCFLX |
3 VPSIG,VXX,VXX0, |
|
./pkg/fizhi/fizhi_turb.F |
2652 |
SFCFLX |
VPSIG(I) = VH0(I) * VUSTAR(I) - USTH0S |
|
./pkg/fizhi/fizhi_turb.F |
2653 |
SFCFLX |
if(VPSIG(I).lt.0.) VPSIG(I) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
2654 |
SFCFLX |
VPSIG(I) = SQRT(VPSIG(I)) |
|
./pkg/fizhi/fizhi_turb.F |
2655 |
SFCFLX |
VPSIG(I) = BMDL * VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2656 |
SFCFLX |
VPSIHG(I) = VPSIH(I) + VDPSIH(I) + VPSIG(I) |
|
./pkg/fizhi/fizhi_turb.F |
2683 |
SFCFLX |
VTEMP(I) = ( VPSIH2(I) + VPSIG(I) ) / VPSIHG(I) |
|
./pkg/fizhi/fizhi_turb.F |
4084 |
LINADJ |
1 VAPSIM, VAPSIHG,VPSIH,VPSIG,VX,VX0,VY,VY0,ITYPE,LWATER,IRUN, |
|
./pkg/fizhi/fizhi_turb.F |
4132 |
LINADJ |
_RL VPSIH(IRUN),VPSIG(IRUN),VX(IRUN) |