| File |
Line number |
Procedure |
Code |
|
./pkg/atm2d/ATM2D_VARS.h |
173 |
NO PROCEDURE |
& sum_solarnet, sum_slp, sum_pCO2, |
|
./pkg/atm2d/ATM2D_VARS.h |
183 |
NO PROCEDURE |
_RL sum_solarnet(1-OLx:sNx+OLx,1-OLy:sNy+OLy) ! sum of net solar into ocean, inc. thru ice (+=into ocn) |
|
./pkg/atm2d/init_sumvars.F |
38 |
INIT_SUMVARS |
sum_solarnet(i,j)= 0. _d 0 |
|
./pkg/atm2d/norm_ocn_fluxes.F |
51 |
NORM_OCN_FLUXES |
pass_solarnet(i,j)= -sum_solarnet(i,j)/nper !change sign |
|
./pkg/atm2d/sum_ocn_fluxes.F |
68 |
SUM_OCN_FLUXES |
sum_solarnet(i,j)= sum_solarnet(i,j) + |
|
./pkg/atm2d/sum_thsice_out.F |
42 |
SUM_THSICE_OUT |
sum_solarnet(i,j)= sum_solarnet(i,j) |