File |
Line number |
Procedure |
Code |
./pkg/atm2d/ATM2D_VARS.h |
125 |
NO PROCEDURE |
& precipo_2D, fu_2D, fv_2D, solarnet_ocn_2D, |
./pkg/atm2d/ATM2D_VARS.h |
130 |
NO PROCEDURE |
_RL precipo_2D(1:sNx,1:sNy) ! precip (m/s) (+=out of ocean, - definite) |
./pkg/atm2d/calc_1dto2d.F |
132 |
CALC_WGHT2D |
precipo_2D(i,j)= precipo_2D(i,j) + atm_precip(ind)*wgt |
./pkg/atm2d/calc_1dto2d.F |
142 |
CALC_WGHT2D |
precipo_2D(i,j)= precipo_2D(i,j) - evapo_2D(i,j) |
./pkg/atm2d/calc_1dto2d.F |
216 |
INIT_2DFLD |
precipo_2D(i,j)= 0. _d 0 |
./pkg/atm2d/calc_1dto2d.F |
85 |
CALC_1DTO2D |
& precipo_2D(i,j)*dtatmo*(1. _d 0-iceMask(i,j,1,1)) |
./pkg/atm2d/fixed_flux_add.F |
146 |
FIXED_FLUX_ADD |
precipo_2D(i,j)= precip0(i,j,1,1) |
./pkg/atm2d/fixed_flux_add.F |
154 |
FIXED_FLUX_ADD |
precipo_2D(i,j)= precipo_2D(i,j) + |
./pkg/atm2d/relax_add.F |
152 |
RELAX_ADD |
precipo_2D(i,j)= precipo_2D(i,j) + frelflux |
./pkg/atm2d/sum_ocn_fluxes.F |
60 |
SUM_OCN_FLUXES |
& precipo_2D(i,j)*(1. _d 0-iceMask(i,j,1,1)) |