File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_init_veg.F |
124 |
FIZHI_INIT_VEG |
biglobal=bi+(myXGlobalLo-1)/im |
./pkg/fizhi/fizhi_init_vegsurftiles.F |
90 |
FIZHI_INIT_VEGSURFTILES |
bislot = myXGlobalLo-1+(bi-1)*sNx |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
119 |
FIZHI_WRITE_VEGTILES |
iG = bi+(myXGlobalLo-1)/sNx |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
374 |
FIZHI_READ_VEGTILES |
iG = bi+(myXGlobalLo-1)/sNx |
./pkg/fizhi/update_ocean_exports.F |
85 |
UPDATE_OCEAN_EXPORTS |
bislot = myXGlobalLo-1+(bi-1)*sNx |
./pkg/flt/flt_exchg.F |
92 |
FLT_EXCHG |
wSide = myXGlobalLo+bi .LE.2 |
./pkg/flt/flt_exchg.F |
93 |
FLT_EXCHG |
eSide = myXGlobalLo+bi*sNx.GT.Nx |
./pkg/flt/flt_init_varia.F |
189 |
FLT_INIT_VARIA |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/flt/flt_runga2.F |
101 |
FLT_RUNGA2 |
iG = myXGlobalLo + (bi-1)*sNx + ic-1 |
./pkg/flt/flt_runga4.F |
101 |
FLT_RUNGA4 |
iG = myXGlobalLo + (bi-1)*sNx + ic-1 |
./pkg/flt/flt_traj.F |
99 |
FLT_TRAJ |
i0x = DFLOAT( myXGlobalLo-1 + (bi-1)*sNx ) |
./pkg/flt/flt_up.F |
88 |
FLT_UP |
i0x = DFLOAT( myXGlobalLo-1 + (bi-1)*sNx ) |
./pkg/grdchk/grdchk_readparms.F |
164 |
GRDCHK_READPARMS |
iLocTile = iGloTile - (myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_check4file.F |
93 |
MDS_CHECK4FILE |
iG = 1+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_read_field.F |
402 |
MDS_READ_FIELD |
tBx = myXGlobalLo-1 + (bi-1)*sNx |
./pkg/mdsio/mdsio_read_field.F |
453 |
MDS_READ_FIELD |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_read_meta.F |
157 |
MDS_READ_META |
iG = 1+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_read_section.F |
169 |
MDS_READ_SEC_XZ |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_read_section.F |
215 |
MDS_READ_SEC_XZ |
iG = myXGlobalLo-1 + (bi-1)*sNx |
./pkg/mdsio/mdsio_read_section.F |
447 |
MDS_READ_SEC_YZ |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_read_section.F |
493 |
MDS_READ_SEC_YZ |
iG = (myXGlobalLo-1)/sNx + (bi-1) |
./pkg/mdsio/mdsio_read_tape.F |
206 |
MDS_READ_TAPE |
iG = 1 + (myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_readvec_loc.F |
163 |
MDS_READVEC_LOC |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_wr_metafiles.F |
160 |
MDS_WR_METAFILES |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_wr_metafiles.F |
167 |
MDS_WR_METAFILES |
tBx = myXGlobalLo-1 + (bi-1)*sNx |
./pkg/mdsio/mdsio_write_field.F |
448 |
MDS_WRITE_FIELD |
tBx = myXGlobalLo-1 + (bi-1)*sNx |
./pkg/mdsio/mdsio_write_field.F |
497 |
MDS_WRITE_FIELD |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_write_field.F |
531 |
MDS_WRITE_FIELD |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_write_section.F |
155 |
MDS_WRITE_SEC_XZ |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_write_section.F |
186 |
MDS_WRITE_SEC_XZ |
iG = myXGlobalLo-1 + (bi-1)*sNx |
./pkg/mdsio/mdsio_write_section.F |
408 |
MDS_WRITE_SEC_YZ |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_write_section.F |
439 |
MDS_WRITE_SEC_YZ |
iG = (myXGlobalLo-1)/sNx + (bi-1) |
./pkg/mdsio/mdsio_write_tape.F |
236 |
MDS_WRITE_TAPE |
iG = 1 + (myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_write_tape.F |
297 |
MDS_WRITE_TAPE |
iG = 1 + (myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_writelocal.F |
303 |
MDS_WRITELOCAL |
tBx = myXGlobalLo-1 + (bi-1)*sNx |
./pkg/mdsio/mdsio_writelocal.F |
351 |
MDS_WRITELOCAL |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_writelocal.F |
385 |
MDS_WRITELOCAL |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_writevec_loc.F |
161 |
MDS_WRITEVEC_LOC |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mdsio/mdsio_writevec_loc.F |
227 |
MDS_WRITEVEC_LOC |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/mnc/mnc_cw_cvars.F |
76 |
MNC_CW_WRITE_CVAR |
xtmin = sNx * ( bi+(myXGlobalLo-1)/sNx - 1 ) |
./pkg/mnc/mnc_cwrapper.F |
638 |
MNC_CW_GET_TILE_NUM |
iG = bi+(myXGlobalLo-1)/sNx |
./pkg/mnc/mnc_cwrapper.F |
731 |
MNC_CW_GET_XYFO |
ixoff = myXGlobalLo + bi * sNx |
./pkg/monitor/mon_vort3.F |
163 |
MON_VORT3 |
iG = bi+(myXGlobalLo-1)/sNx |
./pkg/obcs/obcs_readparms.F |
653 |
OBCS_READPARMS |
iG = myXGlobalLo+(bi-1)*sNx+i-1 |
./pkg/obcs/obcs_readparms.F |
661 |
OBCS_READPARMS |
iG = myXGlobalLo+(bi-1)*sNx+i-1 |
./pkg/obcs/obcs_readparms.F |
669 |
OBCS_READPARMS |
iG = myXGlobalLo+(bi-1)*sNx+i-1 |
./pkg/ocn_compon_interf/cpl_register.F |
99 |
CPL_REGISTER |
iG0 = myXGlobalLo+(bi-1)*sNx |
./pkg/profiles/cost_profiles.F |
140 |
COST_PROFILES |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
./pkg/profiles/cost_profiles.F |
419 |
COST_PROFILES |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
./pkg/profiles/profiles_init_fixed.F |
668 |
PROFILES_INIT_FIXED |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
./pkg/profiles/profiles_init_fixed.F |
875 |
PROFILES_INIT_FIXED |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
./pkg/regrid/regrid_init_varia.F |
101 |
REGRID_INIT_VARIA |
iG = bi + (myXGlobalLo-1)/sNx |
./pkg/regrid/regrid_init_varia.F |
107 |
REGRID_INIT_VARIA |
iminx = myXGlobalLo |
./pkg/regrid/regrid_init_varia.F |
108 |
REGRID_INIT_VARIA |
imaxx = myXGlobalLo + sNx - 1 |
./pkg/seaice/seaice_cost_export.F |
48 |
SEAICE_COST_EXPORT |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
./model/src/ini_cori.F |
154 |
INI_CORI |
iG = bi+(myXGlobalLo-1)/sNx |
./model/src/ini_curvilinear_grid.F |
269 |
INI_CURVILINEAR_GRID |
iG = bi+(myXGlobalLo-1)/sNx |
./model/src/ini_depths.F |
232 |
INI_DEPTHS |
iG = myXGlobalLo-1+(bi-1)*sNx+i |
./model/src/ini_depths.F |
254 |
INI_DEPTHS |
iG = myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/streamice/streamice_adv_flux_fl_x.F |
78 |
STREAMICE_ADV_FLUX_FL_X |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./pkg/streamice/streamice_adv_flux_fl_y.F |
72 |
STREAMICE_ADV_FLUX_FL_Y |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./pkg/streamice/streamice_adv_front.F |
122 |
STREAMICE_ADV_FRONT |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./pkg/streamice/streamice_advect_2dtracer.F |
120 |
STREAMICE_ADVECT_2DTRACER |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./pkg/streamice/streamice_advect_2dtracer.F |
169 |
STREAMICE_ADVECT_2DTRACER |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./pkg/streamice/streamice_advect_thickness.F |
228 |
STREAMICE_ADVECT_THICKNESS |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./pkg/streamice/streamice_advect_thickness.F |
271 |
STREAMICE_ADVECT_THICKNESS |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./pkg/streamice/streamice_advect_thickness.F |
339 |
STREAMICE_ADVECT_THICKNESS |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./pkg/streamice/streamice_cg_functions.F |
80 |
STREAMICE_CG_ACTION |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./pkg/streamice/streamice_driving_stress.F |
104 |
STREAMICE_DRIVING_STRESS |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./pkg/streamice/streamice_driving_stress.F |
52 |
STREAMICE_DRIVING_STRESS |
IF (myXGlobalLo.eq.1) at_west_bdry = .true. |
./pkg/streamice/streamice_driving_stress.F |
54 |
STREAMICE_DRIVING_STRESS |
IF (myXGlobalLo-1+sNx*nSx.eq.Nx) |
./pkg/streamice/streamice_driving_stress_ppm.F |
44 |
STREAMICE_DRIVING_STRESS_PPM |
IF (myXGlobalLo.eq.1) at_west_bdry = .true. |
./pkg/streamice/streamice_driving_stress_ppm.F |
46 |
STREAMICE_DRIVING_STRESS_PPM |
IF (myXGlobalLo-1+sNx*nSx.eq.Nx) |
./pkg/streamice/streamice_driving_stress_ppm.F |
73 |
STREAMICE_DRIVING_STRESS_PPM |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./model/src/ini_local_grid.F |
123 |
INI_LOCAL_GRID |
iG0 = myXGlobalLo - 1 + (bi-1)*sNx |
./pkg/streamice/streamice_init_fixed.F |
315 |
STREAMICE_INIT_FIXED |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./pkg/streamice/streamice_init_varia.F |
201 |
STREAMICE_INIT_VARIA |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./pkg/streamice/streamice_init_varia.F |
255 |
STREAMICE_INIT_VARIA |
Gi = (myXGlobalLo-1)+(bi-1)*sNx+i |
./verification/OpenAD/code_ad_singlelayer/cost_test.F |
67 |
COST_TEST |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
232 |
INI_DEPTHS |
iG = myXGlobalLo-1+(bi-1)*sNx+i |
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
254 |
INI_DEPTHS |
iG = myXGlobalLo-1+(bi-1)*sNx+i |
./verification/bottom_ctrl_5x5/code_ad/cost_test.F |
53 |
COST_TEST |
ig = myXGlobalLo-1+(bi-1)*sNx+I |
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
85 |
UPDATE_OCEAN_EXPORTS |
bislot = myXGlobalLo-1+(bi-1)*sNx |
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F |
46 |
UPDATE_OCEAN_EXPORTS |
biglobal=bi+(myXGlobalLo-1)/im2 |
./verification/global_ocean.cs32x15/code_ad/cost_test.F |
68 |
COST_TEST |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
./verification/hs94.1x64x5/code_ad/cost_test.F |
65 |
COST_TEST |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
./verification/hs94.1x64x5/code_oad/cost_test.F |
65 |
COST_TEST |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
./verification/isomip/code_ad/cost_test.F |
68 |
COST_TEST |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
./verification/isomip/code_oad/cost_test.F |
68 |
COST_TEST |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
./verification/rotating_tank/code/apply_forcing.F |
699 |
APPLY_FORCING_T |
iG = myXGlobalLo-1+(bi-1)*sNx+I |
./eesupp/src/gather_xz.F |
36 |
GATHER_XZ |
iG = myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/atm_compon_interf/cpl_register.F |
100 |
CPL_REGISTER |
iG0 = myXGlobalLo+(bi-1)*sNx |
./eesupp/src/global_sum_tile.F |
177 |
GLOBAL_SUM_TILE_RL |
biG = (myXGlobalLo-1)/sNx+bi |
./eesupp/src/ini_procs.F |
173 |
INI_PROCS |
myXGlobalLo = mpiXGlobalLo |
./eesupp/src/ini_procs.F |
181 |
INI_PROCS |
itemp(1) = myXGlobalLo |
./eesupp/src/ini_procs.F |
76 |
INI_PROCS |
myXGlobalLo = 1 |
./eesupp/src/print.F |
1305 |
PRINT_MAPRL |
& '(',myXGlobalLo-1+(bxMin-1)*sNx+iMin, |
./eesupp/src/print.F |
1306 |
PRINT_MAPRL |
& ':',myXGlobalLo-1+(bxMax-1)*sNx+iMax, |
./eesupp/src/print.F |
1344 |
PRINT_MAPRL |
accBase = myXGlobalLo |
./eesupp/src/print.F |
1396 |
PRINT_MAPRL |
pltBase = myXGlobalLo |
./eesupp/src/print.F |
1402 |
PRINT_MAPRL |
accBase = myXGlobalLo |
./eesupp/src/print.F |
871 |
PRINT_MAPRS |
& '(',myXGlobalLo-1+(bxMin-1)*sNx+iMin, |
./eesupp/src/print.F |
872 |
PRINT_MAPRS |
& ':',myXGlobalLo-1+(bxMax-1)*sNx+iMax, |
./eesupp/src/print.F |
910 |
PRINT_MAPRS |
accBase = myXGlobalLo |
./eesupp/src/print.F |
962 |
PRINT_MAPRS |
pltBase = myXGlobalLo |
./eesupp/src/print.F |
968 |
PRINT_MAPRS |
accBase = myXGlobalLo |
./pkg/cheapaml/cheapaml_copy_edges.F |
54 |
CHEAPAML_COPY_EDGES |
iG = 1 + myXGlobalLo-1+(bi-1)*sNx |
./pkg/cheapaml/cheapaml_copy_edges.F |
62 |
CHEAPAML_COPY_EDGES |
iG = sNx + myXGlobalLo-1+(bi-1)*sNx |
./pkg/cheapaml/cheapaml_fields_load.F |
652 |
CHEAPAML_FIELDS_LOAD |
iG=myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/cheapaml/cheapaml_init_fixed.F |
193 |
CHEAPAML_INIT_FIXED |
iG = myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/cheapaml/cheapaml_init_fixed.F |
97 |
CHEAPAML_INIT_FIXED |
iG=myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/cheapaml/cheapaml_init_varia.F |
105 |
CHEAPAML_INIT_VARIA |
iG = myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/cheapaml/cheapaml_init_varia.F |
215 |
CHEAPAML_INIT_VARIA |
iG=myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/cheapaml/gad_2d_calc_rhs.F |
145 |
GAD_2D_CALC_RHS |
iG=myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/cheapaml/gad_2d_calc_rhs.F |
209 |
GAD_2D_CALC_RHS |
iG=myXGlobalLo-1+(bi-1)*sNx+i |
./eesupp/src/scatter_xz.F |
37 |
SCATTER_XZ |
iG = myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/cost/cost_atlantic_heat.F |
141 |
COST_ATLANTIC_HEAT |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/cost/cost_atlantic_heat.F |
74 |
COST_ATLANTIC_HEAT |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/cost/cost_atlantic_heat.F |
98 |
COST_ATLANTIC_HEAT |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/cost/cost_test.F |
65 |
COST_TEST |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/cost/cost_vector.F |
65 |
COST_VECTOR |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
./pkg/debug/write_fullarray_rl.F |
110 |
WRITE_FULLARRAY_RL |
iG=biArg+(myXGlobalLo-1)/sNx |
./pkg/debug/write_fullarray_rl.F |
76 |
WRITE_FULLARRAY_RL |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/debug/write_fullarray_rs.F |
110 |
WRITE_FULLARRAY_RS |
iG=biArg+(myXGlobalLo-1)/sNx |
./pkg/debug/write_fullarray_rs.F |
76 |
WRITE_FULLARRAY_RS |
iG=bi+(myXGlobalLo-1)/sNx |
./pkg/diagnostics/diagnostics_set_calc.F |
109 |
DIAGNOSTICS_SET_CALC |
biG = bi-1+(myXGlobalLo-1)/sNx |
./pkg/diagnostics/diagnostics_set_calc.F |
166 |
DIAGNOSTICS_SET_CALC |
biG = bi-1+(myXGlobalLo-1)/sNx |
./pkg/diagnostics/diagnostics_summary.F |
58 |
DIAGNOSTICS_SUMMARY |
outpSummary = ( myXGlobalLo.EQ.1 .AND. myYGlobalLo.EQ.1 ) |
./eesupp/inc/EEPARAMS.h |
237 |
NO PROCEDURE |
& myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads, |
./eesupp/inc/EEPARAMS.h |
255 |
NO PROCEDURE |
INTEGER myXGlobalLo |
./pkg/ecco/cost_averagesfields.F |
742 |
COST_AVERAGESFIELDS |
ig = myXGlobalLo-1+(bi-1)*sNx+i |