Symbol Description Uses
nDims max size of array dimList (or =0 if not reading dimList) 76


File Line number Procedure Code
./pkg/mdsio/mdsio_gl.F 1284 MDSWRITEFIELD_2D_GL 
      INTEGER dimList(3,3), nDims, map2gl(2)
./pkg/mdsio/mdsio_gl.F 1439 MDSWRITEFIELD_2D_GL 
         nDims=3
./pkg/mdsio/mdsio_gl.F 1440 MDSWRITEFIELD_2D_GL 
         if (nLocz .EQ. 1) nDims=2
./pkg/mdsio/mdsio_gl.F 1445 MDSWRITEFIELD_2D_GL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_gl.F 1557 MDSWRITEFIELD_2D_GL 
         nDims=3
./pkg/mdsio/mdsio_gl.F 1558 MDSWRITEFIELD_2D_GL 
         if (nLocz .EQ. 1) nDims=2
./pkg/mdsio/mdsio_gl.F 1563 MDSWRITEFIELD_2D_GL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_gl.F 496 MDSWRITEFIELD_3D_GL 
      INTEGER dimList(3,3), nDims, map2gl(2)
./pkg/mdsio/mdsio_gl.F 650 MDSWRITEFIELD_3D_GL 
         nDims=3
./pkg/mdsio/mdsio_gl.F 651 MDSWRITEFIELD_3D_GL 
         if (nNz .EQ. 1) nDims=2
./pkg/mdsio/mdsio_gl.F 656 MDSWRITEFIELD_3D_GL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_gl.F 768 MDSWRITEFIELD_3D_GL 
         nDims=3
./pkg/mdsio/mdsio_gl.F 769 MDSWRITEFIELD_3D_GL 
         if (Nr .EQ. 1) nDims=2
./pkg/mdsio/mdsio_gl.F 774 MDSWRITEFIELD_3D_GL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_gl_slice.F 571 MDSWRITEFIELD_XZ_GL 
      INTEGER dimList(3,3), nDims, map2gl(2)
./pkg/mdsio/mdsio_gl_slice.F 711 MDSWRITEFIELD_XZ_GL 
         nDims=3
./pkg/mdsio/mdsio_gl_slice.F 712 MDSWRITEFIELD_XZ_GL 
         if (Nr .EQ. 1) nDims=2
./pkg/mdsio/mdsio_gl_slice.F 717 MDSWRITEFIELD_XZ_GL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_gl_slice.F 812 MDSWRITEFIELD_YZ_GL 
      INTEGER dimList(3,3), nDims, map2gl(2)
./pkg/mdsio/mdsio_gl_slice.F 952 MDSWRITEFIELD_YZ_GL 
         nDims=3
./pkg/mdsio/mdsio_gl_slice.F 953 MDSWRITEFIELD_YZ_GL 
         if (Nr .EQ. 1) nDims=2
./pkg/mdsio/mdsio_gl_slice.F 958 MDSWRITEFIELD_YZ_GL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_read_meta.F 108 MDS_READ_META 
      DO j=1,nDims
./pkg/mdsio/mdsio_read_meta.F 14 MDS_READ_META 
     U               nDims,   nFlds,   nTimRec,
./pkg/mdsio/mdsio_read_meta.F 226 MDS_READ_META 
          IF ( nDimFil.GT.nDims .AND. nDims.GE.1 ) THEN
./pkg/mdsio/mdsio_read_meta.F 228 MDS_READ_META 
     &                   nDimFil, ' too large ( >', nDims, ' )'
./pkg/mdsio/mdsio_read_meta.F 236 MDS_READ_META 
         IF ( nDims.GE.1 .AND. nDimFil.GE.1 .AND.
./pkg/mdsio/mdsio_read_meta.F 411 MDS_READ_META 
      nDims   = nDimFil
./pkg/mdsio/mdsio_read_meta.F 63 MDS_READ_META 
      INTEGER nDims
./pkg/mdsio/mdsio_wr_metafiles.F 135 MDS_WR_METAFILES 
         nDims=3
./pkg/mdsio/mdsio_wr_metafiles.F 136 MDS_WR_METAFILES 
         IF (nNz.EQ.1) nDims=2
./pkg/mdsio/mdsio_wr_metafiles.F 141 MDS_WR_METAFILES 
     I              filePrec, nDims,dimList,map2gl, nFlds, fldList,
./pkg/mdsio/mdsio_wr_metafiles.F 202 MDS_WR_METAFILES 
           nDims=3
./pkg/mdsio/mdsio_wr_metafiles.F 203 MDS_WR_METAFILES 
           IF (nNz.EQ.1) nDims=2
./pkg/mdsio/mdsio_wr_metafiles.F 210 MDS_WR_METAFILES 
     I              filePrec, nDims,dimList,map2gl, nFlds, fldList,
./pkg/mdsio/mdsio_wr_metafiles.F 98 MDS_WR_METAFILES 
      INTEGER dimList(3,3), nDims, map2gl(2)
./pkg/mdsio/mdsio_write_field.F 130 MDS_WRITE_FIELD 
      INTEGER dimList(3,3), nDims, map2gl(2)
./pkg/mdsio/mdsio_write_field.F 547 MDS_WRITE_FIELD 
           nDims = 3
./pkg/mdsio/mdsio_write_field.F 548 MDS_WRITE_FIELD 
           IF ( nNz.EQ.1 ) nDims = 2
./pkg/mdsio/mdsio_write_field.F 553 MDS_WRITE_FIELD 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_write_field.F 593 MDS_WRITE_FIELD 
         nDims = 3
./pkg/mdsio/mdsio_write_field.F 594 MDS_WRITE_FIELD 
         IF ( nNz.EQ.1 ) nDims = 2
./pkg/mdsio/mdsio_write_field.F 599 MDS_WRITE_FIELD 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_write_meta.F 107 MDS_WRITE_META 
      WRITE(mUnit,'(1X,A,I3,A)') 'nDims = [ ',nDims,' ];'
./pkg/mdsio/mdsio_write_meta.F 115 MDS_WRITE_META 
      DO j=1,nDims
./pkg/mdsio/mdsio_write_meta.F 121 MDS_WRITE_META 
       DO j=1,nDims
./pkg/mdsio/mdsio_write_meta.F 122 MDS_WRITE_META 
        IF (j.LT.nDims) THEN
./pkg/mdsio/mdsio_write_meta.F 130 MDS_WRITE_META 
       DO j=1,nDims
./pkg/mdsio/mdsio_write_meta.F 131 MDS_WRITE_META 
        IF (j.LT.nDims) THEN
./pkg/mdsio/mdsio_write_meta.F 15 MDS_WRITE_META 
     I    nDims,   dimList, map2gl,
./pkg/mdsio/mdsio_write_meta.F 59 MDS_WRITE_META 
      INTEGER nDims
./pkg/mdsio/mdsio_write_meta.F 60 MDS_WRITE_META 
      INTEGER dimList(3,nDims)
./pkg/mdsio/mdsio_write_tape.F 209 MDS_WRITE_TAPE 
         nDims = 1
./pkg/mdsio/mdsio_write_tape.F 212 MDS_WRITE_TAPE 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_write_tape.F 294 MDS_WRITE_TAPE 
          nDims = 1
./pkg/mdsio/mdsio_write_tape.F 304 MDS_WRITE_TAPE 
          nDims = 1
./pkg/mdsio/mdsio_write_tape.F 309 MDS_WRITE_TAPE 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_write_tape.F 71 MDS_WRITE_TAPE 
      INTEGER dimList(3,1), nDims, map2gl(2)
./pkg/mdsio/mdsio_writelocal.F 117 MDS_WRITELOCAL 
      INTEGER dimList(3,3),nDims, map2gl(2)
./pkg/mdsio/mdsio_writelocal.F 398 MDS_WRITELOCAL 
           nDims = 3
./pkg/mdsio/mdsio_writelocal.F 399 MDS_WRITELOCAL 
           IF ( nNz.EQ.1 ) nDims = 2
./pkg/mdsio/mdsio_writelocal.F 404 MDS_WRITELOCAL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_writelocal.F 429 MDS_WRITELOCAL 
         nDims = 3
./pkg/mdsio/mdsio_writelocal.F 430 MDS_WRITELOCAL 
         IF ( nNz.EQ.1 ) nDims = 2
./pkg/mdsio/mdsio_writelocal.F 435 MDS_WRITELOCAL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_writevec_loc.F 241 MDS_WRITEVEC_LOC 
          nDims=3
./pkg/mdsio/mdsio_writevec_loc.F 242 MDS_WRITEVEC_LOC 
          IF ( nSize.EQ.1 ) nDims=2
./pkg/mdsio/mdsio_writevec_loc.F 245 MDS_WRITEVEC_LOC 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_writevec_loc.F 84 MDS_WRITEVEC_LOC 
      INTEGER dimList(3,3), nDims, map2gl(2)
./pkg/rw/read_mflds.F 110 READ_MFLDS_SET 
      INTEGER nDims, nTimRec
./pkg/rw/read_mflds.F 151 READ_MFLDS_SET 
       nDims = nSizD
./pkg/rw/read_mflds.F 159 READ_MFLDS_SET 
     U               nDims,   nFlds,   nTimRec,
./pkg/rw/read_mflds.F 168 READ_MFLDS_SET 
        IF ( nDims.EQ.2 .AND. thirdDim.GT.1
./pkg/rw/read_mflds.F 205 READ_MFLDS_SET 
        WRITE(msgBuf,'(A,I4,A)') '    nDims =', nDims, ' , dims:'
./pkg/rw/read_mflds.F 207 READ_MFLDS_SET 
        DO j=1,nDims