| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/phy_driver.F |
124 |
PHY_DRIVER |
_RL dTskin(NGP), T1s(NGP), DENVV(NGP) |
|
./pkg/aim_v23/phy_driver.F |
296 |
PHY_DRIVER |
O SPEED0(1,myThid),DRAG(1,0,myThid),DENVV, |
|
./pkg/aim_v23/phy_driver.F |
304 |
PHY_DRIVER |
I T1s, T0(1,myThid), Q0(1,myThid), DENVV, |
|
./pkg/aim_v23/phy_driver.F |
323 |
PHY_DRIVER |
O T1s, T0(1,myThid), Q0(1,myThid), DENVV, |
|
./pkg/aim_v23/phy_driver.F |
332 |
PHY_DRIVER |
I T1s, T0(1,myThid), Q0(1,myThid), DENVV, |
|
./pkg/aim_v23/phy_driver.F |
358 |
PHY_DRIVER |
I T0(1,myThid), Q0(1,myThid), DENVV, |
|
./pkg/aim_v23/phy_suflux_land.F |
120 |
SUFLUX_LAND |
CDENVV(J)=CHL*DENVV(J)*FSLAND |
|
./pkg/aim_v23/phy_suflux_land.F |
129 |
SUFLUX_LAND |
Shf0(J) = CHL*DENVV(J)*Fstb0 |
|
./pkg/aim_v23/phy_suflux_land.F |
12 |
SUFLUX_LAND |
I T1, T0, Q0, DENVV, |
|
./pkg/aim_v23/phy_suflux_land.F |
132 |
SUFLUX_LAND |
dShf(J) = CHL*DENVV(J)*dFstb |
|
./pkg/aim_v23/phy_suflux_land.F |
81 |
SUFLUX_LAND |
_RL T1(NGP), T0(NGP), Q0(NGP), DENVV(NGP) |
|
./pkg/aim_v23/phy_suflux_ocean.F |
12 |
SUFLUX_OCEAN |
I T1, T0, Q0, DENVV, |
|
./pkg/aim_v23/phy_suflux_ocean.F |
61 |
SUFLUX_OCEAN |
_RL T1(NGP), T0(NGP), Q0(NGP), DENVV(NGP) |
|
./pkg/aim_v23/phy_suflux_ocean.F |
91 |
SUFLUX_OCEAN |
CDENVV(J)=CHS*DENVV(J)*FSSEA |
|
./pkg/aim_v23/phy_suflux_post.F |
12 |
SUFLUX_POST |
I T0, Q0, DENVV, |
|
./pkg/aim_v23/phy_suflux_post.F |
80 |
SUFLUX_POST |
_RL T0(NGP), Q0(NGP), DENVV(NGP) |
|
./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 |
173 |
SUFLUX_PREP |
DENVV(J)=(PRD*PSA(J)/T0(J))*SPEED0(J) |
|
./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 |
195 |
SUFLUX_PREP |
DRAG(J,2) = CDS*DENVV(J) |
|
./pkg/aim_v23/phy_suflux_prep.F |
196 |
SUFLUX_PREP |
DRAG(J,3) = CDS*DENVV(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/phy_suflux_sice.F |
126 |
SUFLUX_SICE |
CDENVV(J)=CHS*DENVV(J)*FSSICE |
|
./pkg/aim_v23/phy_suflux_sice.F |
12 |
SUFLUX_SICE |
I T1, T0, Q0, DENVV, |
|
./pkg/aim_v23/phy_suflux_sice.F |
135 |
SUFLUX_SICE |
Shf0(J) = CHS*DENVV(J)*Fstb0 |
|
./pkg/aim_v23/phy_suflux_sice.F |
138 |
SUFLUX_SICE |
dShf(J) = CHS*DENVV(J)*dFstb |
|
./pkg/aim_v23/phy_suflux_sice.F |
81 |
SUFLUX_SICE |
_RL T1(NGP), T0(NGP), Q0(NGP), DENVV(NGP) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
114 |
BULKF_FORMULA_AIM |
_RL DENVV(NGP), PRD |
|
./pkg/bulk_force/bulkf_formula_aim.F |
145 |
BULKF_FORMULA_AIM |
DENVV(J)=(PRD*PSA(J)/T0(J))*Vsurf(J) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
164 |
BULKF_FORMULA_AIM |
CDENVV(J)=CHS*DENVV(J)*FSSICE |
|
./pkg/bulk_force/bulkf_formula_aim.F |
173 |
BULKF_FORMULA_AIM |
Shf0(J) = CHS*DENVV(J)*Fstb0 |
|
./pkg/bulk_force/bulkf_formula_aim.F |
176 |
BULKF_FORMULA_AIM |
dShf(J) = CHS*DENVV(J)*dFstb |