File |
Line number |
Procedure |
Code |
./pkg/atm2d/ATM2D_VARS.h |
110 |
NO PROCEDURE |
COMMON/OCN_ZONALMN/ ctocn, ctice, cfice, csAlb, csAlbNIR, |
./pkg/atm2d/ATM2D_VARS.h |
115 |
NO PROCEDURE |
_RL csAlb(jm0) ! zonal mean seaice albedo |
./pkg/atm2d/calc_zonal_means.F |
106 |
CALC_ZONAL_MEANS |
csAlb(atm_oc_ind(j)+1)= csAlb(atm_oc_ind(j)+1) + |
./pkg/atm2d/calc_zonal_means.F |
125 |
CALC_ZONAL_MEANS |
csAlb(j_atm)= csAlb(j_atm)/ocnArea(j_atm)/cfice(j_atm) |
./pkg/atm2d/calc_zonal_means.F |
143 |
CALC_ZONAL_MEANS |
mmsAlb(j_atm)= csAlb(j_atm) |
./pkg/atm2d/calc_zonal_means.F |
159 |
CALC_ZONAL_MEANS |
mmsAlb(1)= csAlb(2) |
./pkg/atm2d/calc_zonal_means.F |
160 |
CALC_ZONAL_MEANS |
mmsAlb(jm0)= csAlb(jm0-1) |
./pkg/atm2d/calc_zonal_means.F |
57 |
CALC_ZONAL_MEANS |
csAlb(j_atm)=0. _d 0 |
./pkg/atm2d/calc_zonal_means.F |
86 |
CALC_ZONAL_MEANS |
csAlb(atm_oc_ind(j))=csAlb(atm_oc_ind(j)) + siceAlb(i,j,1,1) |