Symbol Description Uses
r4seg 63



File Line number Procedure Code
./pkg/mdsio/mdsio_gl.F 1031 MDSREADFIELD_2D_GL
            read(dUnit,rec=irec) r4seg
./pkg/mdsio/mdsio_gl.F 1033 MDSREADFIELD_2D_GL
            call MDS_BYTESWAPR4( sNx, r4seg )
./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 1242 MDSWRITEFIELD_2D_GL
      Real*4 r4seg(sNx)
./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 1452 MDSWRITEFIELD_2D_GL
            call MDS_BYTESWAPR4( sNx, r4seg )
./pkg/mdsio/mdsio_gl.F 1454 MDSWRITEFIELD_2D_GL
            write(dUnit,rec=irec) r4seg
./pkg/mdsio/mdsio_gl.F 270 MDSREADFIELD_3D_GL
            read(dUnit,rec=irec) r4seg
./pkg/mdsio/mdsio_gl.F 272 MDSREADFIELD_3D_GL
            call MDS_BYTESWAPR4( sNx, r4seg )
./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 480 MDSWRITEFIELD_3D_GL
      Real*4 r4seg(sNx)
./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 689 MDSWRITEFIELD_3D_GL
            call MDS_BYTESWAPR4( sNx, r4seg )
./pkg/mdsio/mdsio_gl.F 691 MDSWRITEFIELD_3D_GL
            write(dUnit,rec=irec) r4seg
./pkg/mdsio/mdsio_gl.F 76 MDSREADFIELD_3D_GL
      Real*4 r4seg(sNx)
./pkg/mdsio/mdsio_gl.F 837 MDSREADFIELD_2D_GL
      Real*4 r4seg(sNx)
./pkg/mdsio/mdsio_gl_slice.F 173 MDSREADFIELD_XZ_GL
            read(dUnit,rec=irec) r4seg
./pkg/mdsio/mdsio_gl_slice.F 175 MDSREADFIELD_XZ_GL
            call MDS_BYTESWAPR4( sNx, r4seg )
./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 303 MDSREADFIELD_YZ_GL
      Real*4 r4seg(sNy)
./pkg/mdsio/mdsio_gl_slice.F 400 MDSREADFIELD_YZ_GL
            read(dUnit,rec=irec) r4seg
./pkg/mdsio/mdsio_gl_slice.F 402 MDSREADFIELD_YZ_GL
            call MDS_BYTESWAPR4( sNy, r4seg )
./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 542 MDSWRITEFIELD_XZ_GL
      Real*4 r4seg(sNx)
./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 621 MDSWRITEFIELD_XZ_GL
            call MDS_BYTESWAPR4( sNx, r4seg )
./pkg/mdsio/mdsio_gl_slice.F 623 MDSWRITEFIELD_XZ_GL
            write(dUnit,rec=irec) r4seg
./pkg/mdsio/mdsio_gl_slice.F 75 MDSREADFIELD_XZ_GL
      Real*4 r4seg(sNx)
./pkg/mdsio/mdsio_gl_slice.F 770 MDSWRITEFIELD_YZ_GL
      Real*4 r4seg(sNy)
./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 849 MDSWRITEFIELD_YZ_GL
            call MDS_BYTESWAPR4( sNy, r4seg )
./pkg/mdsio/mdsio_gl_slice.F 851 MDSWRITEFIELD_YZ_GL
            write(dUnit,rec=irec) r4seg
./pkg/mdsio/mdsio_read_section.F 205 MDS_READ_SEC_XZ
            READ(dUnit,rec=irec) r4seg
./pkg/mdsio/mdsio_read_section.F 207 MDS_READ_SEC_XZ
            CALL MDS_BYTESWAPR4(sNx,r4seg)
./pkg/mdsio/mdsio_read_section.F 211 MDS_READ_SEC_XZ
     &                             r4seg,fldRS )
./pkg/mdsio/mdsio_read_section.F 214 MDS_READ_SEC_XZ
     &                             r4seg,fldRL )
./pkg/mdsio/mdsio_read_section.F 337 MDS_READ_SEC_YZ
      Real*4 r4seg(sNy)
./pkg/mdsio/mdsio_read_section.F 461 MDS_READ_SEC_YZ
            READ(dUnit,rec=irec) r4seg
./pkg/mdsio/mdsio_read_section.F 463 MDS_READ_SEC_YZ
            CALL MDS_BYTESWAPR4(sNy,r4seg)
./pkg/mdsio/mdsio_read_section.F 467 MDS_READ_SEC_YZ
     &                             r4seg,fldRS )
./pkg/mdsio/mdsio_read_section.F 470 MDS_READ_SEC_YZ
     &                             r4seg,fldRL )
./pkg/mdsio/mdsio_read_section.F 81 MDS_READ_SEC_XZ
      Real*4 r4seg(sNx)
./pkg/mdsio/mdsio_write_section.F 177 MDS_WRITE_SEC_XZ
     &                             r4seg,fldRS )
./pkg/mdsio/mdsio_write_section.F 180 MDS_WRITE_SEC_XZ
     &                             r4seg,fldRL )
./pkg/mdsio/mdsio_write_section.F 188 MDS_WRITE_SEC_XZ
            CALL MDS_BYTESWAPR4(sNx,r4seg)
./pkg/mdsio/mdsio_write_section.F 190 MDS_WRITE_SEC_XZ
            WRITE(dUnit,rec=irec) r4seg
./pkg/mdsio/mdsio_write_section.F 319 MDS_WRITE_SEC_YZ
      Real*4 r4seg(sNy)
./pkg/mdsio/mdsio_write_section.F 409 MDS_WRITE_SEC_YZ
     &                             r4seg,fldRS )
./pkg/mdsio/mdsio_write_section.F 412 MDS_WRITE_SEC_YZ
     &                             r4seg,fldRL )
./pkg/mdsio/mdsio_write_section.F 420 MDS_WRITE_SEC_YZ
            CALL MDS_BYTESWAPR4(sNy,r4seg)
./pkg/mdsio/mdsio_write_section.F 422 MDS_WRITE_SEC_YZ
            WRITE(dUnit,rec=irec) r4seg
./pkg/mdsio/mdsio_write_section.F 87 MDS_WRITE_SEC_XZ
      Real*4 r4seg(sNx)
./pkg/mdsio/mdsio_writevec_loc.F 184 MDS_WRITEVEC_LOC
            CALL MDS_WR_REC_RS( fldRS, r4seg, r8seg,
./pkg/mdsio/mdsio_writevec_loc.F 187 MDS_WRITEVEC_LOC
            CALL MDS_WR_REC_RL( fldRL, r4seg, r8seg,
./pkg/mdsio/mdsio_writevec_loc.F 84 MDS_WRITEVEC_LOC
      Real*4 r4seg(loc_size)