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


File Line number Procedure Code
./pkg/mdsio/mdsio_gl.F 1245 MDSWRITEFIELD_2D_GL 
      INTEGER dimList(3,3), nDims, map2gl(2)
./pkg/mdsio/mdsio_gl.F 1391 MDSWRITEFIELD_2D_GL 
         nDims=3
./pkg/mdsio/mdsio_gl.F 1392 MDSWRITEFIELD_2D_GL 
         if (nLocz .EQ. 1) nDims=2
./pkg/mdsio/mdsio_gl.F 1397 MDSWRITEFIELD_2D_GL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_gl.F 1505 MDSWRITEFIELD_2D_GL 
         nDims=3
./pkg/mdsio/mdsio_gl.F 1506 MDSWRITEFIELD_2D_GL 
         if (nLocz .EQ. 1) nDims=2
./pkg/mdsio/mdsio_gl.F 1511 MDSWRITEFIELD_2D_GL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_gl.F 483 MDSWRITEFIELD_3D_GL 
      INTEGER dimList(3,3), nDims, map2gl(2)
./pkg/mdsio/mdsio_gl.F 628 MDSWRITEFIELD_3D_GL 
         nDims=3
./pkg/mdsio/mdsio_gl.F 629 MDSWRITEFIELD_3D_GL 
         if (nNz .EQ. 1) nDims=2
./pkg/mdsio/mdsio_gl.F 634 MDSWRITEFIELD_3D_GL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_gl.F 742 MDSWRITEFIELD_3D_GL 
         nDims=3
./pkg/mdsio/mdsio_gl.F 743 MDSWRITEFIELD_3D_GL 
         if (Nr .EQ. 1) nDims=2
./pkg/mdsio/mdsio_gl.F 748 MDSWRITEFIELD_3D_GL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_gl_slice.F 545 MDSWRITEFIELD_XZ_GL 
      INTEGER dimList(3,3), nDims, map2gl(2)
./pkg/mdsio/mdsio_gl_slice.F 672 MDSWRITEFIELD_XZ_GL 
         nDims=3
./pkg/mdsio/mdsio_gl_slice.F 673 MDSWRITEFIELD_XZ_GL 
         if (Nr .EQ. 1) nDims=2
./pkg/mdsio/mdsio_gl_slice.F 678 MDSWRITEFIELD_XZ_GL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_gl_slice.F 773 MDSWRITEFIELD_YZ_GL 
      INTEGER dimList(3,3), nDims, map2gl(2)
./pkg/mdsio/mdsio_gl_slice.F 900 MDSWRITEFIELD_YZ_GL 
         nDims=3
./pkg/mdsio/mdsio_gl_slice.F 901 MDSWRITEFIELD_YZ_GL 
         if (Nr .EQ. 1) nDims=2
./pkg/mdsio/mdsio_gl_slice.F 906 MDSWRITEFIELD_YZ_GL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_read_meta.F 107 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 224 MDS_READ_META 
          IF ( nDimFil.GT.nDims .AND. nDims.GE.1 ) THEN
./pkg/mdsio/mdsio_read_meta.F 226 MDS_READ_META 
     &                   nDimFil, ' too large ( >', nDims, ' )'
./pkg/mdsio/mdsio_read_meta.F 234 MDS_READ_META 
         IF ( nDims.GE.1 .AND. nDimFil.GE.1 .AND.
./pkg/mdsio/mdsio_read_meta.F 402 MDS_READ_META 
      nDims   = nDimFil
./pkg/mdsio/mdsio_read_meta.F 62 MDS_READ_META 
      INTEGER nDims
./pkg/mdsio/mdsio_wr_metafiles.F 132 MDS_WR_METAFILES 
         nDims=3
./pkg/mdsio/mdsio_wr_metafiles.F 133 MDS_WR_METAFILES 
         IF (nNz.EQ.1) nDims=2
./pkg/mdsio/mdsio_wr_metafiles.F 138 MDS_WR_METAFILES 
     I              filePrec, nDims,dimList,map2gl, nFlds, fldList,
./pkg/mdsio/mdsio_wr_metafiles.F 199 MDS_WR_METAFILES 
           nDims=3
./pkg/mdsio/mdsio_wr_metafiles.F 200 MDS_WR_METAFILES 
           IF (nNz.EQ.1) nDims=2
./pkg/mdsio/mdsio_wr_metafiles.F 207 MDS_WR_METAFILES 
     I              filePrec, nDims,dimList,map2gl, nFlds, fldList,
./pkg/mdsio/mdsio_wr_metafiles.F 95 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 521 MDS_WRITE_FIELD 
           nDims = 3
./pkg/mdsio/mdsio_write_field.F 522 MDS_WRITE_FIELD 
           IF ( nNz.EQ.1 ) nDims = 2
./pkg/mdsio/mdsio_write_field.F 527 MDS_WRITE_FIELD 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_write_field.F 567 MDS_WRITE_FIELD 
         nDims = 3
./pkg/mdsio/mdsio_write_field.F 568 MDS_WRITE_FIELD 
         IF ( nNz.EQ.1 ) nDims = 2
./pkg/mdsio/mdsio_write_field.F 573 MDS_WRITE_FIELD 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_write_meta.F 105 MDS_WRITE_META 
      WRITE(mUnit,'(1X,A,I3,A)') 'nDims = [ ',nDims,' ];'
./pkg/mdsio/mdsio_write_meta.F 113 MDS_WRITE_META 
      DO j=1,nDims
./pkg/mdsio/mdsio_write_meta.F 119 MDS_WRITE_META 
       DO j=1,nDims
./pkg/mdsio/mdsio_write_meta.F 120 MDS_WRITE_META 
        IF (j.LT.nDims) THEN
./pkg/mdsio/mdsio_write_meta.F 128 MDS_WRITE_META 
       DO j=1,nDims
./pkg/mdsio/mdsio_write_meta.F 129 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 58 MDS_WRITE_META 
      INTEGER nDims
./pkg/mdsio/mdsio_write_meta.F 59 MDS_WRITE_META 
      INTEGER dimList(3,nDims)
./pkg/mdsio/mdsio_writelocal.F 117 MDS_WRITELOCAL 
      INTEGER dimList(3,3),nDims, map2gl(2)
./pkg/mdsio/mdsio_writelocal.F 394 MDS_WRITELOCAL 
           nDims = 3
./pkg/mdsio/mdsio_writelocal.F 395 MDS_WRITELOCAL 
           IF ( nNz.EQ.1 ) nDims = 2
./pkg/mdsio/mdsio_writelocal.F 400 MDS_WRITELOCAL 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_writelocal.F 425 MDS_WRITELOCAL 
         nDims = 3
./pkg/mdsio/mdsio_writelocal.F 426 MDS_WRITELOCAL 
         IF ( nNz.EQ.1 ) nDims = 2
./pkg/mdsio/mdsio_writelocal.F 431 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/mdsio/mdsio_writevector.F 225 MDSWRITEVECTOR 
         nDims = 1
./pkg/mdsio/mdsio_writevector.F 228 MDSWRITEVECTOR 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_writevector.F 325 MDSWRITEVECTOR 
         nDims = 1
./pkg/mdsio/mdsio_writevector.F 328 MDSWRITEVECTOR 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_writevector.F 353 MDSWRITEVECTOR 
       nDims = 1
./pkg/mdsio/mdsio_writevector.F 356 MDSWRITEVECTOR 
     I              filePrec, nDims, dimList, map2gl, 0, blank8c,
./pkg/mdsio/mdsio_writevector.F 71 MDSWRITEVECTOR 
      INTEGER dimList(3,3), nDims, map2gl(2)
./pkg/rw/read_mflds.F 109 READ_MFLDS_SET 
      INTEGER nDims, nTimRec
./pkg/rw/read_mflds.F 149 READ_MFLDS_SET 
       nDims = nSizD
./pkg/rw/read_mflds.F 157 READ_MFLDS_SET 
     U               nDims,   nFlds,   nTimRec,
./pkg/rw/read_mflds.F 166 READ_MFLDS_SET 
        IF ( nDims.EQ.2 .AND. thirdDim.GT.1
./pkg/rw/read_mflds.F 202 READ_MFLDS_SET 
        WRITE(msgBuf,'(A,I4,A)') '    nDims =', nDims, ' , dims:'
./pkg/rw/read_mflds.F 204 READ_MFLDS_SET 
        DO j=1,nDims