| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/diagnostics_summary.F |
58 |
DIAGNOSTICS_SUMMARY |
outpSummary = ( myXGlobalLo.EQ.1 .AND. myYGlobalLo.EQ.1 ) |
|
./eesupp/inc/EEPARAMS.h |
179 |
NO PROCEDURE |
& myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads, |
|
./eesupp/inc/EEPARAMS.h |
193 |
NO PROCEDURE |
INTEGER myXGlobalLo |
|
./pkg/flt/flt_traj.F |
77 |
FLT_TRAJ |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/flt/flt_init.F |
222 |
FLT_INIT |
iG = myXGlobalLo + (bi-1)*sNx |
|
./pkg/flt/flt_runga2.F |
107 |
FLT_RUNGA2 |
iG = myXGlobalLo + (bi-1)*sNx |
|
./pkg/flt/flt_up.F |
78 |
FLT_UP |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/flt/flt_exchg.F |
84 |
FLT_EXCHG |
iG = myXGlobalLo + (bi-1)*sNx |
|
./pkg/flt/flt_functions.F |
43 |
NO PROCEDURE |
iG = myXGlobalLo + (bi-1)*sNx |
|
./pkg/flt/flt_mdsreadvector.F |
103 |
MDSREADVECTOR_FLT |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/flt/flt_mdsreadvector.F |
156 |
MDSREADVECTOR_FLT |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mnc/mnc_cwrapper.F |
621 |
MNC_CW_GET_TILE_NUM |
iG = bi+(myXGlobalLo-1)/sNx |
|
./pkg/mnc/mnc_cwrapper.F |
712 |
MNC_CW_GET_XYFO |
ixoff = myXGlobalLo + bi * sNx |
|
./pkg/profiles/profiles_init_fixed.F |
284 |
PROFILES_INIT_FIXED |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./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 |
77 |
UPDATE_OCEAN_EXPORTS |
bislot = myXGlobalLo-1+(bi-1)*sNx |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
87 |
FIZHI_INIT_VEGSURFTILES |
bislot = myXGlobalLo-1+(bi-1)*sNx |
|
./pkg/fizhi/fizhi_init_veg.F |
115 |
FIZHI_INIT_VEG |
biglobal=bi+(myXGlobalLo-1)/im |
|
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F |
46 |
UPDATE_OCEAN_EXPORTS |
biglobal=bi+(myXGlobalLo-1)/im2 |
|
./verification/aim.5l_LatLon/code/EEPARAMS.h |
179 |
NO PROCEDURE |
& myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads, |
|
./verification/aim.5l_LatLon/code/EEPARAMS.h |
193 |
NO PROCEDURE |
INTEGER myXGlobalLo |
|
./verification/aim.5l_cs/code/EEPARAMS.h |
179 |
NO PROCEDURE |
& myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads, |
|
./verification/aim.5l_cs/code/EEPARAMS.h |
193 |
NO PROCEDURE |
INTEGER myXGlobalLo |
|
./verification/rotating_tank/code/external_forcing.F |
369 |
EXTERNAL_FORCING_T |
iG = myXGlobalLo-1+(bi-1)*sNx+I |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
77 |
UPDATE_OCEAN_EXPORTS |
bislot = myXGlobalLo-1+(bi-1)*sNx |
|
./verification/hs94.1x64x5/code_ad/cost_test.F |
70 |
COST_TEST |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
|
./verification/cpl_aim+ocn/code_atm/EEPARAMS.h |
179 |
NO PROCEDURE |
& myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads, |
|
./verification/cpl_aim+ocn/code_atm/EEPARAMS.h |
193 |
NO PROCEDURE |
INTEGER myXGlobalLo |
|
./verification/OpenAD/code_ad/cost_test.F |
67 |
COST_TEST |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
|
./model/src/ini_depths.F |
215 |
INI_DEPTHS |
iG = myXGlobalLo-1+(bi-1)*sNx+I |
|
./model/src/ini_depths.F |
232 |
INI_DEPTHS |
iG = myXGlobalLo-1+(bi-1)*sNx+I |
|
./verification/bottom_ctrl_5x5/code_ad/cost_test.F |
56 |
COST_TEST |
ig = myXGlobalLo-1+(bi-1)*sNx+I |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
209 |
INI_DEPTHS |
iG = myXGlobalLo-1+(bi-1)*sNx+I |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
230 |
INI_DEPTHS |
iG = myXGlobalLo-1+(bi-1)*sNx+I |
|
./verification/aim.5l_Equatorial_Channel/code/EEPARAMS.h |
179 |
NO PROCEDURE |
& myPx, myPy, myXGlobalLo, myYGlobalLo, nThreads, |
|
./verification/aim.5l_Equatorial_Channel/code/EEPARAMS.h |
193 |
NO PROCEDURE |
INTEGER myXGlobalLo |
|
./model/src/ini_spherical_polar_grid.F |
101 |
INI_SPHERICAL_POLAR_GRID |
iG = myXGlobalLo + (bi-1)*sNx |
|
./model/src/ini_spherical_polar_grid.F |
90 |
INI_SPHERICAL_POLAR_GRID |
iGl(I,bi) = 1+mod(myXGlobalLo-1+(bi-1)*sNx+I+Olx*Nx-1,Nx) |
|
./model/src/ini_cylinder_grid.F |
88 |
INI_CYLINDER_GRID |
iGl(I,bi) = 1+mod(myXGlobalLo-1+(bi-1)*sNx+I+Olx*Nx-1,Nx) |
|
./model/src/ini_cylinder_grid.F |
99 |
INI_CYLINDER_GRID |
iG = myXGlobalLo + (bi-1)*sNx |
|
./model/src/ini_curvilinear_grid.F |
350 |
INI_CURVILINEAR_GRID |
iG=bi+(myXGlobalLo-1)/sNx |
|
./eesupp/src/scatter_xz.F |
34 |
SCATTER_XZ |
iG = myXGlobalLo-1+(bi-1)*sNx+i |
|
./model/src/ini_cartesian_grid.F |
68 |
INI_CARTESIAN_GRID |
iGl(I,bi) = 1+mod(myXGlobalLo-1+(bi-1)*sNx+I+Olx*Nx-1,Nx) |
|
./model/src/ini_cartesian_grid.F |
78 |
INI_CARTESIAN_GRID |
iG = myXGlobalLo + (bi-1)*sNx |
|
./pkg/cost/cost_vector.F |
63 |
COST_VECTOR |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
|
./pkg/cost/cost_test.F |
67 |
COST_TEST |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
|
./pkg/cost/cost_atlantic_heat.F |
130 |
COST_ATLANTIC_HEAT |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
|
./pkg/cost/cost_atlantic_heat.F |
71 |
COST_ATLANTIC_HEAT |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
|
./pkg/cost/cost_atlantic_heat.F |
95 |
COST_ATLANTIC_HEAT |
ig = myXGlobalLo-1+(bi-1)*sNx+i |
|
./eesupp/src/gather_vector.F |
34 |
GATHER_VECTOR |
iG=1+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./eesupp/src/print.F |
1118 |
PRINT_MAPRL |
& '(',myXGlobalLo-1+(bxMin-1)*sNx+iMin, |
|
./eesupp/src/print.F |
1119 |
PRINT_MAPRL |
& ':',myXGlobalLo-1+(bxMax-1)*sNx+iMax, |
|
./eesupp/src/print.F |
1157 |
PRINT_MAPRL |
accBase = myXGlobalLo |
|
./eesupp/src/print.F |
1209 |
PRINT_MAPRL |
pltBase = myXGlobalLo |
|
./eesupp/src/print.F |
1215 |
PRINT_MAPRL |
accBase = myXGlobalLo |
|
./eesupp/src/print.F |
693 |
PRINT_MAPRS |
& '(',myXGlobalLo-1+(bxMin-1)*sNx+iMin, |
|
./eesupp/src/print.F |
694 |
PRINT_MAPRS |
& ':',myXGlobalLo-1+(bxMax-1)*sNx+iMax, |
|
./eesupp/src/print.F |
732 |
PRINT_MAPRS |
accBase = myXGlobalLo |
|
./eesupp/src/print.F |
784 |
PRINT_MAPRS |
pltBase = myXGlobalLo |
|
./eesupp/src/print.F |
790 |
PRINT_MAPRS |
accBase = myXGlobalLo |
|
./pkg/aim_compon_interf/cpl_register.F |
45 |
CPL_REGISTER |
iG0 = myXGlobalLo+(bi-1)*sNx |
|
./eesupp/src/scatter_2d.F |
36 |
SCATTER_2D |
iG = myXGlobalLo-1+(bi-1)*sNx+i |
|
./pkg/monitor/mon_vort3.F |
157 |
MON_VORT3 |
iG = bi+(myXGlobalLo-1)/sNx |
|
./pkg/obcs/obcs_init_fixed.F |
61 |
OBCS_INIT_FIXED |
iG = myXGlobalLo-1+(bi-1)*sNx+I |
|
./pkg/obcs/obcs_init_fixed.F |
72 |
OBCS_INIT_FIXED |
iG = myXGlobalLo-1+(bi-1)*sNx+I |
|
./pkg/ocn_compon_interf/cpl_register.F |
45 |
CPL_REGISTER |
iG0 = myXGlobalLo+(bi-1)*sNx |
|
./eesupp/src/ini_procs.F |
178 |
INI_PROCS |
myXGlobalLo = mpiXGlobalLo |
|
./eesupp/src/ini_procs.F |
188 |
INI_PROCS |
CALL MPI_ISEND (myXGlobalLo, mpiBufSize, MPI_INTEGER, |
|
./eesupp/src/ini_procs.F |
77 |
INI_PROCS |
myXGlobalLo = 1 |
|
./pkg/mdsio/mdsio_writevector.F |
245 |
MDSWRITEVECTOR |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_writevector.F |
263 |
MDSWRITEVECTOR |
iG = myXGlobalLo-1+(bi-1)*sNx |
|
./pkg/mdsio/mdsio_writevector.F |
295 |
MDSWRITEVECTOR |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_writevector.F |
300 |
MDSWRITEVECTOR |
dimList(2,1) = ((myXGlobalLo-1)/sNx + (bi-1))*narr + 1 |
|
./pkg/mdsio/mdsio_writevector.F |
301 |
MDSWRITEVECTOR |
dimList(3,1) = ((myXGlobalLo-1)/sNx + bi )*narr |
|
./pkg/mdsio/mdsio_slice.F |
141 |
MDSREADFIELDXZ |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_slice.F |
175 |
MDSREADFIELDXZ |
iG = myXGlobalLo-1 + (bi-1)*sNx |
|
./pkg/mdsio/mdsio_slice.F |
379 |
MDSREADFIELDYZ |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_slice.F |
413 |
MDSREADFIELDYZ |
iG = (myXGlobalLo-1)/sNx + (bi-1) |
|
./pkg/mdsio/mdsio_slice.F |
601 |
MDSWRITEFIELDXZ |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_slice.F |
620 |
MDSWRITEFIELDXZ |
iG = myXGlobalLo-1 + (bi-1)*sNx |
|
./pkg/mdsio/mdsio_slice.F |
819 |
MDSWRITEFIELDYZ |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_slice.F |
838 |
MDSWRITEFIELDYZ |
iG = (myXGlobalLo-1)/sNx + (bi-1) |
|
./pkg/mdsio/mdsio_readfield_loc.F |
134 |
MDSREADFIELD_LOC |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_readfield_loc.F |
172 |
MDSREADFIELD_LOC |
iG = myXGlobalLo-1 + (bi-1)*sNx |
|
./eesupp/src/scatter_vector.F |
31 |
SCATTER_VECTOR |
iG=1+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_writetile.F |
129 |
MDS_WRITETILE |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_writetile.F |
149 |
MDS_WRITETILE |
iG = myXGlobalLo-1+(bi-1)*sNx |
|
./pkg/mdsio/mdsio_writetile.F |
211 |
MDS_WRITETILE |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_writetile.F |
216 |
MDS_WRITETILE |
dimList(2,1)=myXGlobalLo+(bi-1)*sNx |
|
./pkg/mdsio/mdsio_writetile.F |
217 |
MDS_WRITETILE |
dimList(3,1)=myXGlobalLo+bi*sNx-1 |
|
./pkg/mdsio/mdsio_readtile.F |
133 |
MDS_READTILE |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_readtile.F |
166 |
MDS_READTILE |
iG = myXGlobalLo-1 + (bi-1)*sNx |
|
./pkg/mdsio/mdsio_slice_loc.F |
131 |
MDSREADFIELDXZ_LOC |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_slice_loc.F |
165 |
MDSREADFIELDXZ_LOC |
iG = myXGlobalLo-1 + (bi-1)*sNx |
|
./pkg/mdsio/mdsio_slice_loc.F |
360 |
MDSREADFIELDYZ_LOC |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_slice_loc.F |
394 |
MDSREADFIELDYZ_LOC |
iG = (myXGlobalLo-1)/sNx + (bi-1) |
|
./pkg/mdsio/mdsio_slice_loc.F |
573 |
MDSWRITEFIELDXZ_LOC |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_slice_loc.F |
592 |
MDSWRITEFIELDXZ_LOC |
iG = myXGlobalLo-1 + (bi-1)*sNx |
|
./pkg/mdsio/mdsio_slice_loc.F |
782 |
MDSWRITEFIELDYZ_LOC |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_slice_loc.F |
801 |
MDSWRITEFIELDYZ_LOC |
iG = (myXGlobalLo-1)/sNx + (bi-1) |
|
./pkg/mdsio/mdsio_readfield.F |
259 |
MDSREADFIELD |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_readfield.F |
297 |
MDSREADFIELD |
iG = myXGlobalLo-1 + (bi-1)*sNx |
|
./pkg/mdsio/mdsio_readfield.F |
460 |
MDSREADFIELD |
iG= myXGlobalLo-1+(bi-1)*sNx+i |
|
./pkg/mdsio/mdsio_readfield.F |
492 |
MDSREADFIELD |
iG= myXGlobalLo-1+(bi-1)*sNx+i |
|
./pkg/mdsio/mdsio_readvector.F |
157 |
MDSREADVECTOR |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_readvector.F |
190 |
MDSREADVECTOR |
iG = myXGlobalLo-1+(bi-1)*sNx |
|
./eesupp/src/ini_jam.F |
96 |
INI_JAM |
myXGlobalLo = 1 |
|
./pkg/mdsio/mdsio_writelocal.F |
144 |
MDS_WRITELOCAL |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_writelocal.F |
164 |
MDS_WRITELOCAL |
iG = myXGlobalLo-1+(bi-1)*sNx |
|
./pkg/mdsio/mdsio_writelocal.F |
226 |
MDS_WRITELOCAL |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_writelocal.F |
242 |
MDS_WRITELOCAL |
dimList(2,1)=myXGlobalLo+(bi-1)*sNx |
|
./pkg/mdsio/mdsio_writelocal.F |
243 |
MDS_WRITELOCAL |
dimList(3,1)=myXGlobalLo+bi*sNx-1 |
|
./pkg/mdsio/mdsio_writevec_loc.F |
110 |
MDSWRITEVEC_LOC_RS |
iG=bi+(myXGlobalLo-1)/sNx |
|
./pkg/mdsio/mdsio_writevec_loc.F |
181 |
MDSWRITEVEC_LOC_RS |
iG=bi+(myXGlobalLo-1)/sNx |
|
./pkg/mdsio/mdsio_writefield_new.F |
209 |
MDSWRITEFIELD_NEW |
iG= myXGlobalLo-1+(bi-1)*sNx+i |
|
./pkg/mdsio/mdsio_writefield_new.F |
246 |
MDSWRITEFIELD_NEW |
iG= myXGlobalLo-1+(bi-1)*sNx+i |
|
./pkg/mdsio/mdsio_writefield_new.F |
394 |
MDSWRITEFIELD_NEW |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_writefield_new.F |
414 |
MDSWRITEFIELD_NEW |
iG = myXGlobalLo-1+(bi-1)*sNx |
|
./pkg/mdsio/mdsio_writefield_new.F |
476 |
MDSWRITEFIELD_NEW |
iG=bi+(myXGlobalLo-1)/sNx ! Kludge until unstructered tiles |
|
./pkg/mdsio/mdsio_writefield_new.F |
492 |
MDSWRITEFIELD_NEW |
dimList(2,1)=myXGlobalLo+(bi-1)*sNx |
|
./pkg/mdsio/mdsio_writefield_new.F |
493 |
MDSWRITEFIELD_NEW |
dimList(3,1)=myXGlobalLo+bi*sNx-1 |
|
./eesupp/src/gather_2d.F |
35 |
GATHER_2D |
iG = myXGlobalLo-1+(bi-1)*sNx+i |
|
./eesupp/src/gather_xz.F |
36 |
GATHER_XZ |
iG = myXGlobalLo-1+(bi-1)*sNx+i |
|
./pkg/debug/write_fullarray_rl.F |
56 |
WRITE_FULLARRAY_RL |
iG=bi+(myXGlobalLo-1)/sNx |
|
./pkg/debug/write_fullarray_rl.F |
77 |
WRITE_FULLARRAY_RL |
iG=biArg+(myXGlobalLo-1)/sNx |