| File |
Line number |
Procedure |
Code |
|
./pkg/aim/aim_calc_diags.F |
59 |
AIM_CALC_DIAGS |
& + SHF(I2,3,myThid)*DDTT |
|
./pkg/aim/com_physvar.h |
85 |
NO PROCEDURE |
& USTR, VSTR, SHF, EVAP, T0, Q0, QSAT0, |
|
./pkg/aim/com_physvar.h |
96 |
NO PROCEDURE |
_RL SHF (NGP,3,MAX_NO_THREADS) |
|
./pkg/aim/phy_suflux.F |
245 |
SUFLUX |
SHF(J,1) = CHLCP*DENVV(J,1)*(TLAND(J)-T0(J,1)) |
|
./pkg/aim/phy_suflux.F |
246 |
SUFLUX |
SHF(J,2) = CHSCP*DENVV(J,2)*(TSEA(J) -T0(J,1)) |
|
./pkg/aim/phy_suflux.F |
330 |
SUFLUX |
SHF(J,3) = SHF(J,2)+FMASK(J)*( SHF(J,1)- SHF(J,2)) |
|
./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 |
228 |
PDRIVER |
& TT_PBL(J,NLEVxy(J,myThid),myThid)+ SHF(J,3,myThid) |
|
./pkg/aim_v23/aim_sice_impl.F |
102 |
AIM_SICE_IMPL |
SHF (J) = Shf0(J) |
|
./pkg/aim_v23/aim_sice_impl.F |
107 |
AIM_SICE_IMPL |
SHF (J) = SHF (J) + dTsurf(J)*dShf(J) |
|
./pkg/aim_v23/aim_sice_impl.F |
15 |
AIM_SICE_IMPL |
U Tsurf, SHF, EVAP, SLRU, |
|
./pkg/aim_v23/aim_sice_impl.F |
69 |
AIM_SICE_IMPL |
_RL Tsurf(NGP), SHF(NGP), EVAP(NGP), SLRU(NGP) |
|
./pkg/aim_v23/phy_suflux_land.F |
13 |
SUFLUX_LAND |
O SHF, EVAP, SLRU, |
|
./pkg/aim_v23/phy_suflux_land.F |
187 |
SUFLUX_LAND |
SHF(J) = CDENVV(J)*CP*(TSKIN(J)-T0(J)) |
|
./pkg/aim_v23/phy_suflux_land.F |
199 |
SUFLUX_LAND |
SHF(J) = CDENVV(J)*CP*(TSKIN(J)-T0(J)) |
|
./pkg/aim_v23/phy_suflux_land.F |
220 |
SUFLUX_LAND |
& - ( SHF(J)+ ALHC*EVAP(J) ) |
|
./pkg/aim_v23/phy_suflux_land.F |
83 |
SUFLUX_LAND |
_RL SHF(NGP), EVAP(NGP), SLRU(NGP) |
|
./pkg/aim_v23/phy_suflux_ocean.F |
13 |
SUFLUX_OCEAN |
O SHF, EVAP, SLRU, |
|
./pkg/aim_v23/phy_suflux_ocean.F |
63 |
SUFLUX_OCEAN |
_RL SHF(NGP), EVAP(NGP), SLRU(NGP) |
|
./pkg/aim_v23/phy_suflux_ocean.F |
95 |
SUFLUX_OCEAN |
SHF(J) = CDENVV(J)*CP*(Tsurf(J)-T0(J)) |
|
./pkg/aim_v23/phy_suflux_post.F |
118 |
SUFLUX_POST |
SHF (J,0) = (FMASK(J,1)*SHF(J,1) +FMASK(J,2)*SHF(J,2) |
|
./pkg/aim_v23/phy_suflux_post.F |
119 |
SUFLUX_POST |
& +FMASK(J,3)*SHF(J,3) ) |
|
./pkg/aim_v23/phy_suflux_post.F |
13 |
SUFLUX_POST |
U DRAG, SHF, EVAP, SLRup, |
|
./pkg/aim_v23/phy_suflux_post.F |
82 |
SUFLUX_POST |
_RL DRAG(NGP,0:3), SHF(NGP,0:3), EVAP(NGP,0:3), SLRup(NGP,3) |
|
./pkg/aim_v23/com_physvar.h |
106 |
NO PROCEDURE |
_RL SHF (NGP,0:3,MAX_NO_THREADS) |
|
./pkg/aim_v23/com_physvar.h |
95 |
NO PROCEDURE |
& SHF, EVAP, SPEED0, DRAG |
|
./pkg/aim_v23/phy_suflux_sice.F |
13 |
SUFLUX_SICE |
O SHF, EVAP, SLRU, |
|
./pkg/aim_v23/phy_suflux_sice.F |
173 |
SUFLUX_SICE |
SHF(J) = CDENVV(J)*CP*(TSKIN(J)-T0(J)) |
|
./pkg/aim_v23/phy_suflux_sice.F |
185 |
SUFLUX_SICE |
SHF(J) = CDENVV(J)*CP*(TSKIN(J)-T0(J)) |
|
./pkg/aim_v23/phy_suflux_sice.F |
206 |
SUFLUX_SICE |
& - ( SHF(J) + ALHevp*EVAP(J) ) |
|
./pkg/aim_v23/phy_suflux_sice.F |
82 |
SUFLUX_SICE |
_RL SHF(NGP), EVAP(NGP), SLRU(NGP) |
|
./pkg/aim_v23/aim_aim2land.F |
92 |
AIM_AIM2LAND |
& - SHF(I2,1,myThid) |
|
./pkg/aim_v23/aim_land_impl.F |
124 |
AIM_LAND_IMPL |
SHF (J) = Shf0(J) |
|
./pkg/aim_v23/aim_land_impl.F |
128 |
AIM_LAND_IMPL |
SHF (J) = SHF (J) + dTsurf(J)*dShf(J) |
|
./pkg/aim_v23/aim_land_impl.F |
16 |
AIM_LAND_IMPL |
U Tsurf, SHF, EVAP, SLRU, |
|
./pkg/aim_v23/aim_land_impl.F |
71 |
AIM_LAND_IMPL |
_RL Tsurf(NGP), SHF(NGP), EVAP(NGP), SLRU(NGP) |
|
./pkg/aim_v23/aim_aim2sioce.F |
102 |
AIM_AIM2SIOCE |
& - SHF(I2,2,myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
171 |
AIM_AIM2SIOCE |
& - SHF(I2,3,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
116 |
AIM_DIAGNOSTICS |
CALL AIM_WRITE_LOCAL('aimPhyDiag.',suff,1,SHF(1,0,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
181 |
AIM_DIAGNOSTICS |
& + SHF(I2,0,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
267 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( SHF(1,0,myThid), |
|
./pkg/aim_v23/phy_driver.F |
251 |
PHY_DRIVER |
O SHF(1,1,myThid), EVAP(1,1,myThid), SLR(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
260 |
PHY_DRIVER |
U SHF(1,1,myThid), EVAP(1,1,myThid), SLR(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
270 |
PHY_DRIVER |
O SHF(1,2,myThid), EVAP(1,2,myThid), SLR(1,2,myThid), |
|
./pkg/aim_v23/phy_driver.F |
279 |
PHY_DRIVER |
O SHF(1,3,myThid), EVAP(1,3,myThid), SLR(1,3,myThid), |
|
./pkg/aim_v23/phy_driver.F |
288 |
PHY_DRIVER |
U SHF(1,3,myThid), EVAP(1,3,myThid), SLR(1,3,myThid), |
|
./pkg/aim_v23/phy_driver.F |
294 |
PHY_DRIVER |
SHF (J,3,myThid) = 0. _d 0 |
|
./pkg/aim_v23/phy_driver.F |
305 |
PHY_DRIVER |
U DRAG(1,0,myThid), SHF(1,0,myThid), |
|
./pkg/aim_v23/phy_driver.F |
385 |
PHY_DRIVER |
& + SHF(J,0,myThid) *RPS_1*GRDSCP(K) |