| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_getforcing.F |
212 |
EXF_GETFORCING |
_EXCH_XY_R8(hflux, mythid) |
|
./pkg/exf/exf_getforcing.F |
213 |
EXF_GETFORCING |
_EXCH_XY_R8(sflux, mythid) |
|
./pkg/exf/exf_getforcing.F |
216 |
EXF_GETFORCING |
_EXCH_XY_R8(swflux, mythid) |
|
./pkg/exf/exf_getforcing.F |
219 |
EXF_GETFORCING |
_EXCH_XY_R8(apressure, mythid) |
|
./pkg/exf/exf_getclim.F |
58 |
EXF_GETCLIM |
_EXCH_XY_R8(climsst, mythid) |
|
./pkg/exf/exf_getclim.F |
65 |
EXF_GETCLIM |
_EXCH_XY_R8(climsss, mythid) |
|
./pkg/aim_v23/aim_aim2dyn_exchanges.F |
40 |
AIM_AIM2DYN_EXCHANGES |
_EXCH_XY_R8( aim_drag, myThid ) |
|
./pkg/aim_v23/aim_aim2dyn_exchanges.F |
47 |
AIM_AIM2DYN_EXCHANGES |
IF (useThSIce) _EXCH_XY_R8( iceMask, myThid ) |
|
./model/src/ini_surf_dr.F |
89 |
INI_SURF_DR |
_EXCH_XY_R8( Rmin_surf, myThid ) |
|
./pkg/fizhi/update_ocean_exports.F |
103 |
UPDATE_OCEAN_EXPORTS |
_EXCH_XY_R8(sst,myThid) |
|
./pkg/fizhi/update_ocean_exports.F |
104 |
UPDATE_OCEAN_EXPORTS |
_EXCH_XY_R8(sice,myThid) |
|
./pkg/cd_code/cd_code_checkpoint.F |
86 |
CD_CODE_READ_CHECKPOINT |
_EXCH_XY_R8( etaNm1, myThid ) |
|
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
57 |
INI_PSURF |
_EXCH_XY_R8(etaN, myThid) |
|
./model/src/update_cg2d.F |
136 |
UPDATE_CG2D |
_EXCH_XY_R8(cg2d_q, myThid) |
|
./verification/rotating_tank/code/checkpoint.F |
164 |
READ_CHECKPOINT |
_EXCH_XY_R8 (etaN, myThid ) |
|
./verification/rotating_tank/code/checkpoint.F |
165 |
READ_CHECKPOINT |
_EXCH_XY_R8( etaH, myThid ) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
103 |
UPDATE_OCEAN_EXPORTS |
_EXCH_XY_R8(sst,myThid) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
104 |
UPDATE_OCEAN_EXPORTS |
_EXCH_XY_R8(sice,myThid) |
|
./model/src/ini_linear_phisurf.F |
157 |
INI_LINEAR_PHISURF |
_EXCH_XY_R8(Bo_surf, myThid) |
|
./model/src/ini_linear_phisurf.F |
158 |
INI_LINEAR_PHISURF |
_EXCH_XY_R8(recip_Bo, myThid) |
|
./model/src/ini_psurf.F |
67 |
INI_PSURF |
_EXCH_XY_R8(etaN, myThid) |
|
./model/src/checkpoint.F |
304 |
READ_CHECKPOINT |
_EXCH_XY_R8 (etaN, myThid ) |
|
./model/src/checkpoint.F |
305 |
READ_CHECKPOINT |
_EXCH_XY_R8( etaH, myThid ) |
|
./model/src/checkpoint.F |
307 |
READ_CHECKPOINT |
_EXCH_XY_R8( detaHdt, myThid ) |
|
./verification/lab_sea/code_ad_seaice_only/exf_getclim.F |
68 |
EXF_GETCLIM |
_EXCH_XY_R8(climtemp, mythid) |
|
./verification/lab_sea/code_ad_seaice_only/exf_getclim.F |
75 |
EXF_GETCLIM |
_EXCH_XY_R8(climsalt, mythid) |
|
./verification/lab_sea/code_ad_seaice_only/exf_getclim.F |
82 |
EXF_GETCLIM |
_EXCH_XY_R8(climsst, mythid) |
|
./verification/lab_sea/code_ad_seaice_only/exf_getclim.F |
89 |
EXF_GETCLIM |
_EXCH_XY_R8(climsss, mythid) |
|
./model/src/momentum_correction_step.F |
183 |
MOMENTUM_CORRECTION_STEP |
& _EXCH_XY_R8( etaN , myThid ) |
|
./model/src/solve_for_pressure.F |
304 |
SOLVE_FOR_PRESSURE |
_EXCH_XY_R8(cg2d_x, myThid ) |
|
./model/src/cg2d.F |
152 |
CG2D |
_EXCH_XY_R8( cg2d_b, myThid ) |
|
./model/src/cg2d.F |
153 |
CG2D |
_EXCH_XY_R8( cg2d_x, myThid ) |
|
./model/src/cg2d_nsa.F |
207 |
CG2D_NSA |
_EXCH_XY_R8( cg2d_b, myThid ) |
|
./model/src/cg2d_nsa.F |
208 |
CG2D_NSA |
_EXCH_XY_R8( cg2d_x, myThid ) |
|
./model/src/cg2d_nsa.F |
254 |
CG2D_NSA |
_EXCH_XY_R8( cg2d_r, myThid ) |
|
./model/src/cg2d_nsa.F |
255 |
CG2D_NSA |
_EXCH_XY_R8( cg2d_s, myThid ) |
|
./model/src/cg2d_nsa.F |
367 |
CG2D_NSA |
_EXCH_XY_R8( cg2d_s, myThid ) |
|
./model/src/cg2d_nsa.F |
442 |
CG2D_NSA |
_EXCH_XY_R8( cg2d_r, myThid ) |
|
./model/src/cg2d_nsa.F |
443 |
CG2D_NSA |
_EXCH_XY_R8( cg2d_x, myThid ) |
|
./pkg/kpp/kpp_calc.F |
688 |
KPP_CALC |
_EXCH_XY_R8 (KPPhbl , myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
108 |
MYPACKAGE_INIT_VARIA |
_EXCH_XY_R8(mypaSurf1,myThid) |
|
./pkg/mypackage/mypackage_init_varia.F |
116 |
MYPACKAGE_INIT_VARIA |
_EXCH_XY_R8(mypaSurf2,myThid) |
|
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
52 |
OCN_CPL_READ_PICKUP |
_EXCH_XY_R8( atmSLPr , myThid ) |
|
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
53 |
OCN_CPL_READ_PICKUP |
_EXCH_XY_R8( HeatFlux , myThid ) |
|
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
54 |
OCN_CPL_READ_PICKUP |
_EXCH_XY_R8( qShortWave, myThid ) |
|
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
56 |
OCN_CPL_READ_PICKUP |
_EXCH_XY_R8( FWFlux , myThid ) |
|
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
57 |
OCN_CPL_READ_PICKUP |
_EXCH_XY_R8( iceSaltFlx, myThid ) |
|
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
58 |
OCN_CPL_READ_PICKUP |
_EXCH_XY_R8( seaIceMass, myThid ) |
|
./pkg/ecco/cost_ssh.F |
210 |
COST_SSH |
_EXCH_XY_R8( etaN, mythid ) |
|
./pkg/ecco/cost_forcing_gen.F |
246 |
COST_FORCING_GEN |
_EXCH_XY_R8(tmpfld2d, mythid) |
|
./pkg/ecco/cost_obcs_ageos.F |
238 |
COST_OBCS_AGEOS |
_EXCH_XY_R8(rholoc , myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
298 |
COST_OBCS_AGEOS |
_EXCH_XY_R8(rholoc , myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
357 |
COST_OBCS_AGEOS |
_EXCH_XY_R8(rholoc , myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
416 |
COST_OBCS_AGEOS |
_EXCH_XY_R8(rholoc , myThid) |
|
./pkg/ctrl/ctrl_map_ini_ecco.F |
456 |
CTRL_MAP_INI_ECCO |
_EXCH_XY_R8( etaN, mythid ) |
|
./pkg/ctrl/ctrl_map_ini.F |
541 |
CTRL_MAP_INI |
_EXCH_XY_R8( bottomdragfld, mythid ) |
|
./pkg/ctrl/ctrl_map_ini.F |
559 |
CTRL_MAP_INI |
_EXCH_XY_R8( etaN, mythid ) |
|
./pkg/thsice/thsice_main.F |
245 |
THSICE_MAIN |
_EXCH_XY_R8( iceMask, myThid ) |
|
./pkg/thsice/thsice_main.F |
246 |
THSICE_MAIN |
_EXCH_XY_R8( iceHeight, myThid ) |
|
./pkg/thsice/thsice_main.F |
247 |
THSICE_MAIN |
_EXCH_XY_R8( snowHeight, myThid ) |
|
./pkg/thsice/thsice_main.F |
248 |
THSICE_MAIN |
_EXCH_XY_R8( Qice1, myThid ) |
|
./pkg/thsice/thsice_main.F |
249 |
THSICE_MAIN |
_EXCH_XY_R8( Qice2, myThid ) |
|
./pkg/thsice/thsice_ini_vars.F |
125 |
THSICE_INI_VARS |
_EXCH_XY_R8(iceMask,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
126 |
THSICE_INI_VARS |
_EXCH_XY_R8(iceHeight, myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
127 |
THSICE_INI_VARS |
_EXCH_XY_R8(snowHeight,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
128 |
THSICE_INI_VARS |
_EXCH_XY_R8(Tsrf, myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
129 |
THSICE_INI_VARS |
_EXCH_XY_R8(Tice1, myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
130 |
THSICE_INI_VARS |
_EXCH_XY_R8(Tice2, myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
131 |
THSICE_INI_VARS |
_EXCH_XY_R8(Qice1, myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
132 |
THSICE_INI_VARS |
_EXCH_XY_R8(Qice2, myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
133 |
THSICE_INI_VARS |
_EXCH_XY_R8(snowAge,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
135 |
THSICE_INI_VARS |
_EXCH_XY_R8(dFdT, myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
129 |
SHAP_FILT_TRACER_S1 |
_EXCH_XY_R8( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
175 |
SHAP_FILT_TRACER_S1 |
_EXCH_XY_R8( field, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
76 |
SHAP_FILT_TRACER_S1 |
_EXCH_XY_R8( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
100 |
SHAP_FILT_TRACER_S2 |
_EXCH_XY_R8( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
234 |
SHAP_FILT_TRACER_S2 |
_EXCH_XY_R8( field, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
125 |
SHAP_FILT_TRACER_S4 |
_EXCH_XY_R8( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
173 |
SHAP_FILT_TRACER_S4 |
_EXCH_XY_R8( field, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
75 |
SHAP_FILT_TRACER_S4 |
_EXCH_XY_R8( tmpFld, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
88 |
SEAICE_READ_PICKUP |
_EXCH_XY_R8(TICE , myThid ) |
|
./pkg/seaice/seaice_pickup.F |
89 |
SEAICE_READ_PICKUP |
_EXCH_XY_R8(YNEG , myThid ) |
|
./pkg/seaice/seaice_pickup.F |
90 |
SEAICE_READ_PICKUP |
_EXCH_XY_R8(HSNOW, myThid ) |
|
./pkg/seaice/seaice_pickup.F |
92 |
SEAICE_READ_PICKUP |
_EXCH_XY_R8(seaice_sigma1 , myThid ) |
|
./pkg/seaice/seaice_pickup.F |
93 |
SEAICE_READ_PICKUP |
_EXCH_XY_R8(seaice_sigma2 , myThid ) |
|
./pkg/seaice/seaice_pickup.F |
94 |
SEAICE_READ_PICKUP |
_EXCH_XY_R8(seaice_sigma12, myThid ) |
|
./pkg/seaice/seaice_calc_viscosities.F |
149 |
SEAICE_CALC_VISCOSITIES |
_EXCH_XY_R8( eta, myThid) |
|
./pkg/seaice/seaice_calc_viscosities.F |
150 |
SEAICE_CALC_VISCOSITIES |
_EXCH_XY_R8( zeta, myThid) |
|
./pkg/seaice/seaice_calc_viscosities.F |
151 |
SEAICE_CALC_VISCOSITIES |
_EXCH_XY_R8(press, myThid) |
|
./pkg/seaice/seaice_calc_viscosities.F |
153 |
SEAICE_CALC_VISCOSITIES |
_EXCH_XY_R8(seaice_div , myThid) |
|
./pkg/seaice/seaice_calc_viscosities.F |
154 |
SEAICE_CALC_VISCOSITIES |
_EXCH_XY_R8(seaice_tension, myThid) |
|
./pkg/seaice/seaice_calc_viscosities.F |
155 |
SEAICE_CALC_VISCOSITIES |
_EXCH_XY_R8(seaice_shear , myThid) |
|
./pkg/seaice/seaice_exch.F |
40 |
SEAICE_EXCH |
_EXCH_XY_R8(tempVar , myThid ) |
|
./pkg/seaice/dynsolver.F |
243 |
DYNSOLVER |
_EXCH_XY_R8(ETA, myThid) |
|
./pkg/seaice/dynsolver.F |
244 |
DYNSOLVER |
_EXCH_XY_R8(ZETA, myThid) |
|
./pkg/seaice/dynsolver.F |
245 |
DYNSOLVER |
_EXCH_XY_R8(PRESS, myThid) |
|
./pkg/seaice/dynsolver.F |
354 |
DYNSOLVER |
_EXCH_XY_R8(ETA, myThid) |
|
./pkg/seaice/dynsolver.F |
355 |
DYNSOLVER |
_EXCH_XY_R8(ZETA, myThid) |
|
./pkg/seaice/dynsolver.F |
356 |
DYNSOLVER |
_EXCH_XY_R8(PRESS, myThid) |
|
./pkg/seaice/seaice_init.F |
195 |
SEAICE_INIT |
_EXCH_XY_R8(seaiceMaskU, myThid) |
|
./pkg/seaice/seaice_init.F |
196 |
SEAICE_INIT |
_EXCH_XY_R8(seaiceMaskV, myThid) |
|
./pkg/seaice/seaice_init.F |
198 |
SEAICE_INIT |
_EXCH_XY_R8(UVM, myThid) |
|
./pkg/seaice/seaice_init.F |
263 |
SEAICE_INIT |
_EXCH_XY_R8(ZETA,myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
114 |
SEAICE_DYNSOLVER |
_EXCH_XY_R8( seaiceMaskU, myThid ) |
|
./pkg/seaice/seaice_dynsolver.F |
115 |
SEAICE_DYNSOLVER |
_EXCH_XY_R8( seaiceMaskV, myThid ) |
|
./pkg/seaice/seaice_evp.F |
277 |
SEAICE_EVP |
_EXCH_XY_R8( seaice_sigma1 , myThid ) |
|
./pkg/seaice/seaice_evp.F |
278 |
SEAICE_EVP |
_EXCH_XY_R8( seaice_sigma2 , myThid ) |
|
./pkg/seaice/seaice_evp.F |
279 |
SEAICE_EVP |
_EXCH_XY_R8( seaice_sigma12, myThid ) |
|
./pkg/seaice/seaice_model.F |
69 |
SEAICE_MODEL |
_EXCH_XY_R8( atemp, myThid ) |
|
./pkg/seaice/seaice_model.F |
70 |
SEAICE_MODEL |
_EXCH_XY_R8( aqh, myThid ) |
|
./pkg/seaice/seaice_model.F |
71 |
SEAICE_MODEL |
_EXCH_XY_R8( lwdown, myThid ) |
|
./pkg/seaice/seaice_model.F |
72 |
SEAICE_MODEL |
_EXCH_XY_R8( swdown, mythid ) |
|
./pkg/seaice/seaice_model.F |
73 |
SEAICE_MODEL |
_EXCH_XY_R8( precip, myThid ) |
|
./pkg/seaice/seaice_model.F |
74 |
SEAICE_MODEL |
_EXCH_XY_R8( evap, myThid ) |
|
./pkg/seaice/seaice_model.F |
75 |
SEAICE_MODEL |
_EXCH_XY_R8( runoff, myThid ) |
|
./pkg/seaice/diffus.F |
103 |
DIFFUS |
_EXCH_XY_R8(HEFF1, myThid) |