Symbol Description Uses
dataFname 65


File Line number Procedure Code
./pkg/fizhi/fizhi_readwrite_vegtiles.F 124 FIZHI_WRITE_VEGTILES 
       write(dataFname(1:80),'(a,2a,i3.3,a,i3.3,a)')
./pkg/fizhi/fizhi_readwrite_vegtiles.F 379 FIZHI_READ_VEGTILES 
       write(dataFname(1:80),'(2a,i3.3,a,i3.3,a)')
./pkg/mdsio/mdsio_gl.F 1020 MDSREADFIELD_2D_GL 
         write(dataFname,'(2a,i3.3,a,i3.3,a)')
./pkg/mdsio/mdsio_gl.F 1022 MDSREADFIELD_2D_GL 
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 1362 MDSWRITEFIELD_2D_GL 
         write(dataFname,'(2a)') fName(1:IL),'.data'
./pkg/mdsio/mdsio_gl.F 1466 MDSWRITEFIELD_2D_GL 
         write(dataFname,'(2a,i3.3,a,i3.3,a)')
./pkg/mdsio/mdsio_gl.F 149 MDSREADFIELD_3D_GL 
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 154 MDSREADFIELD_3D_GL 
          write(dataFname,'(2a)') fName(1:IL),'.data'
./pkg/mdsio/mdsio_gl.F 155 MDSREADFIELD_3D_GL 
          inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 187 MDSREADFIELD_3D_GL 
       inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 197 MDSREADFIELD_3D_GL 
        write(dataFname,'(2a)') fName(1:IL),'.data'
./pkg/mdsio/mdsio_gl.F 198 MDSREADFIELD_3D_GL 
        inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 233 MDSREADFIELD_3D_GL 
         write(dataFname,'(2a,i3.3,a,i3.3,a)')
./pkg/mdsio/mdsio_gl.F 235 MDSREADFIELD_3D_GL 
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 573 MDSWRITEFIELD_3D_GL 
         write(dataFname,'(2a)') fName(1:IL),'.data'
./pkg/mdsio/mdsio_gl.F 677 MDSWRITEFIELD_3D_GL 
         write(dataFname,'(2a,i3.3,a,i3.3,a)')
./pkg/mdsio/mdsio_gl.F 937 MDSREADFIELD_2D_GL 
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 942 MDSREADFIELD_2D_GL 
          write(dataFname,'(2a)') fName(1:IL),'.data'
./pkg/mdsio/mdsio_gl.F 943 MDSREADFIELD_2D_GL 
          inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 974 MDSREADFIELD_2D_GL 
       inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 984 MDSREADFIELD_2D_GL 
        write(dataFname,'(2a)') fName(1:IL),'.data'
./pkg/mdsio/mdsio_gl.F 985 MDSREADFIELD_2D_GL 
        inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 116 MDSREADFIELD_XZ_GL 
      inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 126 MDSREADFIELD_XZ_GL 
       write(dataFname,'(2a)') fName(1:IL),'.data'
./pkg/mdsio/mdsio_gl_slice.F 127 MDSREADFIELD_XZ_GL 
       inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 147 MDSREADFIELD_XZ_GL 
         write(dataFname,'(2a,i3.3,a,i3.3,a)')
./pkg/mdsio/mdsio_gl_slice.F 149 MDSREADFIELD_XZ_GL 
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 357 MDSREADFIELD_YZ_GL 
      inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 367 MDSREADFIELD_YZ_GL 
       write(dataFname,'(2a)') fName(1:IL),'.data'
./pkg/mdsio/mdsio_gl_slice.F 368 MDSREADFIELD_YZ_GL 
       inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 387 MDSREADFIELD_YZ_GL 
         write(dataFname,'(2a,i3.3,a,i3.3,a)')
./pkg/mdsio/mdsio_gl_slice.F 389 MDSREADFIELD_YZ_GL 
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 623 MDSWRITEFIELD_XZ_GL 
         write(dataFname,'(2a,i3.3,a,i3.3,a)')
./pkg/mdsio/mdsio_gl_slice.F 864 MDSWRITEFIELD_YZ_GL 
         write(dataFname,'(2a,i3.3,a,i3.3,a)')
./pkg/mdsio/mdsio_readvec_loc.F 146 MDS_READVEC_LOC 
          WRITE(dataFname,'(2A)') fName(1:IL)
./pkg/mdsio/mdsio_readvec_loc.F 148 MDS_READVEC_LOC 
          INQUIRE( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_readvec_loc.F 154 MDS_READVEC_LOC 
            WRITE(dataFname,'(2A)') fName(1:IL),'.data'
./pkg/mdsio/mdsio_readvec_loc.F 156 MDS_READVEC_LOC 
            INQUIRE( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_readvec_loc.F 165 MDS_READVEC_LOC 
          WRITE(dataFname,'(2A,I3.3,A,I3.3,A)')
./pkg/mdsio/mdsio_readvec_loc.F 168 MDS_READVEC_LOC 
          INQUIRE( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_readvec_loc.F 177 MDS_READVEC_LOC 
     &      ' MDS_READVEC_LOC: open file: ',dataFname(1:iLfn)
./pkg/mdsio/mdsio_readvec_loc.F 182 MDS_READVEC_LOC 
          OPEN( dUnit, file=dataFname, status=_OLD_STATUS,
./pkg/mdsio/mdsio_readvec_loc.F 188 MDS_READVEC_LOC 
     &     'S/R MDS_READVEC_LOC: file=',dataFname(1:iLfn),' not found'
./pkg/mdsio/mdsio_readvec_loc.F 78 MDS_READVEC_LOC 
      CHARACTER*(MAX_LEN_FNAM) dataFname, pfName
./pkg/mdsio/mdsio_writevec_loc.F 158 MDS_WRITEVEC_LOC 
            WRITE(dataFname,'(2A)') fName(1:IL),'.data'
./pkg/mdsio/mdsio_writevec_loc.F 163 MDS_WRITEVEC_LOC 
            WRITE(dataFname,'(2A,I3.3,A,I3.3,A)')
./pkg/mdsio/mdsio_writevec_loc.F 180 MDS_WRITEVEC_LOC 
     &      ' MDS_WRITEVEC_LOC: open file: ',dataFname(1:pIL+13)
./verification/flt_example/extra/cvprofiles.F 130 NO PROCEDURE 
         write(dataFname(1:80),'(2a,i3.3,a,i3.3,a)')
./verification/flt_example/extra/cvprofiles.F 132 NO PROCEDURE 
         inquire( file=dataFname, exist=exst )
./verification/flt_example/extra/cvprofiles.F 138 NO PROCEDURE 
         write(dataFname(1:80),'(2a,i3.3,a,i3.3,a)')
./verification/flt_example/extra/cvprofiles.F 140 NO PROCEDURE 
         inquire( file=dataFname, exist=exst )
./verification/flt_example/extra/cvprofiles.F 155 NO PROCEDURE 
      write(dataFname(1:80),'(2a,a)')
./verification/flt_example/extra/cvprofiles.F 157 NO PROCEDURE 
       open(1,file=dataFname,status='old',form='unformatted'
./verification/flt_example/extra/cvprofiles.F 257 NO PROCEDURE 
            write(dataFname(1:80),'(2a,i3.3,a,i3.3,a)')
./verification/flt_example/extra/cvprofiles.F 259 NO PROCEDURE 
            open(1,file=dataFname,status='old',form='unformatted'
./verification/flt_example/extra/cvprofiles.F 264 NO PROCEDURE 
            print*,'read ',dataFname,imaxrecord
./verification/flt_example/extra/cvprofiles.F 545 NO PROCEDURE 
            write(dataFname(1:80),'(2a,i3.3,a,i3.3,a)')
./verification/flt_example/extra/cvprofiles.F 547 NO PROCEDURE 
            open(1,file=dataFname,status='old',form='unformatted'
./verification/flt_example/extra/cvprofiles.F 552 NO PROCEDURE 
            print*,'read salt from ',dataFname
./verification/flt_example/extra/cvprofiles.F 575 NO PROCEDURE 
            write(dataFname(1:80),'(2a,i3.3,a,i3.3,a)')
./verification/flt_example/extra/cvprofiles.F 577 NO PROCEDURE 
            open(1,file=dataFname,status='old',form='unformatted'
./verification/flt_example/extra/cvprofiles.F 582 NO PROCEDURE 
            print*,'read uvel from ',dataFname
./verification/flt_example/extra/cvprofiles.F 605 NO PROCEDURE 
            write(dataFname(1:80),'(2a,i3.3,a,i3.3,a)')
./verification/flt_example/extra/cvprofiles.F 607 NO PROCEDURE 
            open(1,file=dataFname,status='old',form='unformatted'
./verification/flt_example/extra/cvprofiles.F 612 NO PROCEDURE 
            print*,'read vvel from ',dataFname