Symbol Description Uses
fNam Used to build name of file for standard 46


File Line number Procedure Code
./pkg/aim/aim_external_fields_load.F 101 AIM_FIELDS_LOAD 
         CALL MDSREADFIELD(fNam(1:17),readBinaryPrec,'RS',1,
./pkg/aim/aim_external_fields_load.F 59 AIM_FIELDS_LOAD 
      CHARACTER*17 fNam
./pkg/aim/aim_external_fields_load.F 84 AIM_FIELDS_LOAD 
         WRITE(fNam,'(A,A,A)' ) 'salb.',mnthNam(mnthIndex),'.ft.bin'
./pkg/aim/aim_external_fields_load.F 86 AIM_FIELDS_LOAD 
         CALL MDSREADFIELD(fNam(1:15),readBinaryPrec,'RS',1,
./pkg/aim/aim_external_fields_load.F 91 AIM_FIELDS_LOAD 
         WRITE(fNam,'(A,A,A)' ) 'stheta.',mnthNam(mnthIndex),'.ft.bin'
./pkg/aim/aim_external_fields_load.F 94 AIM_FIELDS_LOAD 
         CALL MDSREADFIELD(fNam(1:17),readBinaryPrec,'RS',1,
./pkg/aim/aim_external_fields_load.F 99 AIM_FIELDS_LOAD 
         WRITE(fNam,'(A,A,A)' ) 'smoist.',mnthNam(mnthIndex),'.ft.bin'
./pkg/aim_v23/aim_fields_load.F 100 AIM_FIELDS_LOAD 
         CALL MDSREADFIELD(fNam,readBinaryPrec,'RS',1,
./pkg/aim_v23/aim_fields_load.F 106 AIM_FIELDS_LOAD 
         WRITE(fNam,'(A,A,A)' ) 'stheta.',
./pkg/aim_v23/aim_fields_load.F 109 AIM_FIELDS_LOAD 
         WRITE(fNam,'(A,A,A)' ) 'sTemp.',
./pkg/aim_v23/aim_fields_load.F 112 AIM_FIELDS_LOAD 
         CALL MDSREADFIELD(fNam,readBinaryPrec,'RS',1,
./pkg/aim_v23/aim_fields_load.F 117 AIM_FIELDS_LOAD 
         WRITE(fNam,'(A,A,A)' ) 'smoist.',
./pkg/aim_v23/aim_fields_load.F 119 AIM_FIELDS_LOAD 
         CALL MDSREADFIELD(fNam,readBinaryPrec,'RS',1,
./pkg/aim_v23/aim_fields_load.F 64 AIM_FIELDS_LOAD 
      CHARACTER*(MAX_LEN_FNAM) fNam
./pkg/aim_v23/aim_fields_load.F 98 AIM_FIELDS_LOAD 
         WRITE(fNam,'(A,A,A)' ) 'salb.',
./eesupp/src/dfile.F 152 DFILE_OPEN 
     I                       fNam, fNamMeta, myThid,
./eesupp/src/dfile.F 176 DFILE_OPEN 
      CHARACTER*(*) fNam
./eesupp/src/dfile.F 197 DFILE_OPEN 
      i1Lo = IFNBLNK(fNam)
./eesupp/src/dfile.F 198 DFILE_OPEN 
      i1Hi = ILNBLNK(fNam)
./eesupp/src/dfile.F 236 DFILE_OPEN 
      nameOfDFile(fileHandle,myThid) = fNam(i1Lo:i1Hi)
./eesupp/src/dfile.F 237 DFILE_OPEN 
      OPEN(UNIT=dUnit,FILE=fNam(i1Lo:i1Hi),STATUS='UNKNOWN', ERR=799,
./eesupp/src/dfile.F 250 DFILE_OPEN 
     & fNam(i1Lo:i1Hi)
./eesupp/src/dfile.F 274 DFILE_OPEN 
     & fNam(i1Lo:i1Hi)
./eesupp/src/dfile.F 321 DFILE_READ_R4 
      CHARACTER*(MAX_LEN_FNAM) fNam
./eesupp/src/dfile.F 333 DFILE_READ_R4 
       fNam   = nameOfDFile(fileHandle,myThid)
./eesupp/src/dfile.F 334 DFILE_READ_R4 
       iLo = IFNBLNK(fNam)
./eesupp/src/dfile.F 335 DFILE_READ_R4 
       iHi = ILNBLNK(fNam)
./eesupp/src/dfile.F 359 DFILE_READ_R4 
       WRITE(msgBuf,'(A,A,A)') ' "', fNam(iLo:iHi),'"'
./eesupp/src/dfile.F 405 DFILE_READ_R8 
      CHARACTER*(MAX_LEN_FNAM) fNam
./eesupp/src/dfile.F 417 DFILE_READ_R8 
       fNam   = nameOfDFile(fileHandle,myThid)
./eesupp/src/dfile.F 418 DFILE_READ_R8 
       iLo = IFNBLNK(fNam)
./eesupp/src/dfile.F 419 DFILE_READ_R8 
       iHi = ILNBLNK(fNam)
./eesupp/src/dfile.F 443 DFILE_READ_R8 
       WRITE(msgBuf,'(A,A,A)') ' "', fNam(iLo:iHi),'"'
./eesupp/src/dfile.F 566 DFILE_WRITE_R4 
      CHARACTER*(MAX_LEN_FNAM) fNam
./eesupp/src/dfile.F 578 DFILE_WRITE_R4 
      fNam   = nameOfDFile(fileHandle,myThid)
./eesupp/src/dfile.F 644 DFILE_WRITE_R4 
       WRITE(msgBuf,'(A,A)') ' File ', fNam
./eesupp/src/dfile.F 700 DFILE_WRITE_R8 
      CHARACTER*(MAX_LEN_FNAM) fNam
./eesupp/src/dfile.F 712 DFILE_WRITE_R8 
      fNam   = nameOfDFile(fileHandle,myThid)
./eesupp/src/dfile.F 778 DFILE_WRITE_R8 
       WRITE(msgBuf,'(A,A)') ' File ', fNam
./eesupp/src/eeboot_minimal.F 121 EEBOOT_MINIMAL 
        WRITE(fNam,'(A,A)') 'STDERR.', myProcessStr(1:4)
./eesupp/src/eeboot_minimal.F 122 EEBOOT_MINIMAL 
        OPEN(errorMessageUnit,FILE=fNam,STATUS='unknown')
./eesupp/src/eeboot_minimal.F 123 EEBOOT_MINIMAL 
        WRITE(fNam,'(A,A)') 'STDOUT.', myProcessStr(1:4)
./eesupp/src/eeboot_minimal.F 124 EEBOOT_MINIMAL 
        OPEN(standardMessageUnit,FILE=fNam,STATUS='unknown')
./eesupp/src/eeboot_minimal.F 181 EEBOOT_MINIMAL 
        WRITE(fNam,'(A,A)') 'STDERR.', myProcessStr(1:4)
./eesupp/src/eeboot_minimal.F 182 EEBOOT_MINIMAL 
        OPEN(errorMessageUnit,FILE=fNam,STATUS='unknown')
./eesupp/src/eeboot_minimal.F 44 EEBOOT_MINIMAL 
      CHARACTER*13 fNam