| File |
Line number |
Procedure |
Code |
|
./pkg/mdsio/mdsio_read_field.F |
109 |
MDS_READ_FIELD |
INTEGER xSize, ySize |
|
./pkg/mdsio/mdsio_read_field.F |
123 |
MDS_READ_FIELD |
xSize = Nx |
|
./pkg/mdsio/mdsio_read_field.F |
128 |
MDS_READ_FIELD |
xSize = exch2_global_Nx |
|
./pkg/mdsio/mdsio_read_field.F |
272 |
MDS_READ_FIELD |
length_of_rec = MDS_RECLEN( filePrec, xSize*ySize, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
297 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) ( xy_buffer_r4(i),i=1,xSize*ySize ) |
|
./pkg/mdsio/mdsio_read_field.F |
299 |
MDS_READ_FIELD |
CALL MDS_BYTESWAPR4( xSize*ySize, xy_buffer_r4 ) |
|
./pkg/mdsio/mdsio_read_field.F |
302 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) ( xy_buffer_r8(i),i=1,xSize*ySize ) |
|
./pkg/mdsio/mdsio_read_field.F |
304 |
MDS_READ_FIELD |
CALL MDS_BYTESWAPR8( xSize*ySize, xy_buffer_r8 ) |
|
./pkg/mdsio/mdsio_read_field.F |
318 |
MDS_READ_FIELD |
I xSize, ySize, |
|
./pkg/mdsio/mdsio_read_field.F |
339 |
MDS_READ_FIELD |
I xSize, ySize, |
|
./pkg/mdsio/mdsio_read_field.F |
401 |
MDS_READ_FIELD |
global_nTx = xSize/sNx |
|
./pkg/mdsio/mdsio_read_field.F |
414 |
MDS_READ_FIELD |
IF ( exch2_mydNx(tN) .GT. xSize ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
417 |
MDS_READ_FIELD |
jGjLoc = exch2_mydNx(tN) / xSize |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
107 |
MDS_WR_METAFILES |
xSize = Nx |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
111 |
MDS_WR_METAFILES |
xSize = exch2_global_Nx |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
115 |
MDS_WR_METAFILES |
IF (nNx.EQ.1) xSize = 1 |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
126 |
MDS_WR_METAFILES |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
128 |
MDS_WR_METAFILES |
dimList(3,1) = xSize |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
177 |
MDS_WR_METAFILES |
IF ( exch2_mydNx(tN) .GT. xSize ) THEN |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
180 |
MDS_WR_METAFILES |
map2gl(2) = exch2_mydNx(tN) / xSize |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
193 |
MDS_WR_METAFILES |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
99 |
MDS_WR_METAFILES |
INTEGER xSize, ySize |
|
./pkg/mdsio/mdsio_write_field.F |
125 |
MDS_WRITE_FIELD |
INTEGER xSize, ySize |
|
./pkg/mdsio/mdsio_write_field.F |
146 |
MDS_WRITE_FIELD |
xSize = Nx |
|
./pkg/mdsio/mdsio_write_field.F |
151 |
MDS_WRITE_FIELD |
xSize = exch2_global_Nx |
|
./pkg/mdsio/mdsio_write_field.F |
277 |
MDS_WRITE_FIELD |
length_of_rec = MDS_RECLEN( filePrec, xSize*ySize, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
310 |
MDS_WRITE_FIELD |
I xSize, ySize, |
|
./pkg/mdsio/mdsio_write_field.F |
331 |
MDS_WRITE_FIELD |
I xSize, ySize, |
|
./pkg/mdsio/mdsio_write_field.F |
348 |
MDS_WRITE_FIELD |
CALL MDS_BYTESWAPR4( xSize*ySize, xy_buffer_r4 ) |
|
./pkg/mdsio/mdsio_write_field.F |
350 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) ( xy_buffer_r4(i),i=1,xSize*ySize ) |
|
./pkg/mdsio/mdsio_write_field.F |
353 |
MDS_WRITE_FIELD |
CALL MDS_BYTESWAPR8( xSize*ySize, xy_buffer_r8 ) |
|
./pkg/mdsio/mdsio_write_field.F |
355 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) ( xy_buffer_r8(i),i=1,xSize*ySize ) |
|
./pkg/mdsio/mdsio_write_field.F |
447 |
MDS_WRITE_FIELD |
global_nTx = xSize/sNx |
|
./pkg/mdsio/mdsio_write_field.F |
458 |
MDS_WRITE_FIELD |
IF ( exch2_mydNx(tN) .GT. xSize ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
461 |
MDS_WRITE_FIELD |
jGjLoc = exch2_mydNx(tN) / xSize |
|
./pkg/mdsio/mdsio_write_field.F |
535 |
MDS_WRITE_FIELD |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_write_field.F |
581 |
MDS_WRITE_FIELD |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_write_field.F |
583 |
MDS_WRITE_FIELD |
dimList(3,1) = xSize |
|
./pkg/mdsio/mdsio_writelocal.F |
113 |
MDS_WRITELOCAL |
INTEGER xSize, ySize |
|
./pkg/mdsio/mdsio_writelocal.F |
135 |
MDS_WRITELOCAL |
xSize = Nx |
|
./pkg/mdsio/mdsio_writelocal.F |
139 |
MDS_WRITELOCAL |
xSize = exch2_global_Nx |
|
./pkg/mdsio/mdsio_writelocal.F |
302 |
MDS_WRITELOCAL |
global_nTx = xSize/sNx |
|
./pkg/mdsio/mdsio_writelocal.F |
311 |
MDS_WRITELOCAL |
IF ( exch2_mydNx(tN) .GT. xSize ) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
314 |
MDS_WRITELOCAL |
jGjLoc = exch2_mydNx(tN) / xSize |
|
./pkg/mdsio/mdsio_writelocal.F |
389 |
MDS_WRITELOCAL |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_writelocal.F |
420 |
MDS_WRITELOCAL |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_writelocal.F |
422 |
MDS_WRITELOCAL |
dimList(3,1) = xSize |
|
./eesupp/src/global_sum_singlecpu.F |
107 |
GLOBAL_SUM_SINGLECPU_RL |
I xSize, ySize, |
|
./eesupp/src/global_sum_singlecpu.F |
114 |
GLOBAL_SUM_SINGLECPU_RL |
DO ij=1,xSize*ySize |
|
./eesupp/src/global_sum_singlecpu.F |
61 |
GLOBAL_SUM_SINGLECPU_RL |
INTEGER xSize, ySize |
|
./eesupp/src/global_sum_singlecpu.F |
74 |
GLOBAL_SUM_SINGLECPU_RL |
xSize = exch2_global_Nx |
|
./eesupp/src/global_sum_singlecpu.F |
79 |
GLOBAL_SUM_SINGLECPU_RL |
xSize = Nx |
|
./pkg/down_slope/DWNSLP_SIZE.h |
10 |
NO PROCEDURE |
PARAMETER ( xSize = Olx+sNx+Olx ) |
|
./pkg/down_slope/DWNSLP_SIZE.h |
11 |
NO PROCEDURE |
PARAMETER ( xySize = xSize*(Oly+sNy+Oly) ) |
|
./pkg/down_slope/DWNSLP_SIZE.h |
18 |
NO PROCEDURE |
PARAMETER ( DWNSLP_size = xSize * (Oly+sNy+Oly) ) |
|
./pkg/down_slope/DWNSLP_SIZE.h |
9 |
NO PROCEDURE |
INTEGER xSize, xySize |
|
./pkg/down_slope/dwnslp_calc_flow.F |
150 |
DWNSLP_CALC_FLOW |
ishelf = 1-OLx + mod(ijs-1,xSize) |
|
./pkg/down_slope/dwnslp_calc_flow.F |
151 |
DWNSLP_CALC_FLOW |
jshelf = 1-OLy + (ijs-1)/xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
114 |
DWNSLP_INIT_FIXED |
& 1 + (i+OLx-1) + (j+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
115 |
DWNSLP_INIT_FIXED |
DWNSLP_shVsD(ncount,bi,bj) = -xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
123 |
DWNSLP_INIT_FIXED |
& 1 + (i+OLx-1) + (j-1+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
124 |
DWNSLP_INIT_FIXED |
DWNSLP_shVsD(ncount,bi,bj) = xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
145 |
DWNSLP_INIT_FIXED |
& 1 + (i+OLx-1) + (j+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
154 |
DWNSLP_INIT_FIXED |
& 1 + (i-1+OLx-1) + (j+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
173 |
DWNSLP_INIT_FIXED |
& 1 + (i+OLx-1) + (j+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
174 |
DWNSLP_INIT_FIXED |
DWNSLP_shVsD(ncount,bi,bj) = -xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
182 |
DWNSLP_INIT_FIXED |
& 1 + (i+OLx-1) + (j-1+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
183 |
DWNSLP_INIT_FIXED |
DWNSLP_shVsD(ncount,bi,bj) = xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
213 |
DWNSLP_INIT_FIXED |
ideep = 1-OLx + MOD(ijd-1,xSize) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
214 |
DWNSLP_INIT_FIXED |
jdeep = 1-Oly + (ijd-1)/xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
216 |
DWNSLP_INIT_FIXED |
ishelf = ideep + MOD(ijr,xSize) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
217 |
DWNSLP_INIT_FIXED |
jshelf = jdeep + ijr/xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
305 |
DWNSLP_INIT_FIXED |
& bi,bj, DWNSLP_NbSite(bi,bj), xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
310 |
DWNSLP_INIT_FIXED |
ideep = 1-OLx + MOD(ijd-1,xSize) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
311 |
DWNSLP_INIT_FIXED |
jdeep = 1-Oly + (ijd-1)/xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
313 |
DWNSLP_INIT_FIXED |
ishelf = ideep + MOD(ijr,xSize) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
314 |
DWNSLP_INIT_FIXED |
jshelf = jdeep + ijr/xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
86 |
DWNSLP_INIT_FIXED |
& 1 + (i+OLx-1) + (j+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
95 |
DWNSLP_INIT_FIXED |
& 1 + (i-1+OLx-1) + (j+OLy-1)*xSize |