Symbol Description Uses
xy_buffer_r8 2-D global Real*8 buffer. 46



File Line number Procedure Code
./pkg/mdsio/mdsio_gl.F 1117 MDSREADFIELD_2D_GL
           read(dUnit,rec=irec) xy_buffer_r8
./pkg/mdsio/mdsio_gl.F 1119 MDSREADFIELD_2D_GL
           call MDS_BYTESWAPR8( x_size*y_size, xy_buffer_r8 )
./pkg/mdsio/mdsio_gl.F 1123 MDSREADFIELD_2D_GL
             global(I,J) = xy_buffer_r8(I,J)
./pkg/mdsio/mdsio_gl.F 1259 MDSWRITEFIELD_2D_GL
      Real*8 xy_buffer_r8(x_size,y_size)
./pkg/mdsio/mdsio_gl.F 1360 MDSWRITEFIELD_2D_GL
             xy_buffer_r8(I,J) = global(I,J)
./pkg/mdsio/mdsio_gl.F 1364 MDSWRITEFIELD_2D_GL
           call MDS_BYTESWAPR8( x_size*y_size, xy_buffer_r8 )
./pkg/mdsio/mdsio_gl.F 1366 MDSWRITEFIELD_2D_GL
           write(dUnit,rec=irec) xy_buffer_r8
./pkg/mdsio/mdsio_gl.F 356 MDSREADFIELD_3D_GL
           read(dUnit,rec=irec) xy_buffer_r8
./pkg/mdsio/mdsio_gl.F 358 MDSREADFIELD_3D_GL
           call MDS_BYTESWAPR8( x_size*y_size, xy_buffer_r8 )
./pkg/mdsio/mdsio_gl.F 362 MDSREADFIELD_3D_GL
             global(I,J) = xy_buffer_r8(I,J)
./pkg/mdsio/mdsio_gl.F 497 MDSWRITEFIELD_3D_GL
      Real*8 xy_buffer_r8(x_size,y_size)
./pkg/mdsio/mdsio_gl.F 597 MDSWRITEFIELD_3D_GL
             xy_buffer_r8(I,J) = global(I,J)
./pkg/mdsio/mdsio_gl.F 601 MDSWRITEFIELD_3D_GL
           call MDS_BYTESWAPR8( x_size*y_size, xy_buffer_r8 )
./pkg/mdsio/mdsio_gl.F 603 MDSWRITEFIELD_3D_GL
           write(dUnit,rec=irec) xy_buffer_r8
./pkg/mdsio/mdsio_gl.F 849 MDSREADFIELD_2D_GL
      Real*8 xy_buffer_r8(x_size,y_size)
./pkg/mdsio/mdsio_gl.F 88 MDSREADFIELD_3D_GL
      Real*8 xy_buffer_r8(x_size,y_size)
./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 322 MDS_READ_FIELD
     U                        xy_buffer_r8,
./pkg/mdsio/mdsio_readvector.F 196 MDSREADVECTOR
            CALL MDS_RD_REC_RS( arr, xy_buffer_r4, xy_buffer_r8,
./pkg/mdsio/mdsio_readvector.F 199 MDSREADVECTOR
            CALL MDS_RD_REC_RL( arr, xy_buffer_r4, xy_buffer_r8,
./pkg/mdsio/mdsio_readvector.F 299 MDSREADVECTOR
           READ(dUnit,rec=irec) xy_buffer_r8
./pkg/mdsio/mdsio_readvector.F 301 MDSREADVECTOR
           CALL MDS_BYTESWAPR8( vec_size, xy_buffer_r8 )
./pkg/mdsio/mdsio_readvector.F 307 MDSREADVECTOR
            global(L) = xy_buffer_r8(L)
./pkg/mdsio/mdsio_readvector.F 71 MDSREADVECTOR
      Real*8 xy_buffer_r8(narr*nPx*nPy)
./pkg/mdsio/mdsio_write_field.F 303 MDS_WRITE_FIELD
     O                       xy_buffer_r8,
./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_writevector.F 193 MDSWRITEVECTOR
            xy_buffer_r8(L) = global(L)
./pkg/mdsio/mdsio_writevector.F 197 MDSWRITEVECTOR
           CALL MDS_BYTESWAPR8( vec_size, xy_buffer_r8 )
./pkg/mdsio/mdsio_writevector.F 199 MDSWRITEVECTOR
           WRITE(dUnit,rec=irec) xy_buffer_r8
./pkg/mdsio/mdsio_writevector.F 288 MDSWRITEVECTOR
            CALL MDS_WR_REC_RS( arr, xy_buffer_r4, xy_buffer_r8,
./pkg/mdsio/mdsio_writevector.F 291 MDSWRITEVECTOR
            CALL MDS_WR_REC_RL( arr, xy_buffer_r4, xy_buffer_r8,
./pkg/mdsio/mdsio_writevector.F 88 MDSWRITEVECTOR
      Real*8 xy_buffer_r8(narr*nPx*nPy)
./pkg/profiles/profiles_init_fixed.F 56 PROFILES_INIT_FIXED
      Real*8 xy_buffer_r8(0:sNx+1,0:sNy+1)
./pkg/profiles/profiles_init_fixed.F 598 PROFILES_INIT_FIXED
        xy_buffer_r8(l,m)=xC(l,m,bi,bj)
./pkg/profiles/profiles_init_fixed.F 602 PROFILES_INIT_FIXED
            call MDS_BYTESWAPR8((sNx+2)*(sNy+2),xy_buffer_r8)
./pkg/profiles/profiles_init_fixed.F 604 PROFILES_INIT_FIXED
       write(fid,rec=1) xy_buffer_r8
./pkg/profiles/profiles_init_fixed.F 618 PROFILES_INIT_FIXED
                xy_buffer_r8(l,m)=yC(l,m,bi,bj)
./pkg/profiles/profiles_init_fixed.F 622 PROFILES_INIT_FIXED
            call MDS_BYTESWAPR8((sNx+2)*(sNy+2),xy_buffer_r8)
./pkg/profiles/profiles_init_fixed.F 624 PROFILES_INIT_FIXED
       write(fid,rec=1) xy_buffer_r8
./model/src/ini_model_io.F 191 INI_MODEL_IO
          xy_buffer_r8(i) = 0. _d 0
./eesupp/src/global_sum_singlecpu.F 102 GLOBAL_SUM_SINGLECPU_RL
     O                       xy_buffer_r8,
./eesupp/src/global_sum_singlecpu.F 117 GLOBAL_SUM_SINGLECPU_RL
          sumAll = sumAll + xy_buffer_r8(ij)
./eesupp/inc/EEBUFF_SCPU.h 35 NO PROCEDURE
      COMMON /EE_BUFFERS_GLOBAL/ xy_buffer_r8, xy_buffer_r4
./eesupp/inc/EEBUFF_SCPU.h 36 NO PROCEDURE
      Real*8 xy_buffer_r8(xyBuffer_size)