| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_phys.F |
111 |
ECCO_PHYS |
sterGloH=VOLsumGlob_0/globalArea |
|
./model/inc/GRID.h |
317 |
NO PROCEDURE |
& gravitySign, rkSign, globalArea |
|
./model/inc/GRID.h |
332 |
NO PROCEDURE |
_RL globalArea |
|
./pkg/gchem/gchem_surfmean.F |
56 |
GCHEM_SURFMEAN |
gsm_tracer = sumTracer/globalArea |
|
./model/src/calc_wsurf_tr.F |
100 |
CALC_WSURF_TR |
TsurfCor = wT_Mean / globalArea |
|
./model/src/calc_wsurf_tr.F |
101 |
CALC_WSURF_TR |
SsurfCor = wS_Mean / globalArea |
|
./model/src/calc_wsurf_tr.F |
98 |
CALC_WSURF_TR |
IF ( globalArea.GT.0. ) THEN |
|
./pkg/monitor/mon_ke.F |
319 |
MON_KE |
IF ( globalArea.GT.0. ) totAMu = totAMu/globalArea |
|
./pkg/monitor/mon_ke.F |
320 |
MON_KE |
IF ( globalArea.GT.0. ) totAMs = totAMs/globalArea |
|
./model/src/config_summary.F |
963 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( globalArea, INDEX_NONE, 'globalArea =', |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
85 |
PTRACERS_CALC_WSURF_TR |
IF ( globalArea.GT.0. ) THEN |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
88 |
PTRACERS_CALC_WSURF_TR |
meanSurfCorPTr(iTr) = wT_Mean(iTr) / globalArea |
|
./model/src/forcing_surf_relax.F |
185 |
FORCING_SURF_RELAX |
IF ( globalArea.GT.zeroRL ) globAver = globAver / globalArea |
|
./model/src/forcing_surf_relax.F |
221 |
FORCING_SURF_RELAX |
IF ( globalArea.GT.zeroRL ) globAver = globAver / globalArea |
|
./pkg/seaice/seaice_growth.F |
2616 |
SEAICE_GROWTH |
FWF2HFsiGlob=HeatCapacity_Cp * temp_EvPrRn * globalArea |
|
./pkg/seaice/seaice_growth.F |
2624 |
SEAICE_GROWTH |
tmpscal0=FWFsiGlob / globalArea |
|
./pkg/seaice/seaice_growth.F |
2627 |
SEAICE_GROWTH |
tmpscal1=FWFsiGlob / globalArea * FWF2HFsiGlob / globalArea |
|
./pkg/seaice/seaice_growth.F |
2629 |
SEAICE_GROWTH |
tmpscal2=HFsiGlob / globalArea |
|
./pkg/seaice/seaice_init_varia.F |
665 |
SEAICE_INIT_VARIA |
& scalarProductMetric(i,1,bi,bj)/globalArea |
|
./model/src/ini_cg2d.F |
169 |
INI_CG2D |
& * globalArea / deltaTmom |
|
./model/src/ini_cg2d.F |
180 |
INI_CG2D |
& 'cg2dTolerance =', cg2dTolerance, ' (Area=',globalArea,')' |
|
./pkg/seaice/seaice_lsr.F |
1123 |
SEAICE_RESIDUAL |
IF ( residU.GT.0. ) residU = SQRT(residU/globalArea) |
|
./pkg/seaice/seaice_lsr.F |
1124 |
SEAICE_RESIDUAL |
IF ( residV.GT.0. ) residV = SQRT(residV/globalArea) |
|
./model/src/ini_global_domain.F |
97 |
INI_GLOBAL_DOMAIN |
globalArea = threadArea |
|
./pkg/thsice/thsice_advdiff.F |
138 |
THSICE_ADVDIFF |
meanCellArea = globalArea / meanCellArea |
|
./pkg/thsice/thsice_balance_frw.F |
83 |
THSICE_BALANCE_FRW |
IF ( globalArea.GT.0. _d 0 ) THEN |
|
./pkg/thsice/thsice_balance_frw.F |
84 |
THSICE_BALANCE_FRW |
sumPrc = sumPrc / globalArea |
|
./pkg/thsice/thsice_balance_frw.F |
85 |
THSICE_BALANCE_FRW |
sumFrW = sumFrW / globalArea |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
145 |
CTRL_MAP_GENTIM2D |
& LOCsumGlob/globalArea*maskC(i,j,1,bi,bj) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
145 |
CTRL_MAP_GENTIM2D |
& LOCsumGlob/globalArea*maskC(i,j,1,bi,bj) |
|
./model/src/solve_for_pressure.F |
166 |
SOLVE_FOR_PRESSURE |
IF (globalArea.GT.0.) tmpFac = |
|
./model/src/solve_for_pressure.F |
167 |
SOLVE_FOR_PRESSURE |
& freeSurfFac*deltaTFreeSurf*mass2rUnit*sumEmP/globalArea |
|
./pkg/atm2d/yr_end_diags.F |
39 |
YR_END_DIAGS |
norm_factor = globalArea * secYr / dtcouplo |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
138 |
CTRL_MAP_GENTIM2D |
& LOCsumGlob/globalArea*maskC(i,j,1,bi,bj) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
146 |
CTRL_MAP_GENTIM2D |
genprecipGloH=LOCsumGlob/globalArea |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
206 |
DIAGNOSTICS_CALC_PHIVEL |
& * globalArea / deltaTMom |
|
./pkg/ecco/cost_averagesfields.F |
202 |
COST_AVERAGESFIELDS |
sterGloH=VOLsumGlob_0/globalArea |
|
./pkg/ecco/cost_gencost_sshv4.F |
1204 |
COST_GENCOST_SSHV4 |
& ( slaoffset_sum.GT.0.25 _d 0 * globalArea ) ) THEN |