| File |
Line number |
Procedure |
Code |
|
./pkg/aim/com_physvar.h |
103 |
NO PROCEDURE |
_RL SPEED0 (NGP,MAX_NO_THREADS) |
|
./pkg/aim/com_physvar.h |
86 |
NO PROCEDURE |
& SLR_DOWN, ST4S, SPEED0, DRAG |
|
./pkg/aim/phy_suflux.F |
177 |
SUFLUX |
SPEED0(J)=SQRT(factwind2*Vsurfsq(J)+VG2) |
|
./pkg/aim/phy_suflux.F |
178 |
SUFLUX |
DENVV(J,3)=(PRD*PSA(J)/T0(J,1))*SPEED0(J) |
|
./pkg/aim/phy_suflux.F |
68 |
SUFLUX |
_RL T0(NGP,2),Q0(NGP),QSAT0(NGP,2), SPEED0(NGP) |
|
./pkg/aim/phy_suflux.F |
8 |
SUFLUX |
* DRAG,USTR,VSTR,SHF,EVAP,T0,Q0,QSAT0,SPEED0, |
|
./pkg/aim/phy_driver.F |
203 |
PDRIVER |
& QSAT0(1,1,myThid),SPEED0(1,myThid), |
|
./pkg/aim_v23/phy_suflux_prep.F |
12 |
SUFLUX_PREP |
O SPEED0,DRAG,DENVV,dTskin,T1,T0,Q0, |
|
./pkg/aim_v23/phy_suflux_prep.F |
172 |
SUFLUX_PREP |
SPEED0(J)=SQRT(factWind2*Vsurf2(J)+VG2) |
|
./pkg/aim_v23/phy_suflux_prep.F |
173 |
SUFLUX_PREP |
DENVV(J)=(PRD*PSA(J)/T0(J))*SPEED0(J) |
|
./pkg/aim_v23/phy_suflux_prep.F |
87 |
SUFLUX_PREP |
_RL SPEED0(NGP), DRAG(NGP,0:3), T1(NGP), DENVV(NGP) |
|
./pkg/aim_v23/com_physvar.h |
108 |
NO PROCEDURE |
_RL SPEED0 (NGP,MAX_NO_THREADS) |
|
./pkg/aim_v23/com_physvar.h |
95 |
NO PROCEDURE |
& SHF, EVAP, SPEED0, DRAG |
|
./pkg/aim_v23/aim_diagnostics.F |
106 |
AIM_DIAGNOSTICS |
CALL AIM_WRITE_LOCAL('aimPhyDiag.',suff,1,SPEED0(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
197 |
AIM_DIAGNOSTICS |
& + SPEED0(I2,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
285 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( SPEED0(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
242 |
PHY_DRIVER |
O SPEED0(1,myThid),DRAG(1,0,myThid),DENVV, |