Symbol Description Uses
fileIsOpen 150


File Line number Procedure Code
./pkg/mdsio/mdsio_gl.F 1007 MDSREADFIELD_2D_GL 
       fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl.F 1035 MDSREADFIELD_2D_GL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl.F 1037 MDSREADFIELD_2D_GL 
          fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_gl.F 1052 MDSREADFIELD_2D_GL 
        if (fileIsOpen) then
./pkg/mdsio/mdsio_gl.F 1115 MDSREADFIELD_2D_GL 
          fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl.F 1126 MDSREADFIELD_2D_GL 
      if (fileIsOpen .AND. globalFile) then
./pkg/mdsio/mdsio_gl.F 1128 MDSREADFIELD_2D_GL 
       fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl.F 124 MDSREADFIELD_3D_GL 
      fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl.F 1288 MDSWRITEFIELD_2D_GL 
      logical fileIsOpen
./pkg/mdsio/mdsio_gl.F 1336 MDSWRITEFIELD_2D_GL 
      fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_gl.F 1472 MDSWRITEFIELD_2D_GL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl.F 1477 MDSWRITEFIELD_2D_GL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl.F 1479 MDSWRITEFIELD_2D_GL 
        if (fileIsOpen) then
./pkg/mdsio/mdsio_gl.F 1539 MDSWRITEFIELD_2D_GL 
        if (fileIsOpen) then
./pkg/mdsio/mdsio_gl.F 1541 MDSWRITEFIELD_2D_GL 
         fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl.F 220 MDSREADFIELD_3D_GL 
       fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl.F 248 MDSREADFIELD_3D_GL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl.F 250 MDSREADFIELD_3D_GL 
          fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_gl.F 265 MDSREADFIELD_3D_GL 
        if (fileIsOpen) then
./pkg/mdsio/mdsio_gl.F 328 MDSREADFIELD_3D_GL 
          fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl.F 339 MDSREADFIELD_3D_GL 
      if (fileIsOpen .AND. globalFile) then
./pkg/mdsio/mdsio_gl.F 341 MDSREADFIELD_3D_GL 
       fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl.F 500 MDSWRITEFIELD_3D_GL 
      logical fileIsOpen
./pkg/mdsio/mdsio_gl.F 548 MDSWRITEFIELD_3D_GL 
      fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_gl.F 683 MDSWRITEFIELD_3D_GL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl.F 688 MDSWRITEFIELD_3D_GL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl.F 690 MDSWRITEFIELD_3D_GL 
        if (fileIsOpen) then
./pkg/mdsio/mdsio_gl.F 750 MDSWRITEFIELD_3D_GL 
        if (fileIsOpen) then
./pkg/mdsio/mdsio_gl.F 752 MDSWRITEFIELD_3D_GL 
         fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl.F 78 MDSREADFIELD_3D_GL 
      logical globalFile,fileIsOpen
./pkg/mdsio/mdsio_gl.F 865 MDSREADFIELD_2D_GL 
      logical globalFile,fileIsOpen
./pkg/mdsio/mdsio_gl.F 911 MDSREADFIELD_2D_GL 
      fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl_slice.F 108 MDSREADFIELD_XZ_GL 
      fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl_slice.F 162 MDSREADFIELD_XZ_GL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl_slice.F 164 MDSREADFIELD_XZ_GL 
          fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_gl_slice.F 176 MDSREADFIELD_XZ_GL 
        if (fileIsOpen) then
./pkg/mdsio/mdsio_gl_slice.F 229 MDSREADFIELD_XZ_GL 
          fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl_slice.F 240 MDSREADFIELD_XZ_GL 
      if (fileIsOpen .AND. globalFile) then
./pkg/mdsio/mdsio_gl_slice.F 242 MDSREADFIELD_XZ_GL 
       fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl_slice.F 318 MDSREADFIELD_YZ_GL 
      logical globalFile,fileIsOpen
./pkg/mdsio/mdsio_gl_slice.F 349 MDSREADFIELD_YZ_GL 
      fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl_slice.F 402 MDSREADFIELD_YZ_GL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl_slice.F 404 MDSREADFIELD_YZ_GL 
          fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_gl_slice.F 416 MDSREADFIELD_YZ_GL 
        if (fileIsOpen) then
./pkg/mdsio/mdsio_gl_slice.F 469 MDSREADFIELD_YZ_GL 
          fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl_slice.F 480 MDSREADFIELD_YZ_GL 
      if (fileIsOpen .AND. globalFile) then
./pkg/mdsio/mdsio_gl_slice.F 482 MDSREADFIELD_YZ_GL 
       fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl_slice.F 575 MDSWRITEFIELD_XZ_GL 
      logical fileIsOpen
./pkg/mdsio/mdsio_gl_slice.F 607 MDSWRITEFIELD_XZ_GL 
      fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_gl_slice.F 629 MDSWRITEFIELD_XZ_GL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl_slice.F 634 MDSWRITEFIELD_XZ_GL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl_slice.F 636 MDSWRITEFIELD_XZ_GL 
        if (fileIsOpen) then
./pkg/mdsio/mdsio_gl_slice.F 693 MDSWRITEFIELD_XZ_GL 
        if (fileIsOpen) then
./pkg/mdsio/mdsio_gl_slice.F 695 MDSWRITEFIELD_XZ_GL 
         fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_gl_slice.F 77 MDSREADFIELD_XZ_GL 
      logical globalFile,fileIsOpen
./pkg/mdsio/mdsio_gl_slice.F 816 MDSWRITEFIELD_YZ_GL 
      logical fileIsOpen
./pkg/mdsio/mdsio_gl_slice.F 848 MDSWRITEFIELD_YZ_GL 
      fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_gl_slice.F 870 MDSWRITEFIELD_YZ_GL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl_slice.F 875 MDSWRITEFIELD_YZ_GL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_gl_slice.F 877 MDSWRITEFIELD_YZ_GL 
        if (fileIsOpen) then
./pkg/mdsio/mdsio_gl_slice.F 934 MDSWRITEFIELD_YZ_GL 
        if (fileIsOpen) then
./pkg/mdsio/mdsio_gl_slice.F 936 MDSWRITEFIELD_YZ_GL 
         fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_read_field.F 106 MDS_READ_FIELD 
      LOGICAL globalFile, fileIsOpen
./pkg/mdsio/mdsio_read_field.F 136 MDS_READ_FIELD 
      fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_read_field.F 387 MDS_READ_FIELD 
         fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_read_field.F 470 MDS_READ_FIELD 
            fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_read_field.F 472 MDS_READ_FIELD 
            fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_read_field.F 496 MDS_READ_FIELD 
           IF ( fileIsOpen ) THEN
./pkg/mdsio/mdsio_read_field.F 498 MDS_READ_FIELD 
             fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_read_field.F 509 MDS_READ_FIELD 
        IF (fileIsOpen .AND. globalFile) THEN
./pkg/mdsio/mdsio_read_field.F 511 MDS_READ_FIELD 
          fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_read_section.F 113 MDS_READ_SEC_XZ 
      fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_read_section.F 161 MDS_READ_SEC_XZ 
       fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_read_section.F 186 MDS_READ_SEC_XZ 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_read_section.F 188 MDS_READ_SEC_XZ 
          fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_read_section.F 200 MDS_READ_SEC_XZ 
        IF (fileIsOpen) THEN
./pkg/mdsio/mdsio_read_section.F 269 MDS_READ_SEC_XZ 
          fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_read_section.F 277 MDS_READ_SEC_XZ 
      IF (fileIsOpen .AND. globalFile) THEN
./pkg/mdsio/mdsio_read_section.F 279 MDS_READ_SEC_XZ 
       fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_read_section.F 365 MDS_READ_SEC_YZ 
      LOGICAL globalFile,fileIsOpen
./pkg/mdsio/mdsio_read_section.F 391 MDS_READ_SEC_YZ 
      fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_read_section.F 439 MDS_READ_SEC_YZ 
       fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_read_section.F 464 MDS_READ_SEC_YZ 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_read_section.F 466 MDS_READ_SEC_YZ 
          fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_read_section.F 478 MDS_READ_SEC_YZ 
        IF (fileIsOpen) THEN
./pkg/mdsio/mdsio_read_section.F 547 MDS_READ_SEC_YZ 
          fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_read_section.F 555 MDS_READ_SEC_YZ 
      IF (fileIsOpen .AND. globalFile) THEN
./pkg/mdsio/mdsio_read_section.F 557 MDS_READ_SEC_YZ 
       fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_read_section.F 88 MDS_READ_SEC_XZ 
      LOGICAL globalFile,fileIsOpen
./pkg/mdsio/mdsio_read_tape.F 201 MDS_READ_TAPE 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_read_tape.F 221 MDS_READ_TAPE 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_read_tape.F 223 MDS_READ_TAPE 
          fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_read_tape.F 232 MDS_READ_TAPE 
        IF ( fileIsOpen ) THEN
./pkg/mdsio/mdsio_read_tape.F 257 MDS_READ_TAPE 
          fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_read_tape.F 65 MDS_READ_TAPE 
      LOGICAL globalFile, fileIsOpen
./pkg/mdsio/mdsio_read_tape.F 99 MDS_READ_TAPE 
      fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_readvec_loc.F 125 MDS_READVEC_LOC 
         fileIsOpen = .TRUE.
./pkg/mdsio/mdsio_readvec_loc.F 184 MDS_READVEC_LOC 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_readvec_loc.F 186 MDS_READVEC_LOC 
          fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_readvec_loc.F 206 MDS_READVEC_LOC 
      IF ( fileIsOpen ) THEN
./pkg/mdsio/mdsio_readvec_loc.F 222 MDS_READVEC_LOC 
      IF ( fileIsOpen ) THEN
./pkg/mdsio/mdsio_readvec_loc.F 227 MDS_READVEC_LOC 
          fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_readvec_loc.F 81 MDS_READVEC_LOC 
      LOGICAL fileIsOpen
./pkg/mdsio/mdsio_readvec_loc.F 91 MDS_READVEC_LOC 
      fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_write_field.F 120 MDS_WRITE_FIELD 
      LOGICAL fileIsOpen
./pkg/mdsio/mdsio_write_field.F 162 MDS_WRITE_FIELD 
      fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_write_field.F 437 MDS_WRITE_FIELD 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_write_field.F 509 MDS_WRITE_FIELD 
           fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_write_field.F 521 MDS_WRITE_FIELD 
           IF ( fileIsOpen ) THEN
./pkg/mdsio/mdsio_write_field.F 523 MDS_WRITE_FIELD 
             fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_write_field.F 562 MDS_WRITE_FIELD 
        IF (fileIsOpen .AND. globalFile) THEN
./pkg/mdsio/mdsio_write_field.F 564 MDS_WRITE_FIELD 
          fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_write_section.F 119 MDS_WRITE_SEC_XZ 
      fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_write_section.F 141 MDS_WRITE_SEC_XZ 
        fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_write_section.F 146 MDS_WRITE_SEC_XZ 
        fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_write_section.F 163 MDS_WRITE_SEC_XZ 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_write_section.F 168 MDS_WRITE_SEC_XZ 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_write_section.F 171 MDS_WRITE_SEC_XZ 
        IF (fileIsOpen) THEN
./pkg/mdsio/mdsio_write_section.F 245 MDS_WRITE_SEC_XZ 
        IF (fileIsOpen .AND. (.NOT. globalFile)) THEN
./pkg/mdsio/mdsio_write_section.F 247 MDS_WRITE_SEC_XZ 
         fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_write_section.F 254 MDS_WRITE_SEC_XZ 
      IF (fileIsOpen .AND. globalFile) THEN
./pkg/mdsio/mdsio_write_section.F 256 MDS_WRITE_SEC_XZ 
       fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_write_section.F 349 MDS_WRITE_SEC_YZ 
      LOGICAL fileIsOpen
./pkg/mdsio/mdsio_write_section.F 372 MDS_WRITE_SEC_YZ 
      fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_write_section.F 394 MDS_WRITE_SEC_YZ 
        fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_write_section.F 399 MDS_WRITE_SEC_YZ 
        fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_write_section.F 416 MDS_WRITE_SEC_YZ 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_write_section.F 421 MDS_WRITE_SEC_YZ 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_write_section.F 424 MDS_WRITE_SEC_YZ 
        IF (fileIsOpen) THEN
./pkg/mdsio/mdsio_write_section.F 498 MDS_WRITE_SEC_YZ 
        IF (fileIsOpen .AND. (.NOT. globalFile)) THEN
./pkg/mdsio/mdsio_write_section.F 500 MDS_WRITE_SEC_YZ 
         fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_write_section.F 507 MDS_WRITE_SEC_YZ 
      IF (fileIsOpen .AND. globalFile) THEN
./pkg/mdsio/mdsio_write_section.F 509 MDS_WRITE_SEC_YZ 
       fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_write_section.F 95 MDS_WRITE_SEC_XZ 
      LOGICAL fileIsOpen
./pkg/mdsio/mdsio_writelocal.F 110 MDS_WRITELOCAL 
      LOGICAL fileIsOpen
./pkg/mdsio/mdsio_writelocal.F 266 MDS_WRITELOCAL 
        fileIsOpen=.FALSE.
./pkg/mdsio/mdsio_writelocal.F 282 MDS_WRITELOCAL 
          fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_writelocal.F 363 MDS_WRITELOCAL 
            fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_writelocal.F 375 MDS_WRITELOCAL 
            IF ( fileIsOpen ) THEN
./pkg/mdsio/mdsio_writelocal.F 377 MDS_WRITELOCAL 
              fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_writelocal.F 412 MDS_WRITELOCAL 
        IF (fileIsOpen .AND. globalFile) THEN
./pkg/mdsio/mdsio_writelocal.F 414 MDS_WRITELOCAL 
          fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_writevec_loc.F 102 MDS_WRITEVEC_LOC 
        fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_writevec_loc.F 147 MDS_WRITEVEC_LOC 
          fileIsOpen = .TRUE.
./pkg/mdsio/mdsio_writevec_loc.F 172 MDS_WRITEVEC_LOC 
            fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_writevec_loc.F 176 MDS_WRITEVEC_LOC 
            fileIsOpen=.TRUE.
./pkg/mdsio/mdsio_writevec_loc.F 187 MDS_WRITEVEC_LOC 
        IF (fileIsOpen) THEN
./pkg/mdsio/mdsio_writevec_loc.F 208 MDS_WRITEVEC_LOC 
        IF ( fileIsOpen .AND. ioUnit.EQ.0 ) THEN
./pkg/mdsio/mdsio_writevec_loc.F 210 MDS_WRITEVEC_LOC 
          fileIsOpen = .FALSE.
./pkg/mdsio/mdsio_writevec_loc.F 82 MDS_WRITEVEC_LOC 
      LOGICAL fileIsOpen