| 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 |
113 |
NO PROCEDURE |
_RL ctice(jm0) ! zonal mean seaice surface temp |
|
./pkg/atm2d/calc_1dto2d.F |
166 |
CALC_WGHT2D |
& (Tsrf(i,j,1,1)-ctice(ind))*wgt |
|
./pkg/atm2d/calc_1dto2d.F |
168 |
CALC_WGHT2D |
& (Tsrf(i,j,1,1)-ctice(ind))*wgt |
|
./pkg/atm2d/calc_1dto2d.F |
177 |
CALC_WGHT2D |
& (Tsrf(i,j,1,1)-ctice(ind))*wgt |
|
./pkg/atm2d/calc_1dto2d.F |
179 |
CALC_WGHT2D |
& (Tsrf(i,j,1,1)-ctice(ind))*wgt |
|
./pkg/atm2d/calc_zonal_means.F |
104 |
CALC_ZONAL_MEANS |
ctice(atm_oc_ind(j)+1)= ctice(atm_oc_ind(j)+1) + |
|
./pkg/atm2d/calc_zonal_means.F |
124 |
CALC_ZONAL_MEANS |
ctice(j_atm)= ctice(j_atm)/ocnArea(j_atm)/cfice(j_atm) |
|
./pkg/atm2d/calc_zonal_means.F |
142 |
CALC_ZONAL_MEANS |
mmtice(j_atm)= ctice(j_atm) |
|
./pkg/atm2d/calc_zonal_means.F |
157 |
CALC_ZONAL_MEANS |
mmtice(1)= ctice(2) |
|
./pkg/atm2d/calc_zonal_means.F |
158 |
CALC_ZONAL_MEANS |
mmtice(jm0)= ctice(jm0-1) |
|
./pkg/atm2d/calc_zonal_means.F |
56 |
CALC_ZONAL_MEANS |
ctice(j_atm)=0. _d 0 |
|
./pkg/atm2d/calc_zonal_means.F |
84 |
CALC_ZONAL_MEANS |
ctice(atm_oc_ind(j))=ctice(atm_oc_ind(j)) + Tsrf(i,j,1,1) |