| 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 |
95 |
NO PROCEDURE |
_RL VSTR (NGP,3,MAX_NO_THREADS) |
|
./pkg/aim/phy_suflux.F |
231 |
SUFLUX |
VSTR(J,3) = 0. |
|
./pkg/aim/phy_suflux.F |
235 |
SUFLUX |
& VSTR(J,3) = -DRAG(J)*VA(J,NLEVxyV(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 |
226 |
PDRIVER |
& VT_PBL(J,NLEVxy(J,myThid),myThid)+ VSTR(J,3,myThid) |