Symbol Description Uses
exst 205



File Line number Procedure Code
./pkg/exf/exf_interp_read.F 113 EXF_INTERP_READ
        INQUIRE( file=infile, exist=exst )
./pkg/exf/exf_interp_read.F 114 EXF_INTERP_READ
        IF (exst) THEN
./pkg/exf/exf_interp_read.F 55 EXF_INTERP_READ
      LOGICAL  exst
./pkg/mdsio/mdsio_gl.F 1022 MDSREADFIELD_2D_GL
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 1025 MDSREADFIELD_2D_GL
         if (exst) then
./pkg/mdsio/mdsio_gl.F 149 MDSREADFIELD_3D_GL
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 150 MDSREADFIELD_3D_GL
         if (exst) globalFile = .TRUE.
./pkg/mdsio/mdsio_gl.F 155 MDSREADFIELD_3D_GL
          inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 156 MDSREADFIELD_3D_GL
          if (exst) globalFile = .TRUE.
./pkg/mdsio/mdsio_gl.F 187 MDSREADFIELD_3D_GL
       inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 188 MDSREADFIELD_3D_GL
       if (exst) then
./pkg/mdsio/mdsio_gl.F 198 MDSREADFIELD_3D_GL
        inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 199 MDSREADFIELD_3D_GL
        if (exst) then
./pkg/mdsio/mdsio_gl.F 235 MDSREADFIELD_3D_GL
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 238 MDSREADFIELD_3D_GL
         if (exst) then
./pkg/mdsio/mdsio_gl.F 74 MDSREADFIELD_3D_GL
      logical exst
./pkg/mdsio/mdsio_gl.F 861 MDSREADFIELD_2D_GL
      logical exst
./pkg/mdsio/mdsio_gl.F 937 MDSREADFIELD_2D_GL
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 938 MDSREADFIELD_2D_GL
         if (exst) globalFile = .TRUE.
./pkg/mdsio/mdsio_gl.F 943 MDSREADFIELD_2D_GL
          inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 944 MDSREADFIELD_2D_GL
          if (exst) globalFile = .TRUE.
./pkg/mdsio/mdsio_gl.F 974 MDSREADFIELD_2D_GL
       inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 975 MDSREADFIELD_2D_GL
       if (exst) then
./pkg/mdsio/mdsio_gl.F 985 MDSREADFIELD_2D_GL
        inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 986 MDSREADFIELD_2D_GL
        if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 116 MDSREADFIELD_XZ_GL
      inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 117 MDSREADFIELD_XZ_GL
      if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 127 MDSREADFIELD_XZ_GL
       inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 128 MDSREADFIELD_XZ_GL
       if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 149 MDSREADFIELD_XZ_GL
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 152 MDSREADFIELD_XZ_GL
         if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 314 MDSREADFIELD_YZ_GL
      logical exst
./pkg/mdsio/mdsio_gl_slice.F 357 MDSREADFIELD_YZ_GL
      inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 358 MDSREADFIELD_YZ_GL
      if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 368 MDSREADFIELD_YZ_GL
       inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 369 MDSREADFIELD_YZ_GL
       if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 389 MDSREADFIELD_YZ_GL
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 392 MDSREADFIELD_YZ_GL
         if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 73 MDSREADFIELD_XZ_GL
      logical exst
./pkg/mdsio/mdsio_read_field.F 105 MDS_READ_FIELD
      LOGICAL exst
./pkg/mdsio/mdsio_read_field.F 234 MDS_READ_FIELD
        INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_field.F 235 MDS_READ_FIELD
        IF (exst) THEN
./pkg/mdsio/mdsio_read_field.F 248 MDS_READ_FIELD
          INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_field.F 249 MDS_READ_FIELD
          IF (exst) THEN
./pkg/mdsio/mdsio_read_field.F 457 MDS_READ_FIELD
           INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_field.F 460 MDS_READ_FIELD
           IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 130 MDS_READ_SEC_XZ
      INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_section.F 131 MDS_READ_SEC_XZ
      IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 144 MDS_READ_SEC_XZ
       INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_section.F 145 MDS_READ_SEC_XZ
       IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 173 MDS_READ_SEC_XZ
         INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_section.F 176 MDS_READ_SEC_XZ
         IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 362 MDS_READ_SEC_YZ
      LOGICAL exst
./pkg/mdsio/mdsio_read_section.F 408 MDS_READ_SEC_YZ
      INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_section.F 409 MDS_READ_SEC_YZ
      IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 422 MDS_READ_SEC_YZ
       INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_section.F 423 MDS_READ_SEC_YZ
       IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 451 MDS_READ_SEC_YZ
         INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_section.F 454 MDS_READ_SEC_YZ
         IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 85 MDS_READ_SEC_XZ
      LOGICAL exst
./pkg/mdsio/mdsio_read_tape.F 122 MDS_READ_TAPE
         INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_tape.F 123 MDS_READ_TAPE
         IF (exst) globalFile = .TRUE.
./pkg/mdsio/mdsio_read_tape.F 188 MDS_READ_TAPE
        INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_tape.F 189 MDS_READ_TAPE
        IF (exst) THEN
./pkg/mdsio/mdsio_read_tape.F 210 MDS_READ_TAPE
         INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_tape.F 211 MDS_READ_TAPE
         IF (exst) THEN
./pkg/mdsio/mdsio_read_tape.F 64 MDS_READ_TAPE
      LOGICAL exst
./pkg/mdsio/mdsio_readvec_loc.F 148 MDS_READVEC_LOC
          INQUIRE( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_readvec_loc.F 152 MDS_READVEC_LOC
          IF ( .NOT.exst ) THEN
./pkg/mdsio/mdsio_readvec_loc.F 156 MDS_READVEC_LOC
            INQUIRE( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_readvec_loc.F 168 MDS_READVEC_LOC
          INQUIRE( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_readvec_loc.F 174 MDS_READVEC_LOC
        IF ( exst ) THEN
./pkg/mdsio/mdsio_readvec_loc.F 80 MDS_READVEC_LOC
      LOGICAL exst
./pkg/openad/the_model_main.F 300 THE_MODEL_MAIN
      LOGICAL exst
./pkg/openad/the_model_main.F 323 THE_MODEL_MAIN
      exst     = .TRUE.
./pkg/openad/the_model_main.F 376 THE_MODEL_MAIN
         inquire( file='costfinal', exist=exst )
./pkg/openad/the_model_main.F 377 THE_MODEL_MAIN
         IF ( .NOT. exst ) THEN
./pkg/openad/the_model_main.F 405 THE_MODEL_MAIN
      inquire( file='costfinal', exist=exst )
./pkg/openad/the_model_main.F 406 THE_MODEL_MAIN
      IF ( .NOT. exst) THEN
./pkg/profiles/profiles_init_fixed.F 47 PROFILES_INIT_FIXED
      logical  exst
./pkg/profiles/profiles_init_fixed.F 635 PROFILES_INIT_FIXED
      inquire( file=fnameequinc, exist=exst )
./pkg/profiles/profiles_init_fixed.F 636 PROFILES_INIT_FIXED
      if (.NOT.exst) then
./pkg/profiles/profiles_init_fixed.F 646 PROFILES_INIT_FIXED
      inquire( file=adfnameequinc, exist=exst )
./pkg/profiles/profiles_init_fixed.F 647 PROFILES_INIT_FIXED
      if (.NOT.exst) then
./pkg/profiles/profiles_init_fixed.F 664 PROFILES_INIT_FIXED
      inquire( file=fnameequinc, exist=exst )
./pkg/profiles/profiles_init_fixed.F 667 PROFILES_INIT_FIXED
      if (.NOT.exst) then
./pkg/profiles/profiles_init_fixed.F 679 PROFILES_INIT_FIXED
      inquire( file=adfnameequinc, exist=exst )
./pkg/profiles/profiles_init_fixed.F 682 PROFILES_INIT_FIXED
      if (.NOT.exst) then
./pkg/profiles/profiles_readparms.F 137 PROFILES_READPARMS
            inquire( file=fname, exist=exst )
./pkg/profiles/profiles_readparms.F 138 PROFILES_READPARMS
            if (.NOT.exst) then
./pkg/profiles/profiles_readparms.F 40 PROFILES_READPARMS
      LOGICAL exst
./pkg/regrid/regrid_init_varia.F 134 REGRID_INIT_VARIA
            INQUIRE( FILE=fname, EXIST=exst )
./pkg/regrid/regrid_init_varia.F 135 REGRID_INIT_VARIA
            IF (.NOT. exst) THEN
./pkg/regrid/regrid_init_varia.F 44 REGRID_INIT_VARIA
      LOGICAL  exst
./pkg/seaice/seaice_cost_concentration.F 109 SEAICE_COST_CONCENTRATION
      logical exst
./pkg/seaice/seaice_cost_concentration.F 217 SEAICE_COST_CONCENTRATION
        inquire( file=fname2, exist=exst )
./pkg/seaice/seaice_cost_concentration.F 222 SEAICE_COST_CONCENTRATION
        if (.NOT. exst) then
./pkg/seaice/seaice_cost_init_fixed.F 100 SEAICE_COST_INIT_FIXED
      inquire( file='costfinal', exist=exst )
./pkg/seaice/seaice_cost_init_fixed.F 101 SEAICE_COST_INIT_FIXED
      if ( .NOT. exst) then
./pkg/seaice/seaice_cost_init_fixed.F 42 SEAICE_COST_INIT_FIXED
      logical exst
./pkg/seaice/seaice_cost_init_varia.F 46 SEAICE_COST_INIT_VARIA
      logical exst
./pkg/seaice/seaice_cost_sss.F 110 SEAICE_COST_SSS
      logical exst
./pkg/seaice/seaice_cost_sss.F 235 SEAICE_COST_SSS
      inquire( file=fname2, exist=exst )
./pkg/seaice/seaice_cost_sss.F 240 SEAICE_COST_SSS
        if (.NOT. exst) then
./pkg/seaice/seaice_cost_sst.F 108 SEAICE_COST_SST
      logical exst
./pkg/seaice/seaice_cost_sst.F 235 SEAICE_COST_SST
      inquire( file=fname2, exist=exst )
./pkg/seaice/seaice_cost_sst.F 240 SEAICE_COST_SST
        if (.NOT. exst) then
./pkg/thsice/thsice_cost_init_varia.F 38 THSICE_COST_INIT_VARIA
      logical exst
./verification/flt_example/extra/cvprofiles.F 132 NO PROCEDURE
         inquire( file=dataFname, exist=exst )
./verification/flt_example/extra/cvprofiles.F 133 NO PROCEDURE
         if (exst)  iGmax = iGmax + 1
./verification/flt_example/extra/cvprofiles.F 140 NO PROCEDURE
         inquire( file=dataFname, exist=exst )
./verification/flt_example/extra/cvprofiles.F 141 NO PROCEDURE
         if (exst)  jGmax = jGmax + 1
./verification/flt_example/extra/cvprofiles.F 28 NO PROCEDURE
      logical exst
./model/src/the_model_main.F 298 THE_MODEL_MAIN
      LOGICAL exst
./model/src/the_model_main.F 303 THE_MODEL_MAIN
      exst     = .TRUE.
./model/src/the_model_main.F 338 THE_MODEL_MAIN
         inquire( file='costfinal', exist=exst )
./model/src/the_model_main.F 339 THE_MODEL_MAIN
         IF ( .NOT. exst ) THEN
./model/src/the_model_main.F 367 THE_MODEL_MAIN
      inquire( file='costfinal', exist=exst )
./model/src/the_model_main.F 368 THE_MODEL_MAIN
      IF ( .NOT. exst) THEN
./pkg/autodiff/autodiff_whtapeio_sync.F 102 AUTODIFF_WHTAPEIO_SYNC
        inquire( file=fName, exist=exst )
./pkg/autodiff/autodiff_whtapeio_sync.F 113 AUTODIFF_WHTAPEIO_SYNC
        IF (.NOT.exst) then
./pkg/autodiff/autodiff_whtapeio_sync.F 53 AUTODIFF_WHTAPEIO_SYNC
      logical  exst
./pkg/cfc/cfc_atmos.F 41 CFC_ATMOS
      LOGICAL exst
./pkg/cfc/cfc_atmos.F 55 CFC_ATMOS
      INQUIRE( FILE=atmCFC_inpFile(1:iL), EXIST=exst )
./pkg/cfc/cfc_atmos.F 56 CFC_ATMOS
      IF (exst) THEN
./eesupp/src/open_copy_data_file.F 55 OPEN_COPY_DATA_FILE
      LOGICAL  exst
./eesupp/src/open_copy_data_file.F 65 OPEN_COPY_DATA_FILE
      INQUIRE( FILE=data_file, EXIST=exst )
./eesupp/src/open_copy_data_file.F 66 OPEN_COPY_DATA_FILE
      IF (exst) THEN
./pkg/cost/cost_final_restore.F 38 COST_FINAL_RESTORE
      logical exst
./pkg/cost/cost_final_restore.F 47 COST_FINAL_RESTORE
           inquire(file='divided.ctrl',exist=exst)
./pkg/cost/cost_final_restore.F 48 COST_FINAL_RESTORE
           if (exst) then
./pkg/ctrl/ctrl_init_ctrlvar.F 59 CTRL_INIT_CTRLVAR
      logical  exst
./pkg/ctrl/ctrl_init_ctrlvar.F 78 CTRL_INIT_CTRLVAR
      inquire( file='costfinal', exist=exst )
./pkg/ctrl/ctrl_init_ctrlvar.F 81 CTRL_INIT_CTRLVAR
      IF ( .NOT. exst) THEN
./pkg/ecco/cost_argo_salt.F 137 COST_ARGO_SALT
        inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_argo_salt.F 138 COST_ARGO_SALT
        if (.NOT. exst) then
./pkg/ecco/cost_argo_salt.F 81 COST_ARGO_SALT
      logical exst
./pkg/ecco/cost_argo_theta.F 140 COST_ARGO_THETA
        inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_argo_theta.F 141 COST_ARGO_THETA
        if (.NOT. exst) then
./pkg/ecco/cost_argo_theta.F 80 COST_ARGO_THETA
      logical exst
./pkg/ecco/cost_bp_read.F 104 COST_BP_READ
      inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_bp_read.F 105 COST_BP_READ
      if (.NOT. exst) then
./pkg/ecco/cost_bp_read.F 66 COST_BP_READ
      logical exst
./pkg/ecco/cost_ctds.F 136 COST_CTDS
        inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_ctds.F 137 COST_CTDS
        if (.NOT. exst) then
./pkg/ecco/cost_ctds.F 81 COST_CTDS
      logical exst
./pkg/ecco/cost_ctdt.F 137 COST_CTDT
        inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_ctdt.F 138 COST_CTDT
        if (.NOT. exst) then
./pkg/ecco/cost_ctdt.F 82 COST_CTDT
      logical exst
./pkg/ecco/cost_gencost_seaicev4.F 119 COST_GENCOST_SEAICEV4
      logical exst
./pkg/ecco/cost_gencost_seaicev4.F 303 COST_GENCOST_SEAICEV4
        inquire( file=fname0, exist=exst )
./pkg/ecco/cost_gencost_seaicev4.F 304 COST_GENCOST_SEAICEV4
        if (.NOT. exst) then
./pkg/ecco/cost_gencost_seaicev4.F 334 COST_GENCOST_SEAICEV4
          inquire( file=fname0w, exist=exst )
./pkg/ecco/cost_gencost_seaicev4.F 336 COST_GENCOST_SEAICEV4
          if (.NOT. exst) then
./pkg/ecco/cost_gencost_sstv4.F 206 COST_GENCOST_SSTV4
             inquire( file=fname2, exist=exst )
./pkg/ecco/cost_gencost_sstv4.F 358 COST_GENCOST_SSTV4
             inquire( file=fname2, exist=exst )
./pkg/ecco/cost_gencost_sstv4.F 91 COST_GENCOST_SSTV4
      logical exst
./pkg/ecco/cost_generic.F 112 COST_GENERIC
      logical exst
./pkg/ecco/cost_generic.F 235 COST_GENERIC
        inquire( file=fname2, exist=exst )
./pkg/ecco/cost_generic.F 236 COST_GENERIC
        if ( (.NOT. exst).AND.( localperiod .NE. 86400. ) ) then
./pkg/ecco/cost_generic.F 238 COST_GENERIC
           inquire( file=fname2, exist=exst )
./pkg/ecco/cost_generic.F 246 COST_GENERIC
        if ( (localrec .GT. 0).AND.(obsrec .GT. 0).AND.(exst) ) then
./pkg/ecco/cost_readers.F 113 COST_READERS
      inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_readers.F 114 COST_READERS
      if (.NOT. exst) then
./pkg/ecco/cost_readers.F 120 COST_READERS
         inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_readers.F 126 COST_READERS
      if ( (sshrec .GT. 0).AND.(exst) ) then
./pkg/ecco/cost_readers.F 69 COST_READERS
      logical exst
./pkg/ecco/cost_readgfo.F 113 COST_READGFO
      inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_readgfo.F 114 COST_READGFO
      if (.NOT. exst) then
./pkg/ecco/cost_readgfo.F 120 COST_READGFO
         inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_readgfo.F 126 COST_READGFO
      if ( (sshrec .GT. 0).AND.(exst) ) then
./pkg/ecco/cost_readgfo.F 69 COST_READGFO
      logical exst
./pkg/ecco/cost_readscatxfields.F 144 COST_READSCATXFIELDS
        inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_readscatxfields.F 145 COST_READSCATXFIELDS
        if (.NOT. exst) then
./pkg/ecco/cost_readscatxfields.F 77 COST_READSCATXFIELDS
      logical exst
./pkg/ecco/cost_readscatyfields.F 143 COST_READSCATYFIELDS
        inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_readscatyfields.F 144 COST_READSCATYFIELDS
        if (.NOT. exst) then
./pkg/ecco/cost_readscatyfields.F 77 COST_READSCATYFIELDS
      logical exst
./pkg/ecco/cost_readtopex.F 131 COST_READTOPEX
      inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_readtopex.F 132 COST_READTOPEX
      if (.NOT. exst) then
./pkg/ecco/cost_readtopex.F 138 COST_READTOPEX
         inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_readtopex.F 153 COST_READTOPEX
      if ( (sshrec .GT. 0).AND.(exst) ) then
./pkg/ecco/cost_readtopex.F 69 COST_READTOPEX
      logical exst
./pkg/ecco/cost_sla_read.F 118 COST_SLA_READ
      inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_sla_read.F 121 COST_SLA_READ
      if ( (sshrec .GT. 0).AND.(exst) ) then
./pkg/ecco/cost_sla_read.F 74 COST_SLA_READ
      logical exst
./pkg/ecco/cost_sla_read_yd.F 107 COST_SLA_READ_YD
      inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_sla_read_yd.F 108 COST_SLA_READ_YD
      if (.NOT. exst) then
./pkg/ecco/cost_sla_read_yd.F 74 COST_SLA_READ_YD
      logical exst
./pkg/ecco/cost_xbt.F 142 COST_XBT
        inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_xbt.F 143 COST_XBT
        if (.NOT. exst) then
./pkg/ecco/cost_xbt.F 81 COST_XBT
      logical exst
./pkg/ecco/ecco_check.F 193 ECCO_CHECK_FILES
      LOGICAL exst, singleFileTest, yearlyFileTest
./pkg/ecco/ecco_check.F 222 ECCO_CHECK_FILES
           inquire( file=localobsfile, exist=exst )
./pkg/ecco/ecco_check.F 223 ECCO_CHECK_FILES
           IF ( exst ) singleFileTest=.TRUE.
./pkg/ecco/ecco_check.F 238 ECCO_CHECK_FILES
           inquire( file=fname, exist=exst )
./pkg/ecco/ecco_check.F 240 ECCO_CHECK_FILES
           IF ( (.NOT.exst).AND.(yday.GE.locy) ) THEN
./pkg/ecco/ecco_check.F 249 ECCO_CHECK_FILES
           ELSEIF ( (exst).AND.(yday.GE.locy) ) THEN
./pkg/ecco/ecco_cost_init_fixed.F 189 ECCO_COST_INIT_FIXED
      inquire( file='costfinal', exist=exst )
./pkg/ecco/ecco_cost_init_fixed.F 190 ECCO_COST_INIT_FIXED
      if ( .NOT. exst) then
./pkg/ecco/ecco_cost_init_fixed.F 57 ECCO_COST_INIT_FIXED
      logical exst
./pkg/ecco/ecco_cost_init_varia.F 52 ECCO_COST_INIT_VARIA
      logical exst
./pkg/ecco/ecco_cost_weights.F 270 ECCO_COST_WEIGHTS
        inquire( file=data_errfile, exist=exst )
./pkg/ecco/ecco_cost_weights.F 271 ECCO_COST_WEIGHTS
        if (exst) then
./pkg/ecco/ecco_cost_weights.F 79 ECCO_COST_WEIGHTS
      logical  exst