File |
Line number |
Procedure |
Code |
./pkg/aim_v23/phy_suflux_land.F |
120 |
SUFLUX_LAND |
CDENVV(J)=CHL*DENVV(J)*FSLAND |
./pkg/aim_v23/phy_suflux_land.F |
148 |
SUFLUX_LAND |
EVAP(J) = CDENVV(J)*SWAV(J)*(QSAT0(J,1)-Q0(J)) |
./pkg/aim_v23/phy_suflux_land.F |
150 |
SUFLUX_LAND |
dEvp(J) = CDENVV(J)*SWAV(J)*dEvp(J) |
./pkg/aim_v23/phy_suflux_land.F |
155 |
SUFLUX_LAND |
EVAP(J) = CDENVV(J)*SWAV(J)*(QSAT0(J,1)-Q0(J)) |
./pkg/aim_v23/phy_suflux_land.F |
156 |
SUFLUX_LAND |
Evp0(J) = CDENVV(J)*SWAV(J)*(QSAT0(J,2)-Q0(J)) |
./pkg/aim_v23/phy_suflux_land.F |
157 |
SUFLUX_LAND |
dEvp(J) = CDENVV(J)*SWAV(J)*dEvp(J) |
./pkg/aim_v23/phy_suflux_land.F |
165 |
SUFLUX_LAND |
EVAP(J) = CDENVV(J)*SWAV(J)*MAX(0. _d 0,QSAT0(J,1)-Q0(J)) |
./pkg/aim_v23/phy_suflux_land.F |
167 |
SUFLUX_LAND |
dEvp(J) = CDENVV(J)*SWAV(J)*dEvp(J) |
./pkg/aim_v23/phy_suflux_land.F |
175 |
SUFLUX_LAND |
EVAP(J) = CDENVV(J)*SWAV(J)*MAX(0. _d 0,QSAT0(J,1)-Q0(J)) |
./pkg/aim_v23/phy_suflux_land.F |
176 |
SUFLUX_LAND |
Evp0(J) = CDENVV(J)*SWAV(J)*MAX(0. _d 0,QSAT0(J,2)-Q0(J)) |
./pkg/aim_v23/phy_suflux_land.F |
177 |
SUFLUX_LAND |
dEvp(J) = CDENVV(J)*SWAV(J)*dEvp(J) |
./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 |
189 |
SUFLUX_LAND |
dShf(J) = CDENVV(J)*CP |
./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 |
200 |
SUFLUX_LAND |
Shf0(J) = CDENVV(J)*CP*(TSFC(J) -T0(J)) |
./pkg/aim_v23/phy_suflux_land.F |
201 |
SUFLUX_LAND |
dShf(J) = CDENVV(J)*CP |
./pkg/aim_v23/phy_suflux_land.F |
95 |
SUFLUX_LAND |
_RL CDENVV(NGP), RDTH, FSLAND |
./pkg/aim_v23/phy_suflux_ocean.F |
104 |
SUFLUX_OCEAN |
EVAP(J) = CDENVV(J)*(QSAT0(J)-Q0(J)) |
./pkg/aim_v23/phy_suflux_ocean.F |
72 |
SUFLUX_OCEAN |
_RL CDENVV(NGP), RDTH, FSSEA |
./pkg/aim_v23/phy_suflux_ocean.F |
91 |
SUFLUX_OCEAN |
CDENVV(J)=CHS*DENVV(J)*FSSEA |
./pkg/aim_v23/phy_suflux_ocean.F |
95 |
SUFLUX_OCEAN |
SHF(J) = CDENVV(J)*CP*(Tsurf(J)-T0(J)) |
./pkg/aim_v23/phy_suflux_sice.F |
126 |
SUFLUX_SICE |
CDENVV(J)=CHS*DENVV(J)*FSSICE |
./pkg/aim_v23/phy_suflux_sice.F |
156 |
SUFLUX_SICE |
EVAP(J) = CDENVV(J)*(QSAT0(J,1)-Q0(J)) |
./pkg/aim_v23/phy_suflux_sice.F |
158 |
SUFLUX_SICE |
dEvp(J) = CDENVV(J)*dEvp(J) |
./pkg/aim_v23/phy_suflux_sice.F |
163 |
SUFLUX_SICE |
EVAP(J) = CDENVV(J)*(QSAT0(J,1)-Q0(J)) |
./pkg/aim_v23/phy_suflux_sice.F |
164 |
SUFLUX_SICE |
Evp0(J) = CDENVV(J)*(QSAT0(J,2)-Q0(J)) |
./pkg/aim_v23/phy_suflux_sice.F |
165 |
SUFLUX_SICE |
dEvp(J) = CDENVV(J)*dEvp(J) |
./pkg/aim_v23/phy_suflux_sice.F |
174 |
SUFLUX_SICE |
SHF(J) = CDENVV(J)*CP*(TSKIN(J)-T0(J)) |
./pkg/aim_v23/phy_suflux_sice.F |
176 |
SUFLUX_SICE |
dShf(J) = CDENVV(J)*CP |
./pkg/aim_v23/phy_suflux_sice.F |
186 |
SUFLUX_SICE |
SHF(J) = CDENVV(J)*CP*(TSKIN(J)-T0(J)) |
./pkg/aim_v23/phy_suflux_sice.F |
187 |
SUFLUX_SICE |
Shf0(J) = CDENVV(J)*CP*(TSFC(J) -T0(J)) |
./pkg/aim_v23/phy_suflux_sice.F |
188 |
SUFLUX_SICE |
dShf(J) = CDENVV(J)*CP |
./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 |
164 |
BULKF_FORMULA_AIM |
CDENVV(J)=CHS*DENVV(J)*FSSICE |
./pkg/bulk_force/bulkf_formula_aim.F |
190 |
BULKF_FORMULA_AIM |
EVAP(J) = CDENVV(J)*(QSAT0(J,1)-Q0(J)) |
./pkg/bulk_force/bulkf_formula_aim.F |
192 |
BULKF_FORMULA_AIM |
dEvp(J) = CDENVV(J)*dEvp(J) |
./pkg/bulk_force/bulkf_formula_aim.F |
197 |
BULKF_FORMULA_AIM |
EVAP(J) = CDENVV(J)*(QSAT0(J,1)-Q0(J)) |
./pkg/bulk_force/bulkf_formula_aim.F |
198 |
BULKF_FORMULA_AIM |
Evp0(J) = CDENVV(J)*(QSAT0(J,2)-Q0(J)) |
./pkg/bulk_force/bulkf_formula_aim.F |
199 |
BULKF_FORMULA_AIM |
dEvp(J) = CDENVV(J)*dEvp(J) |
./pkg/bulk_force/bulkf_formula_aim.F |
208 |
BULKF_FORMULA_AIM |
SHF(J) = CDENVV(J)*CP*(TSKIN(J)-T0(J)) |
./pkg/bulk_force/bulkf_formula_aim.F |
210 |
BULKF_FORMULA_AIM |
dShf(J) = CDENVV(J)*CP |
./pkg/bulk_force/bulkf_formula_aim.F |
220 |
BULKF_FORMULA_AIM |
SHF(J) = CDENVV(J)*CP*(TSKIN(J)-T0(J)) |
./pkg/bulk_force/bulkf_formula_aim.F |
221 |
BULKF_FORMULA_AIM |
Shf0(J) = CDENVV(J)*CP*(TSFC(J) -T0(J)) |
./pkg/bulk_force/bulkf_formula_aim.F |
222 |
BULKF_FORMULA_AIM |
dShf(J) = CDENVV(J)*CP |