| 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 |
257 |
MDS_READ_FIELD |
length_of_rec = MDS_RECLEN( filePrec, xSize*ySize, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
282 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) ( xy_buffer_r4(i),i=1,xSize*ySize ) |
|
./pkg/mdsio/mdsio_read_field.F |
284 |
MDS_READ_FIELD |
CALL MDS_BYTESWAPR4( xSize*ySize, xy_buffer_r4 ) |
|
./pkg/mdsio/mdsio_read_field.F |
287 |
MDS_READ_FIELD |
READ(dUnit,rec=irec) ( xy_buffer_r8(i),i=1,xSize*ySize ) |
|
./pkg/mdsio/mdsio_read_field.F |
289 |
MDS_READ_FIELD |
CALL MDS_BYTESWAPR8( xSize*ySize, xy_buffer_r8 ) |
|
./pkg/mdsio/mdsio_read_field.F |
303 |
MDS_READ_FIELD |
I xSize, ySize, |
|
./pkg/mdsio/mdsio_read_field.F |
324 |
MDS_READ_FIELD |
I xSize, ySize, |
|
./pkg/mdsio/mdsio_read_field.F |
386 |
MDS_READ_FIELD |
global_nTx = xSize/sNx |
|
./pkg/mdsio/mdsio_read_field.F |
399 |
MDS_READ_FIELD |
IF ( exch2_mydNx(tN) .GT. xSize ) THEN |
|
./pkg/mdsio/mdsio_read_field.F |
402 |
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 |
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 |
251 |
MDS_WRITE_FIELD |
length_of_rec = MDS_RECLEN( filePrec, xSize*ySize, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
284 |
MDS_WRITE_FIELD |
I xSize, ySize, |
|
./pkg/mdsio/mdsio_write_field.F |
305 |
MDS_WRITE_FIELD |
I xSize, ySize, |
|
./pkg/mdsio/mdsio_write_field.F |
322 |
MDS_WRITE_FIELD |
CALL MDS_BYTESWAPR4( xSize*ySize, xy_buffer_r4 ) |
|
./pkg/mdsio/mdsio_write_field.F |
324 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) ( xy_buffer_r4(i),i=1,xSize*ySize ) |
|
./pkg/mdsio/mdsio_write_field.F |
327 |
MDS_WRITE_FIELD |
CALL MDS_BYTESWAPR8( xSize*ySize, xy_buffer_r8 ) |
|
./pkg/mdsio/mdsio_write_field.F |
329 |
MDS_WRITE_FIELD |
WRITE(dUnit,rec=irec) ( xy_buffer_r8(i),i=1,xSize*ySize ) |
|
./pkg/mdsio/mdsio_write_field.F |
421 |
MDS_WRITE_FIELD |
global_nTx = xSize/sNx |
|
./pkg/mdsio/mdsio_write_field.F |
432 |
MDS_WRITE_FIELD |
IF ( exch2_mydNx(tN) .GT. xSize ) THEN |
|
./pkg/mdsio/mdsio_write_field.F |
435 |
MDS_WRITE_FIELD |
jGjLoc = exch2_mydNx(tN) / xSize |
|
./pkg/mdsio/mdsio_write_field.F |
509 |
MDS_WRITE_FIELD |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_write_field.F |
555 |
MDS_WRITE_FIELD |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_write_field.F |
557 |
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 |
298 |
MDS_WRITELOCAL |
global_nTx = xSize/sNx |
|
./pkg/mdsio/mdsio_writelocal.F |
307 |
MDS_WRITELOCAL |
IF ( exch2_mydNx(tN) .GT. xSize ) THEN |
|
./pkg/mdsio/mdsio_writelocal.F |
310 |
MDS_WRITELOCAL |
jGjLoc = exch2_mydNx(tN) / xSize |
|
./pkg/mdsio/mdsio_writelocal.F |
385 |
MDS_WRITELOCAL |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_writelocal.F |
416 |
MDS_WRITELOCAL |
dimList(1,1) = xSize |
|
./pkg/mdsio/mdsio_writelocal.F |
418 |
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 |