| File |
Line number |
Procedure |
Code |
|
./pkg/mdsio/mdsio_read_field.F |
100 |
MDS_READ_FIELD |
INTEGER xSize, ySize |
|
./pkg/mdsio/mdsio_read_field.F |
114 |
MDS_READ_FIELD |
xSize = Nx |
|
./pkg/mdsio/mdsio_read_field.F |
119 |
MDS_READ_FIELD |
xSize = exch2_global_Nx |
|
./pkg/mdsio/mdsio_read_field.F |
248 |
MDS_READ_FIELD |
length_of_rec = MDS_RECLEN( filePrec, xSize*ySize, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
273 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) ( xy_buffer_r4(i),i=1,xSize*ySize ) |
|
./pkg/mdsio/mdsio_read_field.F |
275 |
MDS_READ_FIELD |
CALL MDS_BYTESWAPR4( xSize*ySize, xy_buffer_r4 ) |
|
./pkg/mdsio/mdsio_read_field.F |
278 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) ( xy_buffer_r8(i),i=1,xSize*ySize ) |
|
./pkg/mdsio/mdsio_read_field.F |
280 |
MDS_READ_FIELD |
CALL MDS_BYTESWAPR8( xSize*ySize, xy_buffer_r8 ) |
|
./pkg/mdsio/mdsio_read_field.F |
294 |
MDS_READ_FIELD |
I xSize, ySize, |
|
./pkg/mdsio/mdsio_read_field.F |
315 |
MDS_READ_FIELD |
I xSize, ySize, |
|
./pkg/mdsio/mdsio_read_field.F |
377 |
MDS_READ_FIELD |
global_nTx = xSize/sNx |
|
./pkg/mdsio/mdsio_read_field.F |
390 |
MDS_READ_FIELD |
IF ( exch2_mydNx(tN) .GT. xSize ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
393 |
MDS_READ_FIELD |
jGjLoc = exch2_mydNx(tN) / xSize |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
104 |
MDS_WR_METAFILES |
xSize = Nx |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
108 |
MDS_WR_METAFILES |
xSize = exch2_global_Nx |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
112 |
MDS_WR_METAFILES |
IF (nNx.EQ.1) xSize = 1 |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
123 |
MDS_WR_METAFILES |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
125 |
MDS_WR_METAFILES |
dimList(3,1) = xSize |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
174 |
MDS_WR_METAFILES |
IF ( exch2_mydNx(tN) .GT. xSize ) THEN |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
177 |
MDS_WR_METAFILES |
map2gl(2) = exch2_mydNx(tN) / xSize |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
190 |
MDS_WR_METAFILES |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
96 |
MDS_WR_METAFILES |
INTEGER xSize, ySize |
|
./pkg/mdsio/mdsio_write_field.F |
115 |
MDS_WRITE_FIELD |
INTEGER xSize, ySize |
|
./pkg/mdsio/mdsio_write_field.F |
136 |
MDS_WRITE_FIELD |
xSize = Nx |
|
./pkg/mdsio/mdsio_write_field.F |
141 |
MDS_WRITE_FIELD |
xSize = exch2_global_Nx |
|
./pkg/mdsio/mdsio_write_field.F |
241 |
MDS_WRITE_FIELD |
length_of_rec = MDS_RECLEN( filePrec, xSize*ySize, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
274 |
MDS_WRITE_FIELD |
I xSize, ySize, |
|
./pkg/mdsio/mdsio_write_field.F |
296 |
MDS_WRITE_FIELD |
I xSize, ySize, |
|
./pkg/mdsio/mdsio_write_field.F |
313 |
MDS_WRITE_FIELD |
CALL MDS_BYTESWAPR4( xSize*ySize, xy_buffer_r4 ) |
|
./pkg/mdsio/mdsio_write_field.F |
315 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) ( xy_buffer_r4(i),i=1,xSize*ySize ) |
|
./pkg/mdsio/mdsio_write_field.F |
318 |
MDS_WRITE_FIELD |
CALL MDS_BYTESWAPR8( xSize*ySize, xy_buffer_r8 ) |
|
./pkg/mdsio/mdsio_write_field.F |
320 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) ( xy_buffer_r8(i),i=1,xSize*ySize ) |
|
./pkg/mdsio/mdsio_write_field.F |
408 |
MDS_WRITE_FIELD |
global_nTx = xSize/sNx |
|
./pkg/mdsio/mdsio_write_field.F |
419 |
MDS_WRITE_FIELD |
IF ( exch2_mydNx(tN) .GT. xSize ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
422 |
MDS_WRITE_FIELD |
jGjLoc = exch2_mydNx(tN) / xSize |
|
./pkg/mdsio/mdsio_write_field.F |
496 |
MDS_WRITE_FIELD |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_write_field.F |
542 |
MDS_WRITE_FIELD |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_write_field.F |
544 |
MDS_WRITE_FIELD |
dimList(3,1) = xSize |
|
./pkg/mdsio/mdsio_writelocal.F |
112 |
MDS_WRITELOCAL |
INTEGER xSize, ySize |
|
./pkg/mdsio/mdsio_writelocal.F |
134 |
MDS_WRITELOCAL |
xSize = Nx |
|
./pkg/mdsio/mdsio_writelocal.F |
138 |
MDS_WRITELOCAL |
xSize = exch2_global_Nx |
|
./pkg/mdsio/mdsio_writelocal.F |
293 |
MDS_WRITELOCAL |
global_nTx = xSize/sNx |
|
./pkg/mdsio/mdsio_writelocal.F |
302 |
MDS_WRITELOCAL |
IF ( exch2_mydNx(tN) .GT. xSize ) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
305 |
MDS_WRITELOCAL |
jGjLoc = exch2_mydNx(tN) / xSize |
|
./pkg/mdsio/mdsio_writelocal.F |
380 |
MDS_WRITELOCAL |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_writelocal.F |
411 |
MDS_WRITELOCAL |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_writelocal.F |
413 |
MDS_WRITELOCAL |
dimList(3,1) = xSize |
|
./eesupp/src/global_sum_singlecpu.F |
104 |
GLOBAL_SUM_SINGLECPU_RL |
I xSize, ySize, |
|
./eesupp/src/global_sum_singlecpu.F |
116 |
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 |
75 |
GLOBAL_SUM_SINGLECPU_RL |
xSize = exch2_global_Nx |
|
./eesupp/src/global_sum_singlecpu.F |
80 |
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 |
148 |
DWNSLP_CALC_FLOW |
ishelf = 1-OLx + mod(ijs-1,xSize) |
|
./pkg/down_slope/dwnslp_calc_flow.F |
149 |
DWNSLP_CALC_FLOW |
jshelf = 1-OLy + (ijs-1)/xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
113 |
DWNSLP_INIT_FIXED |
& 1 + (i+OLx-1) + (j+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
114 |
DWNSLP_INIT_FIXED |
DWNSLP_shVsD(ncount,bi,bj) = -xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
122 |
DWNSLP_INIT_FIXED |
& 1 + (i+OLx-1) + (j-1+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
123 |
DWNSLP_INIT_FIXED |
DWNSLP_shVsD(ncount,bi,bj) = xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
144 |
DWNSLP_INIT_FIXED |
& 1 + (i+OLx-1) + (j+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
153 |
DWNSLP_INIT_FIXED |
& 1 + (i-1+OLx-1) + (j+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
172 |
DWNSLP_INIT_FIXED |
& 1 + (i+OLx-1) + (j+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
173 |
DWNSLP_INIT_FIXED |
DWNSLP_shVsD(ncount,bi,bj) = -xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
181 |
DWNSLP_INIT_FIXED |
& 1 + (i+OLx-1) + (j-1+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
182 |
DWNSLP_INIT_FIXED |
DWNSLP_shVsD(ncount,bi,bj) = xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
212 |
DWNSLP_INIT_FIXED |
ideep = 1-OLx + MOD(ijd-1,xSize) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
213 |
DWNSLP_INIT_FIXED |
jdeep = 1-Oly + (ijd-1)/xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
215 |
DWNSLP_INIT_FIXED |
ishelf = ideep + MOD(ijr,xSize) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
216 |
DWNSLP_INIT_FIXED |
jshelf = jdeep + ijr/xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
304 |
DWNSLP_INIT_FIXED |
& bi,bj, DWNSLP_NbSite(bi,bj), xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
309 |
DWNSLP_INIT_FIXED |
ideep = 1-OLx + MOD(ijd-1,xSize) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
310 |
DWNSLP_INIT_FIXED |
jdeep = 1-Oly + (ijd-1)/xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
312 |
DWNSLP_INIT_FIXED |
ishelf = ideep + MOD(ijr,xSize) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
313 |
DWNSLP_INIT_FIXED |
jshelf = jdeep + ijr/xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
85 |
DWNSLP_INIT_FIXED |
& 1 + (i+OLx-1) + (j+OLy-1)*xSize |
|
./pkg/down_slope/dwnslp_init_fixed.F |
94 |
DWNSLP_INIT_FIXED |
& 1 + (i-1+OLx-1) + (j+OLy-1)*xSize |