| 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 |
133 |
NO PROCEDURE |
_RL solarnet_ocn_2D(1:sNx,1:sNy) ! solar incoming to ocean (+=into ocean) |
|
./pkg/atm2d/calc_1dto2d.F |
133 |
CALC_WGHT2D |
solarnet_ocn_2D(i,j)=solarnet_ocn_2D(i,j) + atm_solar_ocn(ind)*wgt |
|
./pkg/atm2d/calc_1dto2d.F |
218 |
INIT_2DFLD |
solarnet_ocn_2D(i,j)= 0. _d 0 |
|
./pkg/atm2d/sum_ocn_fluxes.F |
69 |
SUM_OCN_FLUXES |
& solarnet_ocn_2D(i,j)*(1. _d 0-iceMask(i,j,1,1)) |