| File |
Line number |
Procedure |
Code |
|
./pkg/aim/com_physvar.h |
85 |
NO PROCEDURE |
& USTR, VSTR, SHF, EVAP, T0, Q0, QSAT0, |
|
./pkg/aim/com_physvar.h |
94 |
NO PROCEDURE |
_RL USTR (NGP,3,MAX_NO_THREADS) |
|
./pkg/aim/phy_suflux.F |
230 |
SUFLUX |
USTR(J,3) = 0. |
|
./pkg/aim/phy_suflux.F |
233 |
SUFLUX |
& USTR(J,3) = -DRAG(J)*UA(J,NLEVxyU(J,myThid)) |
|
./pkg/aim/phy_suflux.F |
67 |
SUFLUX |
_RL USTR(NGP,3), VSTR(NGP,3), SHF(NGP,3), EVAP(NGP,3) |
|
./pkg/aim/phy_suflux.F |
8 |
SUFLUX |
* DRAG,USTR,VSTR,SHF,EVAP,T0,Q0,QSAT0,SPEED0, |
|
./pkg/aim/phy_driver.F |
201 |
PDRIVER |
& USTR(1,1,myThid),VSTR(1,1,myThid),SHF(1,1,myThid), |
|
./pkg/aim/phy_driver.F |
224 |
PDRIVER |
& UT_PBL(J,NLEVxy(J,myThid),myThid)+ USTR(J,3,myThid) |