| 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 |
116 |
NO PROCEDURE |
_RL csAlbNIR(jm0) ! zonal mean seaice albedo |
|
./pkg/atm2d/calc_zonal_means.F |
108 |
CALC_ZONAL_MEANS |
csAlbNIR(atm_oc_ind(j)+1)= csAlbNIR(atm_oc_ind(j)+1) + |
|
./pkg/atm2d/calc_zonal_means.F |
126 |
CALC_ZONAL_MEANS |
csAlbNIR(j_atm)= csAlbNIR(j_atm)/ocnArea(j_atm)/cfice(j_atm) |
|
./pkg/atm2d/calc_zonal_means.F |
144 |
CALC_ZONAL_MEANS |
mmsAlbNIR(j_atm)= csAlbNIR(j_atm) |
|
./pkg/atm2d/calc_zonal_means.F |
161 |
CALC_ZONAL_MEANS |
mmsAlbNIR(1)= csAlbNIR(2) |
|
./pkg/atm2d/calc_zonal_means.F |
162 |
CALC_ZONAL_MEANS |
mmsAlbNIR(jm0)= csAlbNIR(jm0-1) |
|
./pkg/atm2d/calc_zonal_means.F |
58 |
CALC_ZONAL_MEANS |
csAlbNIR(j_atm)=0. _d 0 |
|
./pkg/atm2d/calc_zonal_means.F |
88 |
CALC_ZONAL_MEANS |
csAlbNIR(atm_oc_ind(j))=csAlbNIR(atm_oc_ind(j)) + |