Symbol Description Uses
arr Array declared as integer*4(n) 381


File Line number Procedure Code
./pkg/mdsio/mdsio_buffertorl.F 11 MDS_BUFFERTORL 
      SUBROUTINE MDS_BUFFERTORL( vecBuf, arr, narr, copyTo, myThid )
./pkg/mdsio/mdsio_buffertorl.F 28 MDS_BUFFERTORL 
      _RL arr(narr)
./pkg/mdsio/mdsio_buffertorl.F 40 MDS_BUFFERTORL 
         arr(L) = vecBuf(L)
./pkg/mdsio/mdsio_buffertorl.F 44 MDS_BUFFERTORL 
          vecBuf(L) = arr(L)
./pkg/mdsio/mdsio_buffertors.F 11 MDS_BUFFERTORS 
      SUBROUTINE MDS_BUFFERTORS( vecBuf, arr, narr, copyTo, myThid )
./pkg/mdsio/mdsio_buffertors.F 28 MDS_BUFFERTORS 
      _RS arr(narr)
./pkg/mdsio/mdsio_buffertors.F 40 MDS_BUFFERTORS 
         arr(L) = vecBuf(L)
./pkg/mdsio/mdsio_buffertors.F 44 MDS_BUFFERTORS 
          vecBuf(L) = arr(L)
./pkg/mdsio/mdsio_gl.F 1036 MDSREADFIELD_2D_GL 
             call MDS_SEG4TORS( j,bi,bj,k,nLocz, r4seg, .TRUE., arr )
./pkg/mdsio/mdsio_gl.F 1038 MDSREADFIELD_2D_GL 
             call MDS_SEG4TORL( j,bi,bj,k,nLocz, r4seg, .TRUE., arr )
./pkg/mdsio/mdsio_gl.F 1051 MDSREADFIELD_2D_GL 
             call MDS_SEG8TORS( j,bi,bj,k,nLocz, r8seg, .TRUE., arr )
./pkg/mdsio/mdsio_gl.F 1053 MDSREADFIELD_2D_GL 
             call MDS_SEG8TORL( j,bi,bj,k,nLocz, r8seg, .TRUE., arr )
./pkg/mdsio/mdsio_gl.F 1067 MDSREADFIELD_2D_GL 
        arr_gl(ii,bi,ip,j,bj,jp,k)=arr(ii,j,k,bi,bj)
./pkg/mdsio/mdsio_gl.F 1244 MDSWRITEFIELD_2D_GL 
      _RL arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nLocz,nSx,nSy)
./pkg/mdsio/mdsio_gl.F 1435 MDSWRITEFIELD_2D_GL 
                arr(i,j,k,bi,bj)=arr_gl(i,bi,ip,j,bj,jp,k)
./pkg/mdsio/mdsio_gl.F 1442 MDSWRITEFIELD_2D_GL 
             call MDS_SEG4TORS( j,bi,bj,k,nLocz, r4seg, .FALSE., arr )
./pkg/mdsio/mdsio_gl.F 1444 MDSWRITEFIELD_2D_GL 
             call MDS_SEG4TORL( j,bi,bj,k,nLocz, r4seg, .FALSE., arr )
./pkg/mdsio/mdsio_gl.F 1457 MDSWRITEFIELD_2D_GL 
             call MDS_SEG8TORS( j,bi,bj,k,nLocz, r8seg, .FALSE., arr )
./pkg/mdsio/mdsio_gl.F 1459 MDSWRITEFIELD_2D_GL 
             call MDS_SEG8TORL( j,bi,bj,k,nLocz, r8seg, .FALSE., arr )
./pkg/mdsio/mdsio_gl.F 275 MDSREADFIELD_3D_GL 
             call MDS_SEG4TORS( j,bi,bj,k,Nr, r4seg, .TRUE., arr )
./pkg/mdsio/mdsio_gl.F 277 MDSREADFIELD_3D_GL 
             call MDS_SEG4TORL( j,bi,bj,k,Nr, r4seg, .TRUE., arr )
./pkg/mdsio/mdsio_gl.F 290 MDSREADFIELD_3D_GL 
             call MDS_SEG8TORS( j,bi,bj,k,Nr, r8seg, .TRUE., arr )
./pkg/mdsio/mdsio_gl.F 292 MDSREADFIELD_3D_GL 
             call MDS_SEG8TORL( j,bi,bj,k,Nr, r8seg, .TRUE., arr )
./pkg/mdsio/mdsio_gl.F 306 MDSREADFIELD_3D_GL 
        arr_gl(ii,bi,ip,j,bj,jp,k)=arr(ii,j,k,bi,bj)
./pkg/mdsio/mdsio_gl.F 482 MDSWRITEFIELD_3D_GL 
      _RL arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,Nr,nSx,nSy)
./pkg/mdsio/mdsio_gl.F 672 MDSWRITEFIELD_3D_GL 
                arr(i,j,k,bi,bj)=arr_gl(i,bi,ip,j,bj,jp,k)
./pkg/mdsio/mdsio_gl.F 679 MDSWRITEFIELD_3D_GL 
             call MDS_SEG4TORS( j,bi,bj,k,Nr, r4seg, .FALSE., arr )
./pkg/mdsio/mdsio_gl.F 681 MDSWRITEFIELD_3D_GL 
             call MDS_SEG4TORL( j,bi,bj,k,Nr, r4seg, .FALSE., arr )
./pkg/mdsio/mdsio_gl.F 694 MDSWRITEFIELD_3D_GL 
             call MDS_SEG8TORS( j,bi,bj,k,Nr, r8seg, .FALSE., arr )
./pkg/mdsio/mdsio_gl.F 696 MDSWRITEFIELD_3D_GL 
             call MDS_SEG8TORL( j,bi,bj,k,Nr, r8seg, .FALSE., arr )
./pkg/mdsio/mdsio_gl.F 75 MDSREADFIELD_3D_GL 
      _RL arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,Nr,nSx,nSy)
./pkg/mdsio/mdsio_gl.F 836 MDSREADFIELD_2D_GL 
      _RL arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nLocz,nSx,nSy)
./pkg/mdsio/mdsio_gl_slice.F 178 MDSREADFIELD_XZ_GL 
             call MDS_SEG4TORS_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r4seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 180 MDSREADFIELD_XZ_GL 
             call MDS_SEG4TORL_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r4seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 193 MDSREADFIELD_XZ_GL 
             call MDS_SEG8TORS_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r8seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 195 MDSREADFIELD_XZ_GL 
             call MDS_SEG8TORL_2D(sNx,oLx,nNz,bi,bj,k,.TRUE.,r8seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 209 MDSREADFIELD_XZ_GL 
        arr_gl(ii,bi,ip,bj,jp,k)=arr(ii,k,bi,bj)
./pkg/mdsio/mdsio_gl_slice.F 302 MDSREADFIELD_YZ_GL 
      _RL arr(1-oLy:sNy+oLy,Nr,nSx,nSy)
./pkg/mdsio/mdsio_gl_slice.F 405 MDSREADFIELD_YZ_GL 
             call MDS_SEG4TORS_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r4seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 407 MDSREADFIELD_YZ_GL 
             call MDS_SEG4TORL_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r4seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 420 MDSREADFIELD_YZ_GL 
             call MDS_SEG8TORS_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r8seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 422 MDSREADFIELD_YZ_GL 
             call MDS_SEG8TORL_2D(sNy,oLy,nNz,bi,bj,k,.TRUE.,r8seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 436 MDSREADFIELD_YZ_GL 
        arr_gl(bi,ip,jj,bj,jp,k)=arr(jj,k,bi,bj)
./pkg/mdsio/mdsio_gl_slice.F 544 MDSWRITEFIELD_XZ_GL 
      _RL arr(1-oLx:sNx+oLx,Nr,nSx,nSy)
./pkg/mdsio/mdsio_gl_slice.F 604 MDSWRITEFIELD_XZ_GL 
               arr(ii,k,bi,bj)=arr_gl(ii,bi,ip,bj,jp,k)
./pkg/mdsio/mdsio_gl_slice.F 611 MDSWRITEFIELD_XZ_GL 
             call MDS_SEG4TORS_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r4seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 613 MDSWRITEFIELD_XZ_GL 
             call MDS_SEG4TORL_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r4seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 626 MDSWRITEFIELD_XZ_GL 
             call MDS_SEG8TORS_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r8seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 628 MDSWRITEFIELD_XZ_GL 
             call MDS_SEG8TORL_2D(sNx,oLx,nNz,bi,bj,k,.FALSE.,r8seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 74 MDSREADFIELD_XZ_GL 
      _RL arr(1-oLx:sNx+oLx,Nr,nSx,nSy)
./pkg/mdsio/mdsio_gl_slice.F 772 MDSWRITEFIELD_YZ_GL 
      _RL arr(1-oLy:sNy+oLy,Nr,nSx,nSy)
./pkg/mdsio/mdsio_gl_slice.F 832 MDSWRITEFIELD_YZ_GL 
               arr(jj,k,bi,bj)=arr_gl(bi,ip,jj,bj,jp,k)
./pkg/mdsio/mdsio_gl_slice.F 839 MDSWRITEFIELD_YZ_GL 
             call MDS_SEG4TORS_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r4seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 841 MDSWRITEFIELD_YZ_GL 
             call MDS_SEG4TORL_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r4seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 854 MDSWRITEFIELD_YZ_GL 
             call MDS_SEG8TORS_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r8seg,arr)
./pkg/mdsio/mdsio_gl_slice.F 856 MDSWRITEFIELD_YZ_GL 
             call MDS_SEG8TORL_2D(sNy,oLy,nNz,bi,bj,k,.FALSE.,r8seg,arr)
./pkg/mdsio/mdsio_rd_rec_rl.F 12 MDS_RD_REC_RL 
     O                          arr,
./pkg/mdsio/mdsio_rd_rec_rl.F 40 MDS_RD_REC_RL 
      _RL    arr(nArr)
./pkg/mdsio/mdsio_rd_rec_rl.F 63 MDS_RD_REC_RL 
          arr(k) = r4Buf(k)
./pkg/mdsio/mdsio_rd_rec_rl.F 67 MDS_RD_REC_RL 
        READ( dUnit, rec=iRec ) arr
./pkg/mdsio/mdsio_rd_rec_rl.F 74 MDS_RD_REC_RL 
          arr(k) = r8Buf(k)
./pkg/mdsio/mdsio_rd_rec_rs.F 12 MDS_RD_REC_RS 
     O                          arr,
./pkg/mdsio/mdsio_rd_rec_rs.F 40 MDS_RD_REC_RS 
      _RS    arr(nArr)
./pkg/mdsio/mdsio_rd_rec_rs.F 63 MDS_RD_REC_RS 
          arr(k) = r4Buf(k)
./pkg/mdsio/mdsio_rd_rec_rs.F 71 MDS_RD_REC_RS 
          arr(k) = r8Buf(k)
./pkg/mdsio/mdsio_readvector.F 11 MDSREADVECTOR 
     O   arr,
./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 320 MDSREADVECTOR 
           CALL MDS_BUFFERTORS( local, arr, narr, .TRUE., myThid )
./pkg/mdsio/mdsio_readvector.F 322 MDSREADVECTOR 
           CALL MDS_BUFFERTORL( local, arr, narr, .TRUE., myThid )
./pkg/mdsio/mdsio_readvector.F 47 MDSREADVECTOR 
      _RL arr(narr)
./pkg/mdsio/mdsio_rw_field.F 119 MDSREADFIELD_LOC 
      _RL     arr(*)
./pkg/mdsio/mdsio_rw_field.F 131 MDSREADFIELD_LOC 
     O                arr, dummyRS,
./pkg/mdsio/mdsio_rw_field.F 136 MDSREADFIELD_LOC 
     O                dummyRL, arr,
./pkg/mdsio/mdsio_rw_field.F 155 MDSWRITEFIELD 
     I   arr,
./pkg/mdsio/mdsio_rw_field.F 190 MDSWRITEFIELD 
      _RL     arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nNz,nSx,nSy)
./pkg/mdsio/mdsio_rw_field.F 203 MDSWRITEFIELD 
     I                 arrType, nNz, 1, nNz, arr, dummyRS,
./pkg/mdsio/mdsio_rw_field.F 208 MDSWRITEFIELD 
     I                 arrType, nNz, 1, nNz, dummyRL, arr,
./pkg/mdsio/mdsio_rw_field.F 227 MDSWRITEFIELD_LOC 
     I   arr,
./pkg/mdsio/mdsio_rw_field.F 22 MDSREADFIELD 
     O   arr,
./pkg/mdsio/mdsio_rw_field.F 262 MDSWRITEFIELD_LOC 
      _RL     arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nNz,nSx,nSy)
./pkg/mdsio/mdsio_rw_field.F 275 MDSWRITEFIELD_LOC 
     I                 arrType, nNz, 1, nNz, arr, dummyRS,
./pkg/mdsio/mdsio_rw_field.F 280 MDSWRITEFIELD_LOC 
     I                 arrType, nNz, 1, nNz, dummyRL, arr,
./pkg/mdsio/mdsio_rw_field.F 53 MDSREADFIELD 
      _RL     arr(*)
./pkg/mdsio/mdsio_rw_field.F 65 MDSREADFIELD 
     O                arr, dummyRS,
./pkg/mdsio/mdsio_rw_field.F 70 MDSREADFIELD 
     O                dummyRL, arr,
./pkg/mdsio/mdsio_rw_field.F 88 MDSREADFIELD_LOC 
     O   arr,
./pkg/mdsio/mdsio_rw_slice.F 121 MDSREADFIELDYZ 
      _RL     arr(*)
./pkg/mdsio/mdsio_rw_slice.F 133 MDSREADFIELDYZ 
     O                arr, dummyRS,
./pkg/mdsio/mdsio_rw_slice.F 138 MDSREADFIELDYZ 
     O                dummyRL, arr,
./pkg/mdsio/mdsio_rw_slice.F 156 MDSREADFIELDXZ_LOC 
     |   arr,
./pkg/mdsio/mdsio_rw_slice.F 186 MDSREADFIELDXZ_LOC 
      _RL     arr(*)
./pkg/mdsio/mdsio_rw_slice.F 198 MDSREADFIELDXZ_LOC 
     O                arr, dummyRS,
./pkg/mdsio/mdsio_rw_slice.F 203 MDSREADFIELDXZ_LOC 
     O                dummyRL, arr,
./pkg/mdsio/mdsio_rw_slice.F 221 MDSREADFIELDYZ_LOC 
     |   arr,
./pkg/mdsio/mdsio_rw_slice.F 251 MDSREADFIELDYZ_LOC 
      _RL     arr(*)
./pkg/mdsio/mdsio_rw_slice.F 263 MDSREADFIELDYZ_LOC 
     O                arr, dummyRS,
./pkg/mdsio/mdsio_rw_slice.F 268 MDSREADFIELDYZ_LOC 
     O                dummyRL, arr,
./pkg/mdsio/mdsio_rw_slice.F 26 MDSREADFIELDXZ 
     |   arr,
./pkg/mdsio/mdsio_rw_slice.F 287 MDSWRITEFIELDXZ 
     I   arr,
./pkg/mdsio/mdsio_rw_slice.F 321 MDSWRITEFIELDXZ 
      _RL     arr(*)
./pkg/mdsio/mdsio_rw_slice.F 334 MDSWRITEFIELDXZ 
     I                 arrType, nNz, arr, dummyRS,
./pkg/mdsio/mdsio_rw_slice.F 339 MDSWRITEFIELDXZ 
     I                 arrType, nNz, dummyRL, arr,
./pkg/mdsio/mdsio_rw_slice.F 358 MDSWRITEFIELDYZ 
     I   arr,
./pkg/mdsio/mdsio_rw_slice.F 392 MDSWRITEFIELDYZ 
      _RL     arr(*)
./pkg/mdsio/mdsio_rw_slice.F 405 MDSWRITEFIELDYZ 
     I                 arrType, nNz, arr, dummyRS,
./pkg/mdsio/mdsio_rw_slice.F 410 MDSWRITEFIELDYZ 
     I                 arrType, nNz, dummyRL, arr,
./pkg/mdsio/mdsio_rw_slice.F 429 MDSWRITEFIELDXZ_LOC 
     I   arr,
./pkg/mdsio/mdsio_rw_slice.F 463 MDSWRITEFIELDXZ_LOC 
      _RL     arr(*)
./pkg/mdsio/mdsio_rw_slice.F 476 MDSWRITEFIELDXZ_LOC 
     I                 arrType, nNz, arr, dummyRS,
./pkg/mdsio/mdsio_rw_slice.F 481 MDSWRITEFIELDXZ_LOC 
     I                 arrType, nNz, dummyRL, arr,
./pkg/mdsio/mdsio_rw_slice.F 500 MDSWRITEFIELDYZ_LOC 
     I   arr,
./pkg/mdsio/mdsio_rw_slice.F 534 MDSWRITEFIELDYZ_LOC 
      _RL     arr(*)
./pkg/mdsio/mdsio_rw_slice.F 547 MDSWRITEFIELDYZ_LOC 
     I                 arrType, nNz, arr, dummyRS,
./pkg/mdsio/mdsio_rw_slice.F 552 MDSWRITEFIELDYZ_LOC 
     I                 arrType, nNz, dummyRL, arr,
./pkg/mdsio/mdsio_rw_slice.F 56 MDSREADFIELDXZ 
      _RL     arr(*)
./pkg/mdsio/mdsio_rw_slice.F 68 MDSREADFIELDXZ 
     O                arr, dummyRS,
./pkg/mdsio/mdsio_rw_slice.F 73 MDSREADFIELDXZ 
     O                dummyRL, arr,
./pkg/mdsio/mdsio_rw_slice.F 91 MDSREADFIELDYZ 
     |   arr,
./pkg/mdsio/mdsio_seg4torl.F 23 MDS_SEG4TORL 
      _RL arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nNz,nSx,nSy)
./pkg/mdsio/mdsio_seg4torl.F 31 MDS_SEG4TORL 
        arr(ii,j,k,bi,bj)=seg(ii)
./pkg/mdsio/mdsio_seg4torl.F 35 MDS_SEG4TORL 
        seg(ii)=arr(ii,j,k,bi,bj)
./pkg/mdsio/mdsio_seg4torl.F 6 MDS_SEG4TORL 
      SUBROUTINE MDS_SEG4TORL( j,bi,bj,k,nNz, seg, copyTo, arr )
./pkg/mdsio/mdsio_seg4tors.F 23 MDS_SEG4TORS 
      _RS arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nNz,nSx,nSy)
./pkg/mdsio/mdsio_seg4tors.F 31 MDS_SEG4TORS 
        arr(ii,j,k,bi,bj)=seg(ii)
./pkg/mdsio/mdsio_seg4tors.F 35 MDS_SEG4TORS 
        seg(ii)=arr(ii,j,k,bi,bj)
./pkg/mdsio/mdsio_seg4tors.F 6 MDS_SEG4TORS 
      SUBROUTINE MDS_SEG4TORS( j,bi,bj,k,nNz, seg, copyTo, arr )
./pkg/mdsio/mdsio_seg8torl.F 23 MDS_SEG8TORL 
      _RL arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nNz,nSx,nSy)
./pkg/mdsio/mdsio_seg8torl.F 31 MDS_SEG8TORL 
        arr(ii,j,k,bi,bj)=seg(ii)
./pkg/mdsio/mdsio_seg8torl.F 35 MDS_SEG8TORL 
        seg(ii)=arr(ii,j,k,bi,bj)
./pkg/mdsio/mdsio_seg8torl.F 6 MDS_SEG8TORL 
      SUBROUTINE MDS_SEG8TORL( j,bi,bj,k,nNz, seg, copyTo, arr )
./pkg/mdsio/mdsio_seg8tors.F 23 MDS_SEG8TORS 
      _RS arr(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nNz,nSx,nSy)
./pkg/mdsio/mdsio_seg8tors.F 31 MDS_SEG8TORS 
        arr(ii,j,k,bi,bj)=seg(ii)
./pkg/mdsio/mdsio_seg8tors.F 35 MDS_SEG8TORS 
        seg(ii)=arr(ii,j,k,bi,bj)
./pkg/mdsio/mdsio_seg8tors.F 6 MDS_SEG8TORS 
      SUBROUTINE MDS_SEG8TORS( j,bi,bj,k,nNz, seg, copyTo, arr )
./pkg/mdsio/mdsio_segxtorx_2d.F 118 MDS_SEG8TORL_2D 
      _RL arr(1-ol:sn+ol,nNz,nSx,nSy)
./pkg/mdsio/mdsio_segxtorx_2d.F 125 MDS_SEG8TORL_2D 
        arr(ii,k,bi,bj)=seg(ii)
./pkg/mdsio/mdsio_segxtorx_2d.F 129 MDS_SEG8TORL_2D 
        seg(ii)=arr(ii,k,bi,bj)
./pkg/mdsio/mdsio_segxtorx_2d.F 138 MDS_SEG8TORS_2D 
      SUBROUTINE MDS_SEG8TORS_2D(sn,ol,nNz,bi,bj,k,copyTo,seg,arr)
./pkg/mdsio/mdsio_segxtorx_2d.F 159 MDS_SEG8TORS_2D 
      _RS arr(1-ol:sn+ol,nNz,nSx,nSy)
./pkg/mdsio/mdsio_segxtorx_2d.F 15 MDS_SEG4TORL_2D 
      SUBROUTINE MDS_SEG4TORL_2D(sn,ol,nNz,bi,bj,k,copyTo,seg,arr)
./pkg/mdsio/mdsio_segxtorx_2d.F 166 MDS_SEG8TORS_2D 
        arr(ii,k,bi,bj)=seg(ii)
./pkg/mdsio/mdsio_segxtorx_2d.F 170 MDS_SEG8TORS_2D 
        seg(ii)=arr(ii,k,bi,bj)
./pkg/mdsio/mdsio_segxtorx_2d.F 36 MDS_SEG4TORL_2D 
      _RL arr(1-ol:sn+ol,nNz,nSx,nSy)
./pkg/mdsio/mdsio_segxtorx_2d.F 43 MDS_SEG4TORL_2D 
        arr(ii,k,bi,bj)=seg(ii)
./pkg/mdsio/mdsio_segxtorx_2d.F 47 MDS_SEG4TORL_2D 
        seg(ii)=arr(ii,k,bi,bj)
./pkg/mdsio/mdsio_segxtorx_2d.F 56 MDS_SEG4TORS_2D 
      SUBROUTINE MDS_SEG4TORS_2D(sn,ol,nNz,bi,bj,k,copyTo,seg,arr)
./pkg/mdsio/mdsio_segxtorx_2d.F 77 MDS_SEG4TORS_2D 
      _RS arr(1-ol:sn+ol,nNz,nSx,nSy)
./pkg/mdsio/mdsio_segxtorx_2d.F 84 MDS_SEG4TORS_2D 
        arr(ii,k,bi,bj)=seg(ii)
./pkg/mdsio/mdsio_segxtorx_2d.F 88 MDS_SEG4TORS_2D 
        seg(ii)=arr(ii,k,bi,bj)
./pkg/mdsio/mdsio_segxtorx_2d.F 97 MDS_SEG8TORL_2D 
      SUBROUTINE MDS_SEG8TORL_2D(sn,ol,nNz,bi,bj,k,copyTo,seg,arr)
./pkg/mdsio/mdsio_wr_rec_rl.F 12 MDS_WR_REC_RL 
     I                          arr,
./pkg/mdsio/mdsio_wr_rec_rl.F 40 MDS_WR_REC_RL 
      _RL    arr(nArr)
./pkg/mdsio/mdsio_wr_rec_rl.F 59 MDS_WR_REC_RL 
          r4Buf(k) = arr(k)
./pkg/mdsio/mdsio_wr_rec_rl.F 67 MDS_WR_REC_RL 
        WRITE( dUnit, rec=iRec ) arr
./pkg/mdsio/mdsio_wr_rec_rl.F 70 MDS_WR_REC_RL 
          r8Buf(k) = arr(k)
./pkg/mdsio/mdsio_wr_rec_rs.F 12 MDS_WR_REC_RS 
     I                          arr,
./pkg/mdsio/mdsio_wr_rec_rs.F 40 MDS_WR_REC_RS 
      _RS    arr(nArr)
./pkg/mdsio/mdsio_wr_rec_rs.F 59 MDS_WR_REC_RS 
          r4Buf(k) = arr(k)
./pkg/mdsio/mdsio_wr_rec_rs.F 67 MDS_WR_REC_RS 
          r8Buf(k) = arr(k)
./pkg/mdsio/mdsio_writevector.F 12 MDSWRITEVECTOR 
     I   arr,
./pkg/mdsio/mdsio_writevector.F 155 MDSWRITEVECTOR 
           CALL MDS_BUFFERTORS( local, arr, narr, .FALSE., myThid )
./pkg/mdsio/mdsio_writevector.F 157 MDSWRITEVECTOR 
           CALL MDS_BUFFERTORL( local, arr, narr, .FALSE., myThid )
./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 54 MDSWRITEVECTOR 
      _RL arr(narr)
./pkg/monitor/mon_calc_stats_rl.F 12 MON_CALC_STATS_RL 
     I               myNr, arr, arrhFac, arrMask, arrArea, arrDr,
./pkg/monitor/mon_calc_stats_rl.F 141 MON_CALC_STATS_RL 
            tmpVal=arr(i,j,k,bi,bj)
./pkg/monitor/mon_calc_stats_rl.F 26 MON_CALC_STATS_RL 
      _RL arr    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/monitor/mon_calc_stats_rl.F 69 MON_CALC_STATS_RL 
           tmpVal  = arr(i,j,k,bi,bj)
./pkg/monitor/mon_calc_stats_rl.F 90 MON_CALC_STATS_RL 
             ddx = (arr(i+1,j,k,bi,bj)-tmpVal)
./pkg/monitor/mon_calc_stats_rl.F 91 MON_CALC_STATS_RL 
     &           + (arr(i-1,j,k,bi,bj)-tmpVal)
./pkg/monitor/mon_calc_stats_rl.F 95 MON_CALC_STATS_RL 
             ddy = (arr(i,j+1,k,bi,bj)-tmpVal)
./pkg/monitor/mon_calc_stats_rl.F 96 MON_CALC_STATS_RL 
     &           + (arr(i,j-1,k,bi,bj)-tmpVal)
./pkg/monitor/mon_calc_stats_rs.F 12 MON_CALC_STATS_RS 
     I               myNr, arr, arrhFac, arrMask, arrArea, arrDr,
./pkg/monitor/mon_calc_stats_rs.F 141 MON_CALC_STATS_RS 
            tmpVal=arr(i,j,k,bi,bj)
./pkg/monitor/mon_calc_stats_rs.F 26 MON_CALC_STATS_RS 
      _RS arr    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/monitor/mon_calc_stats_rs.F 69 MON_CALC_STATS_RS 
           tmpVal  = arr(i,j,k,bi,bj)
./pkg/monitor/mon_calc_stats_rs.F 90 MON_CALC_STATS_RS 
             ddx = (arr(i+1,j,k,bi,bj)-tmpVal)
./pkg/monitor/mon_calc_stats_rs.F 91 MON_CALC_STATS_RS 
     &           + (arr(i-1,j,k,bi,bj)-tmpVal)
./pkg/monitor/mon_calc_stats_rs.F 95 MON_CALC_STATS_RS 
             ddy = (arr(i,j+1,k,bi,bj)-tmpVal)
./pkg/monitor/mon_calc_stats_rs.F 96 MON_CALC_STATS_RS 
     &           + (arr(i,j-1,k,bi,bj)-tmpVal)
./pkg/monitor/mon_printstats_rl.F 12 MON_PRINTSTATS_RL 
     I     myNr, arr, arrName,
./pkg/monitor/mon_printstats_rl.F 28 MON_PRINTSTATS_RL 
      _RL arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/monitor/mon_printstats_rl.F 45 MON_PRINTSTATS_RL 
     I     myNr, arr, arrMask, arrhFac, arrArea, arrDr,
./pkg/monitor/mon_printstats_rs.F 12 MON_PRINTSTATS_RS 
     I     myNr, arr, arrName,
./pkg/monitor/mon_printstats_rs.F 27 MON_PRINTSTATS_RS 
      _RS arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/monitor/mon_printstats_rs.F 39 MON_PRINTSTATS_RS 
     I     myNr, arr,
./pkg/monitor/mon_stats_latbnd_rl.F 103 MON_STATS_LATBND_RL 
           tmpVal=arr(i,j,k,bi,bj)
./pkg/monitor/mon_stats_latbnd_rl.F 13 MON_STATS_LATBND_RL 
     I     arr, arrMask, arrhFac, arrArea, arrY, arrDr,
./pkg/monitor/mon_stats_latbnd_rl.F 34 MON_STATS_LATBND_RL 
      _RL arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/monitor/mon_stats_rl.F 12 MON_STATS_RL 
     I     myNr, arr, arrMask,arrhFac, arrArea, arrDr,
./pkg/monitor/mon_stats_rl.F 136 MON_STATS_RL 
            tmpVal=arr(I,J,K,bi,bj)
./pkg/monitor/mon_stats_rl.F 25 MON_STATS_RL 
      _RL arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/monitor/mon_stats_rl.F 70 MON_STATS_RL 
           tmpVal=arr(I,J,K,bi,bj)
./pkg/monitor/mon_stats_rl.F 81 MON_STATS_RL 
     &         (arr(I+1,J,K,bi,bj)-tmpVal)*arrMask(I+1,J,K,bi,bj)
./pkg/monitor/mon_stats_rl.F 82 MON_STATS_RL 
     &        +(arr(I-1,J,K,bi,bj)-tmpVal)*arrMask(I-1,J,K,bi,bj)
./pkg/monitor/mon_stats_rl.F 83 MON_STATS_RL 
     &        +(arr(I,J+1,K,bi,bj)-tmpVal)*arrMask(I,J+1,K,bi,bj)
./pkg/monitor/mon_stats_rl.F 84 MON_STATS_RL 
     &        +(arr(I,J-1,K,bi,bj)-tmpVal)*arrMask(I,J-1,K,bi,bj)
./pkg/monitor/mon_stats_rs.F 103 MON_STATS_RS 
            tmpVal=arr(I,J,K,bi,bj)
./pkg/monitor/mon_stats_rs.F 12 MON_STATS_RS 
     I     myNr, arr,
./pkg/monitor/mon_stats_rs.F 26 MON_STATS_RS 
      _RS arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/monitor/mon_stats_rs.F 56 MON_STATS_RS 
           tmpVal=arr(I,J,K,bi,bj)
./pkg/monitor/mon_writestats_rl.F 12 MON_WRITESTATS_RL 
     I     myNr, arr, arrName,
./pkg/monitor/mon_writestats_rl.F 29 MON_WRITESTATS_RL 
      _RL arr    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/monitor/mon_writestats_rl.F 46 MON_WRITESTATS_RL 
     I         myNr, arr, arrhFac, arrMask, arrArea, arrDr,
./pkg/monitor/mon_writestats_rs.F 12 MON_WRITESTATS_RS 
     I     myNr, arr, arrName,
./pkg/monitor/mon_writestats_rs.F 29 MON_WRITESTATS_RS 
      _RS arr    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/monitor/mon_writestats_rs.F 46 MON_WRITESTATS_RS 
     I     myNr, arr, arrhFac, arrMask, arrArea, arrDr,
./pkg/offline/offline_fields_load.F 417 LEF_ZERO3 
      SUBROUTINE LEF_ZERO3( arr ,myThid )
./pkg/offline/offline_fields_load.F 429 LEF_ZERO3 
      _RS  arr (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./pkg/offline/offline_fields_load.F 441 LEF_ZERO3 
          arr(i,j,k,bi,bj)=0.
./pkg/offline/offline_fields_load.F 453 LEF_ZERO2 
      SUBROUTINE LEF_ZERO2( arr ,myThid )
./pkg/offline/offline_fields_load.F 465 LEF_ZERO2 
      _RS  arr (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/offline/offline_fields_load.F 475 LEF_ZERO2 
          arr(i,j,bi,bj)=0.
./pkg/sphere/exch_all_2d_rl.F 35 EXCH_ALLGATHER_2D_RL 
      _RL arr ( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy, nSx, nSy )
./pkg/sphere/exch_all_2d_rl.F 68 EXCH_ALLGATHER_2D_RL 
      call MPI_ALLGATHER(  arr    , sendsize, MPI_DOUBLE_PRECISION
./pkg/sphere/exch_all_2d_rl.F 7 EXCH_ALLGATHER_2D_RL 
     I       arr
./model/src/port_rand.F 101 PORT_RANARR 
      SUBROUTINE PORT_RANARR(n,arr)
./model/src/port_rand.F 111 PORT_RANARR 
      real*8 arr(n)
./model/src/port_rand.F 126 PORT_RANARR 
       arr(i)=port_rand(seed)
./model/src/remove_mean.F 10 REMOVE_MEAN_RL 
     I                myNr, arr, arrMask, arrhFac, arrArea, arrDr,
./model/src/remove_mean.F 115 REMOVE_MEAN_RS 
     I                myNr, arr, arrMask, arrhFac, arrArea, arrDr,
./model/src/remove_mean.F 139 REMOVE_MEAN_RS 
      _RS arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./model/src/remove_mean.F 166 REMOVE_MEAN_RS 
           tmpVal=arr(I,J,K,bi,bj)
./model/src/remove_mean.F 190 REMOVE_MEAN_RS 
             arr(I,J,K,bi,bj) = arr(I,J,K,bi,bj) - theMean
./model/src/remove_mean.F 34 REMOVE_MEAN_RL 
      _RL arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./model/src/remove_mean.F 61 REMOVE_MEAN_RL 
           tmpVal=arr(I,J,K,bi,bj)
./model/src/remove_mean.F 85 REMOVE_MEAN_RL 
             arr(I,J,K,bi,bj) = arr(I,J,K,bi,bj) - theMean
./pkg/atm_ocn_coupler/mds_byteswap.F 13 MDS_BYTESWAPR4 
      SUBROUTINE MDS_BYTESWAPR4( n, arr )
./pkg/atm_ocn_coupler/mds_byteswap.F 24 MDS_BYTESWAPR4 
      CHARACTER*(*) arr
./pkg/atm_ocn_coupler/mds_byteswap.F 33 MDS_BYTESWAPR4 
       cc=arr(i:i)
./pkg/atm_ocn_coupler/mds_byteswap.F 34 MDS_BYTESWAPR4 
       arr(i:i)=arr(i+3:i+3)
./pkg/atm_ocn_coupler/mds_byteswap.F 35 MDS_BYTESWAPR4 
       arr(i+3:i+3)=cc
./pkg/atm_ocn_coupler/mds_byteswap.F 36 MDS_BYTESWAPR4 
       cc=arr(i+1:i+1)
./pkg/atm_ocn_coupler/mds_byteswap.F 37 MDS_BYTESWAPR4 
       arr(i+1:i+1)=arr(i+2:i+2)
./pkg/atm_ocn_coupler/mds_byteswap.F 38 MDS_BYTESWAPR4 
       arr(i+2:i+2)=cc
./pkg/atm_ocn_coupler/mds_byteswap.F 47 MDS_BYTESWAPR8 
      SUBROUTINE MDS_BYTESWAPR8( n, arr )
./pkg/atm_ocn_coupler/mds_byteswap.F 58 MDS_BYTESWAPR8 
      CHARACTER*(*) arr
./pkg/atm_ocn_coupler/mds_byteswap.F 67 MDS_BYTESWAPR8 
       cc=arr(i:i)
./pkg/atm_ocn_coupler/mds_byteswap.F 68 MDS_BYTESWAPR8 
       arr(i:i)=arr(i+7:i+7)
./pkg/atm_ocn_coupler/mds_byteswap.F 69 MDS_BYTESWAPR8 
       arr(i+7:i+7)=cc
./pkg/atm_ocn_coupler/mds_byteswap.F 70 MDS_BYTESWAPR8 
       cc=arr(i+1:i+1)
./pkg/atm_ocn_coupler/mds_byteswap.F 71 MDS_BYTESWAPR8 
       arr(i+1:i+1)=arr(i+6:i+6)
./pkg/atm_ocn_coupler/mds_byteswap.F 72 MDS_BYTESWAPR8 
       arr(i+6:i+6)=cc
./pkg/atm_ocn_coupler/mds_byteswap.F 73 MDS_BYTESWAPR8 
       cc=arr(i+2:i+2)
./pkg/atm_ocn_coupler/mds_byteswap.F 74 MDS_BYTESWAPR8 
       arr(i+2:i+2)=arr(i+5:i+5)
./pkg/atm_ocn_coupler/mds_byteswap.F 75 MDS_BYTESWAPR8 
       arr(i+5:i+5)=cc
./pkg/atm_ocn_coupler/mds_byteswap.F 76 MDS_BYTESWAPR8 
       cc=arr(i+3:i+3)
./pkg/atm_ocn_coupler/mds_byteswap.F 77 MDS_BYTESWAPR8 
       arr(i+3:i+3)=arr(i+4:i+4)
./pkg/atm_ocn_coupler/mds_byteswap.F 78 MDS_BYTESWAPR8 
       arr(i+4:i+4)=cc
./eesupp/src/lef_zero.F 20 LEF_ZERO 
      _RS  arr (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./eesupp/src/lef_zero.F 31 LEF_ZERO 
          arr(i,j,bi,bj)=0.
./eesupp/src/lef_zero.F 9 LEF_ZERO 
      SUBROUTINE LEF_ZERO( arr ,myThid )
./eesupp/src/mds_byteswapi4.F 20 MDS_BYTESWAPI4 
      integer(kind=4) arr(n), i32
./eesupp/src/mds_byteswapi4.F 30 MDS_BYTESWAPI4 
      arr(i) = i32(arr(i))
./eesupp/src/mds_byteswapi4.F 37 MDS_BYTESWAPI4 
      character*(*) arr
./eesupp/src/mds_byteswapi4.F 44 MDS_BYTESWAPI4 
       cc=arr(i:i)
./eesupp/src/mds_byteswapi4.F 45 MDS_BYTESWAPI4 
       arr(i:i)=arr(i+3:i+3)
./eesupp/src/mds_byteswapi4.F 46 MDS_BYTESWAPI4 
       arr(i+3:i+3)=cc
./eesupp/src/mds_byteswapi4.F 47 MDS_BYTESWAPI4 
       cc=arr(i+1:i+1)
./eesupp/src/mds_byteswapi4.F 48 MDS_BYTESWAPI4 
       arr(i+1:i+1)=arr(i+2:i+2)
./eesupp/src/mds_byteswapi4.F 49 MDS_BYTESWAPI4 
       arr(i+2:i+2)=cc
./eesupp/src/mds_byteswapi4.F 6 MDS_BYTESWAPI4 
      subroutine MDS_BYTESWAPI4( n, arr )
./eesupp/src/mds_byteswapr4.F 20 MDS_BYTESWAPR4 
      integer(kind=4) arr(n), i32
./eesupp/src/mds_byteswapr4.F 30 MDS_BYTESWAPR4 
      arr(i) = i32(arr(i))
./eesupp/src/mds_byteswapr4.F 37 MDS_BYTESWAPR4 
      character*(*) arr
./eesupp/src/mds_byteswapr4.F 44 MDS_BYTESWAPR4 
       cc=arr(i:i)
./eesupp/src/mds_byteswapr4.F 45 MDS_BYTESWAPR4 
       arr(i:i)=arr(i+3:i+3)
./eesupp/src/mds_byteswapr4.F 46 MDS_BYTESWAPR4 
       arr(i+3:i+3)=cc
./eesupp/src/mds_byteswapr4.F 47 MDS_BYTESWAPR4 
       cc=arr(i+1:i+1)
./eesupp/src/mds_byteswapr4.F 48 MDS_BYTESWAPR4 
       arr(i+1:i+1)=arr(i+2:i+2)
./eesupp/src/mds_byteswapr4.F 49 MDS_BYTESWAPR4 
       arr(i+2:i+2)=cc
./eesupp/src/mds_byteswapr4.F 6 MDS_BYTESWAPR4 
      subroutine MDS_BYTESWAPR4( n, arr )
./eesupp/src/mds_byteswapr8.F 20 MDS_BYTESWAPR8 
      integer(kind=8) arr(n),i64,i1
./eesupp/src/mds_byteswapr8.F 34 MDS_BYTESWAPR8 
      arr(i) = i64(arr(i))
./eesupp/src/mds_byteswapr8.F 41 MDS_BYTESWAPR8 
      character*(*) arr
./eesupp/src/mds_byteswapr8.F 48 MDS_BYTESWAPR8 
       cc=arr(i:i)
./eesupp/src/mds_byteswapr8.F 49 MDS_BYTESWAPR8 
       arr(i:i)=arr(i+7:i+7)
./eesupp/src/mds_byteswapr8.F 50 MDS_BYTESWAPR8 
       arr(i+7:i+7)=cc
./eesupp/src/mds_byteswapr8.F 51 MDS_BYTESWAPR8 
       cc=arr(i+1:i+1)
./eesupp/src/mds_byteswapr8.F 52 MDS_BYTESWAPR8 
       arr(i+1:i+1)=arr(i+6:i+6)
./eesupp/src/mds_byteswapr8.F 53 MDS_BYTESWAPR8 
       arr(i+6:i+6)=cc
./eesupp/src/mds_byteswapr8.F 54 MDS_BYTESWAPR8 
       cc=arr(i+2:i+2)
./eesupp/src/mds_byteswapr8.F 55 MDS_BYTESWAPR8 
       arr(i+2:i+2)=arr(i+5:i+5)
./eesupp/src/mds_byteswapr8.F 56 MDS_BYTESWAPR8 
       arr(i+5:i+5)=cc
./eesupp/src/mds_byteswapr8.F 57 MDS_BYTESWAPR8 
       cc=arr(i+3:i+3)
./eesupp/src/mds_byteswapr8.F 58 MDS_BYTESWAPR8 
       arr(i+3:i+3)=arr(i+4:i+4)
./eesupp/src/mds_byteswapr8.F 59 MDS_BYTESWAPR8 
       arr(i+4:i+4)=cc
./eesupp/src/mds_byteswapr8.F 6 MDS_BYTESWAPR8 
      subroutine MDS_BYTESWAPR8( n, arr )
./pkg/compon_communic/comprecv_r4.F 10 COMPRECV_R4 
      real*4 arr(1-Oi:Ni+Oi,1-Oj:Nj+Oj)
./pkg/compon_communic/comprecv_r4.F 5 COMPRECV_R4 
      subroutine COMPRECV_R4( dataname, Ni,Oi,Nj,Oj, arr )
./pkg/compon_communic/comprecv_r4.F 73 COMPRECV_R4 
        arr(i,j)=r4buf(ij)
./pkg/compon_communic/comprecv_r4tiles.F 10 COMPRECV_R4TILES 
      real*4 arr(1-Oi:Ni+Oi,1-Oj:Nj+Oj,Nk,Tx,Ty)
./pkg/compon_communic/comprecv_r4tiles.F 5 COMPRECV_R4TILES 
      subroutine COMPRECV_R4TILES( dataname, Ni,Oi,Nj,Oj,Nk,Tx,Ty, arr )
./pkg/compon_communic/comprecv_r4tiles.F 80 COMPRECV_R4TILES 
         arr(i,j,k,bi,bj)=r4buf(ij)
./pkg/compon_communic/comprecv_r8.F 10 COMPRECV_R8 
      real*8 arr(1-Oi:Ni+Oi,1-Oj:Nj+Oj)
./pkg/compon_communic/comprecv_r8.F 5 COMPRECV_R8 
      subroutine COMPRECV_R8( dataname, Ni,Oi,Nj,Oj, arr )
./pkg/compon_communic/comprecv_r8.F 73 COMPRECV_R8 
        arr(i,j)=r8buf(ij)
./pkg/compon_communic/comprecv_r8tiles.F 10 COMPRECV_R8TILES 
      real*8 arr(1-Oi:Ni+Oi,1-Oj:Nj+Oj,Nk,Tx,Ty)
./pkg/compon_communic/comprecv_r8tiles.F 5 COMPRECV_R8TILES 
      subroutine COMPRECV_R8TILES( dataname, Ni,Oi,Nj,Oj,Nk,Tx,Ty, arr )
./pkg/compon_communic/comprecv_r8tiles.F 80 COMPRECV_R8TILES 
         arr(i,j,k,bi,bj)=r8buf(ij)
./pkg/compon_communic/compsend_r4.F 10 COMPSEND_R4 
      real*4 arr(1-Oi:Ni+Oi,1-Oj:Nj+Oj)
./pkg/compon_communic/compsend_r4.F 38 COMPSEND_R4 
        r4buf(ij)=arr(i,j)
./pkg/compon_communic/compsend_r4.F 5 COMPSEND_R4 
      subroutine COMPSEND_R4( dataname, Ni,Oi,Nj,Oj, arr )
./pkg/compon_communic/compsend_r4tiles.F 10 COMPSEND_R4TILES 
      real*4 arr(1-Oi:Ni+Oi,1-Oj:Nj+Oj,Nk,Ti,Tj)
./pkg/compon_communic/compsend_r4tiles.F 48 COMPSEND_R4TILES 
         r4buf(ij)=arr(i,j,k,bi,bj)
./pkg/compon_communic/compsend_r4tiles.F 5 COMPSEND_R4TILES 
      subroutine COMPSEND_R4TILES( dataname,Ni,Oi,Nj,Oj,Nk,Ti,Tj, arr )
./pkg/compon_communic/compsend_r8.F 10 COMPSEND_R8 
      real*8 arr(1-Oi:Ni+Oi,1-Oj:Nj+Oj)
./pkg/compon_communic/compsend_r8.F 38 COMPSEND_R8 
        r8buf(ij)=arr(i,j)
./pkg/compon_communic/compsend_r8.F 5 COMPSEND_R8 
      subroutine COMPSEND_R8( dataname, Ni,Oi,Nj,Oj, arr )
./pkg/compon_communic/compsend_r8tiles.F 10 COMPSEND_R8TILES 
      real*8 arr(1-Oi:Ni+Oi,1-Oj:Nj+Oj,Nk,Ti,Tj)
./pkg/compon_communic/compsend_r8tiles.F 48 COMPSEND_R8TILES 
         r8buf(ij)=arr(i,j,k,bi,bj)
./pkg/compon_communic/compsend_r8tiles.F 5 COMPSEND_R8TILES 
      subroutine COMPSEND_R8TILES( dataname,Ni,Oi,Nj,Oj,Nk,Ti,Tj, arr )
./pkg/compon_communic/couprecv_r4.F 11 COUPRECV_R4 
      real*4 arr(Nx,Ny)
./pkg/compon_communic/couprecv_r4.F 5 COUPRECV_R4 
      subroutine COUPRECV_R4( component, dataname, Nx, Ny, arr )
./pkg/compon_communic/couprecv_r4.F 94 COUPRECV_R4 
         arr(Io+i-1,Jo+j-1)=r4buf(ij)
./pkg/compon_communic/couprecv_r4tiles.F 107 COUPRECV_R4TILES 
         arr(Io+i-1,Jo+j-1)=r4buf(ij)
./pkg/compon_communic/couprecv_r4tiles.F 11 COUPRECV_R4TILES 
      real*4 arr(Nx,Ny)
./pkg/compon_communic/couprecv_r4tiles.F 5 COUPRECV_R4TILES 
      subroutine COUPRECV_R4TILES( component, dataname, Nx, Ny, arr )
./pkg/compon_communic/couprecv_r8.F 11 COUPRECV_R8 
      real*8 arr(Nx,Ny)
./pkg/compon_communic/couprecv_r8.F 5 COUPRECV_R8 
      subroutine COUPRECV_R8( component, dataname, Nx, Ny, arr )
./pkg/compon_communic/couprecv_r8.F 94 COUPRECV_R8 
         arr(Io+i-1,Jo+j-1)=r8buf(ij)
./pkg/compon_communic/couprecv_r8tiles.F 107 COUPRECV_R8TILES 
         arr(Io+i-1,Jo+j-1)=r8buf(ij)
./pkg/compon_communic/couprecv_r8tiles.F 11 COUPRECV_R8TILES 
      real*8 arr(Nx,Ny)
./pkg/compon_communic/couprecv_r8tiles.F 5 COUPRECV_R8TILES 
      subroutine COUPRECV_R8TILES( component, dataname, Nx, Ny, arr )
./pkg/compon_communic/coupsend_r4.F 11 COUPSEND_R4 
      real*4 arr(Nx,Ny)
./pkg/compon_communic/coupsend_r4.F 58 COUPSEND_R4 
         r4buf(ij)=arr(Io+i-1,Jo+j-1)
./pkg/compon_communic/coupsend_r4.F 5 COUPSEND_R4 
      subroutine COUPSEND_R4( component, dataname, Nx, Ny, arr )
./pkg/compon_communic/coupsend_r4tiles.F 11 COUPSEND_R4TILES 
      real*4 arr(Nx,Ny)
./pkg/compon_communic/coupsend_r4tiles.F 5 COUPSEND_R4TILES 
      subroutine COUPSEND_R4TILES( component, dataname, Nx, Ny, arr )
./pkg/compon_communic/coupsend_r4tiles.F 61 COUPSEND_R4TILES 
          r4buf(ij)=arr(Io+i-1,Jo+j-1)
./pkg/compon_communic/coupsend_r8.F 11 COUPSEND_R8 
      real*8 arr(Nx,Ny)
./pkg/compon_communic/coupsend_r8.F 58 COUPSEND_R8 
         r8buf(ij)=arr(Io+i-1,Jo+j-1)
./pkg/compon_communic/coupsend_r8.F 5 COUPSEND_R8 
      subroutine COUPSEND_R8( component, dataname, Nx, Ny, arr )
./pkg/compon_communic/coupsend_r8tiles.F 11 COUPSEND_R8TILES 
      real*8 arr(Nx,Ny)
./pkg/compon_communic/coupsend_r8tiles.F 5 COUPSEND_R8TILES 
      subroutine COUPSEND_R8TILES( component, dataname, Nx, Ny, arr )
./pkg/compon_communic/coupsend_r8tiles.F 61 COUPSEND_R8TILES 
          r8buf(ij)=arr(Io+i-1,Jo+j-1)
./pkg/debug/debug_fld_stats_rl.F 23 DEBUG_FLD_STATS_RL 
      _RL arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/debug/debug_fld_stats_rl.F 50 DEBUG_FLD_STATS_RL 
           tmpVal=arr(I,J,K,bi,bj)
./pkg/debug/debug_fld_stats_rl.F 7 DEBUG_FLD_STATS_RL 
     I                myNr, arr,
./pkg/debug/debug_fld_stats_rl.F 89 DEBUG_FLD_STATS_RL 
            tmpVal=arr(I,J,K,bi,bj)
./pkg/debug/debug_fld_stats_rs.F 23 DEBUG_FLD_STATS_RS 
      _RS arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/debug/debug_fld_stats_rs.F 50 DEBUG_FLD_STATS_RS 
           tmpVal=arr(I,J,K,bi,bj)
./pkg/debug/debug_fld_stats_rs.F 7 DEBUG_FLD_STATS_RS 
     I                myNr, arr,
./pkg/debug/debug_fld_stats_rs.F 89 DEBUG_FLD_STATS_RS 
            tmpVal=arr(I,J,K,bi,bj)
./pkg/debug/debug_stats_rl.F 25 DEBUG_STATS_RL 
      _RL arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/debug/debug_stats_rl.F 36 DEBUG_STATS_RL 
     I                myNr, arr,
./pkg/debug/debug_stats_rl.F 7 DEBUG_STATS_RL 
     I                myNr, arr, arrName,
./pkg/debug/debug_stats_rs.F 25 DEBUG_STATS_RS 
      _RS arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
./pkg/debug/debug_stats_rs.F 36 DEBUG_STATS_RS 
     I                myNr, arr,
./pkg/debug/debug_stats_rs.F 7 DEBUG_STATS_RS 
     I                myNr, arr, arrName,
./pkg/exf/exf_filter_rl.F 100 EXF_FILTER_RL 
                  arr(i,j,bi,bj) = 0. _d 0
./pkg/exf/exf_filter_rl.F 38 EXF_FILTER_RL 
      _RL arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/exf/exf_filter_rl.F 7 EXF_FILTER_RL 
     I                          arr,
./pkg/exf/exf_filter_rl.F 80 EXF_FILTER_RL 
                  arr(i,j,bi,bj) = 0. _d 0
./pkg/exf/exf_filter_rl.F 90 EXF_FILTER_RL 
                  arr(i,j,bi,bj) = 0. _d 0
./pkg/exf/exf_filter_rs.F 100 EXF_FILTER_RS 
                  arr(i,j,bi,bj) = 0. _d 0
./pkg/exf/exf_filter_rs.F 38 EXF_FILTER_RS 
      _RS arr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/exf/exf_filter_rs.F 7 EXF_FILTER_RS 
     I                          arr,
./pkg/exf/exf_filter_rs.F 80 EXF_FILTER_RS 
                  arr(i,j,bi,bj) = 0. _d 0
./pkg/exf/exf_filter_rs.F 90 EXF_FILTER_RS 
                  arr(i,j,bi,bj) = 0. _d 0