File |
Line number |
Procedure |
Code |
./pkg/atm2d/ATM2D_VARS.h |
279 |
NO PROCEDURE |
COMMON/FROM_OCN/ sstFromOcn, sssFromOcn, oFluxCO2, mlDepth |
./pkg/atm2d/ATM2D_VARS.h |
280 |
NO PROCEDURE |
_RL sstFromOcn(1:sNx,1:sNy) |
./pkg/atm2d/calc_1dto2d.F |
161 |
CALC_WGHT2D |
& (sstFromOcn(i,j)-ctocn(ind))*wgt |
./pkg/atm2d/calc_1dto2d.F |
163 |
CALC_WGHT2D |
& (sstFromOcn(i,j)-ctocn(ind))*wgt |
./pkg/atm2d/calc_1dto2d.F |
172 |
CALC_WGHT2D |
& (sstFromOcn(i,j)-ctocn(ind))*wgt |
./pkg/atm2d/calc_1dto2d.F |
174 |
CALC_WGHT2D |
& (sstFromOcn(i,j)-ctocn(ind))*wgt |
./pkg/atm2d/calc_zonal_means.F |
77 |
CALC_ZONAL_MEANS |
& sstFromOcn(i,j) * rA(i,j,1,1) * |
./pkg/atm2d/calc_zonal_means.F |
97 |
CALC_ZONAL_MEANS |
& sstFromOcn(i,j) * rA(i,j,1,1) * |
./pkg/atm2d/get_ocnvars.F |
124 |
GET_OCNVARS |
tOceMxl(i,j,1,1)= sstFromOcn(i,j) |
./pkg/atm2d/get_ocnvars.F |
54 |
GET_OCNVARS |
sstFromOcn(i,j)= SST_ocn(i,j) |
./pkg/atm2d/get_ocnvars.F |
72 |
GET_OCNVARS |
sstFromOcn(i,j) = theta(i,j,1,1,1) |
./pkg/atm2d/relax_add.F |
105 |
RELAX_ADD |
sstRelax(i,j)= sstFromOcn(i,j) |
./pkg/atm2d/relax_add.F |
126 |
RELAX_ADD |
qrelflux= lambdaTheta*(sstFromOcn(i,j)-sstRelax(i,j)) |
./pkg/atm2d/sum_yr_end_diags.F |
61 |
SUM_YR_END_DIAGS |
sst_tave= sst_tave + rA(i,j,1,1)*sstFromOcn(i,j) |