| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/phy_suflux_prep.F |
10 |
SUFLUX_PREP |
I PSA,TA,QA,RH,ThA,Vsurf2,WVS,CLAT,FOROG, |
|
./pkg/aim_v23/phy_suflux_prep.F |
194 |
SUFLUX_PREP |
DRAG(J,1) = CDL*DENVV(J)*FOROG(J) |
|
./pkg/aim_v23/phy_suflux_prep.F |
217 |
SFLSET |
SUBROUTINE SFLSET (PHI0, FOROG, bi,bj,myThid) |
|
./pkg/aim_v23/phy_suflux_prep.F |
244 |
SFLSET |
_RL FOROG(NGP) |
|
./pkg/aim_v23/phy_suflux_prep.F |
255 |
SFLSET |
FOROG(J) = 1. _d 0 |
|
./pkg/aim_v23/phy_suflux_prep.F |
83 |
SUFLUX_PREP |
_RL Vsurf2(NGP), WVS(NGP), CLAT(NGP), FOROG(NGP) |