| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/phy_suflux_sice.F |
125 |
SUFLUX_SICE |
FSSICE=1.+MIN(DTHETA,MAX(-DTHETA,TSKIN(J)-T1(J)))*RDTH |
|
./pkg/aim_v23/phy_suflux_sice.F |
126 |
SUFLUX_SICE |
CDENVV(J)=CHS*DENVV(J)*FSSICE |
|
./pkg/aim_v23/phy_suflux_sice.F |
96 |
SUFLUX_SICE |
_RL CDENVV(NGP), RDTH, FSSICE |
|
./pkg/bulk_force/bulkf_formula_aim.F |
118 |
BULKF_FORMULA_AIM |
_RL CDENVV(NGP), RDTH, FSSICE |
|
./pkg/bulk_force/bulkf_formula_aim.F |
163 |
BULKF_FORMULA_AIM |
FSSICE=1.+MIN(DTHETA,MAX(-DTHETA,TSKIN(J)-T1(J)))*RDTH |
|
./pkg/bulk_force/bulkf_formula_aim.F |
164 |
BULKF_FORMULA_AIM |
CDENVV(J)=CHS*DENVV(J)*FSSICE |