File |
Line number |
Procedure |
Code |
./pkg/atm2d/ATM2D_VARS.h |
143 |
NO PROCEDURE |
& solarinc_2D, dFdT_ice_2D, Tair_2D |
./pkg/atm2d/ATM2D_VARS.h |
148 |
NO PROCEDURE |
_RL dFdT_ice_2D(1:sNx,1:sNy)! dF/dT ice (W/m^2/K) (+ given +=up HF) |
./pkg/atm2d/calc_1dto2d.F |
154 |
CALC_WGHT2D |
dFdT_ice_2D(i,j)= dFdT_ice_2D(i,j) + atm_dFdT_ice(ind)*wgt |
./pkg/atm2d/calc_1dto2d.F |
228 |
INIT_2DFLD |
dFdT_ice_2D(i,j)= 0. _d 0 |
./pkg/atm2d/pass_thsice_fluxes.F |
42 |
PASS_THSICE_FLUXES |
& Tsrf(i,j,1,1)*dFdT_ice_2D(i,j) |
./pkg/atm2d/pass_thsice_fluxes.F |
44 |
PASS_THSICE_FLUXES |
sFlx(i,j,2)= -dFdT_ice_2D(i,j) |