Symbol Description Uses
exst 190



File Line number Procedure Code
./pkg/flt/flt_mdsreadvector.F 113 FLT_MDSREADVECTOR
      INQUIRE( file=dataFname, exist=exst )
./pkg/flt/flt_mdsreadvector.F 116 FLT_MDSREADVECTOR
      IF (exst) THEN
./pkg/flt/flt_mdsreadvector.F 125 FLT_MDSREADVECTOR
       INQUIRE( file=dataFname, exist=exst )
./pkg/flt/flt_mdsreadvector.F 129 FLT_MDSREADVECTOR
       IF ( .NOT.exst) THEN
./pkg/flt/flt_mdsreadvector.F 132 FLT_MDSREADVECTOR
        INQUIRE( file=dataFname, exist=exst )
./pkg/flt/flt_mdsreadvector.F 163 FLT_MDSREADVECTOR
         INQUIRE( file=dataFname, exist=exst )
./pkg/flt/flt_mdsreadvector.F 166 FLT_MDSREADVECTOR
         IF (exst) THEN
./pkg/flt/flt_mdsreadvector.F 73 FLT_MDSREADVECTOR
      LOGICAL exst
./pkg/flt/flt_traj.F 52 FLT_TRAJ
      LOGICAL exst
./pkg/flt/flt_traj.F 68 FLT_TRAJ
         INQUIRE( file=dataFname, exist=exst )
./pkg/flt/flt_traj.F 69 FLT_TRAJ
         IF (exst) THEN
./pkg/flt/flt_up.F 52 FLT_UP
      LOGICAL exst
./pkg/flt/flt_up.F 68 FLT_UP
         INQUIRE( file=dataFname, exist=exst )
./pkg/flt/flt_up.F 69 FLT_UP
         IF (exst) THEN
./pkg/mdsio/mdsio_gl.F 140 MDSREADFIELD_3D_GL
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 141 MDSREADFIELD_3D_GL
         if (exst) globalFile = .TRUE.
./pkg/mdsio/mdsio_gl.F 146 MDSREADFIELD_3D_GL
          inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 147 MDSREADFIELD_3D_GL
          if (exst) globalFile = .TRUE.
./pkg/mdsio/mdsio_gl.F 178 MDSREADFIELD_3D_GL
       inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 179 MDSREADFIELD_3D_GL
       if (exst) then
./pkg/mdsio/mdsio_gl.F 189 MDSREADFIELD_3D_GL
        inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 190 MDSREADFIELD_3D_GL
        if (exst) then
./pkg/mdsio/mdsio_gl.F 226 MDSREADFIELD_3D_GL
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 229 MDSREADFIELD_3D_GL
         if (exst) then
./pkg/mdsio/mdsio_gl.F 74 MDSREADFIELD_3D_GL
      logical exst
./pkg/mdsio/mdsio_gl.F 835 MDSREADFIELD_2D_GL
      logical exst
./pkg/mdsio/mdsio_gl.F 902 MDSREADFIELD_2D_GL
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 903 MDSREADFIELD_2D_GL
         if (exst) globalFile = .TRUE.
./pkg/mdsio/mdsio_gl.F 908 MDSREADFIELD_2D_GL
          inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 909 MDSREADFIELD_2D_GL
          if (exst) globalFile = .TRUE.
./pkg/mdsio/mdsio_gl.F 939 MDSREADFIELD_2D_GL
       inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 940 MDSREADFIELD_2D_GL
       if (exst) then
./pkg/mdsio/mdsio_gl.F 950 MDSREADFIELD_2D_GL
        inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 951 MDSREADFIELD_2D_GL
        if (exst) then
./pkg/mdsio/mdsio_gl.F 987 MDSREADFIELD_2D_GL
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl.F 990 MDSREADFIELD_2D_GL
         if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 107 MDSREADFIELD_XZ_GL
      inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 108 MDSREADFIELD_XZ_GL
      if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 118 MDSREADFIELD_XZ_GL
       inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 119 MDSREADFIELD_XZ_GL
       if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 140 MDSREADFIELD_XZ_GL
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 143 MDSREADFIELD_XZ_GL
         if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 301 MDSREADFIELD_YZ_GL
      logical exst
./pkg/mdsio/mdsio_gl_slice.F 335 MDSREADFIELD_YZ_GL
      inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 336 MDSREADFIELD_YZ_GL
      if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 346 MDSREADFIELD_YZ_GL
       inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 347 MDSREADFIELD_YZ_GL
       if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 367 MDSREADFIELD_YZ_GL
         inquire( file=dataFname, exist=exst )
./pkg/mdsio/mdsio_gl_slice.F 370 MDSREADFIELD_YZ_GL
         if (exst) then
./pkg/mdsio/mdsio_gl_slice.F 73 MDSREADFIELD_XZ_GL
      logical exst
./pkg/mdsio/mdsio_read_field.F 206 MDS_READ_FIELD
        INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_field.F 207 MDS_READ_FIELD
        IF (exst) THEN
./pkg/mdsio/mdsio_read_field.F 222 MDS_READ_FIELD
          INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_field.F 223 MDS_READ_FIELD
          IF (exst) THEN
./pkg/mdsio/mdsio_read_field.F 433 MDS_READ_FIELD
           INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_field.F 436 MDS_READ_FIELD
           IF (exst) THEN
./pkg/mdsio/mdsio_read_field.F 96 MDS_READ_FIELD
      LOGICAL exst
./pkg/mdsio/mdsio_read_section.F 122 MDS_READ_SEC_XZ
      INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_section.F 123 MDS_READ_SEC_XZ
      IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 136 MDS_READ_SEC_XZ
       INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_section.F 137 MDS_READ_SEC_XZ
       IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 165 MDS_READ_SEC_XZ
         INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_section.F 168 MDS_READ_SEC_XZ
         IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 336 MDS_READ_SEC_YZ
      LOGICAL exst
./pkg/mdsio/mdsio_read_section.F 378 MDS_READ_SEC_YZ
      INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_section.F 379 MDS_READ_SEC_YZ
      IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 392 MDS_READ_SEC_YZ
       INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_section.F 393 MDS_READ_SEC_YZ
       IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 421 MDS_READ_SEC_YZ
         INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_read_section.F 424 MDS_READ_SEC_YZ
         IF (exst) THEN
./pkg/mdsio/mdsio_read_section.F 80 MDS_READ_SEC_XZ
      LOGICAL exst
./pkg/mdsio/mdsio_readvector.F 115 MDSREADVECTOR
      INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_readvector.F 116 MDSREADVECTOR
      IF (exst) THEN
./pkg/mdsio/mdsio_readvector.F 129 MDSREADVECTOR
       INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_readvector.F 130 MDSREADVECTOR
       IF (exst) THEN
./pkg/mdsio/mdsio_readvector.F 158 MDSREADVECTOR
         INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_readvector.F 161 MDSREADVECTOR
         IF (exst) THEN
./pkg/mdsio/mdsio_readvector.F 243 MDSREADVECTOR
         INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_readvector.F 244 MDSREADVECTOR
         IF (exst) globalFile = .TRUE.
./pkg/mdsio/mdsio_readvector.F 249 MDSREADVECTOR
          INQUIRE( file=dataFName, exist=exst )
./pkg/mdsio/mdsio_readvector.F 250 MDSREADVECTOR
          IF (exst) globalFile = .TRUE.
./pkg/mdsio/mdsio_readvector.F 60 MDSREADVECTOR
      LOGICAL exst
./pkg/profiles/profiles_init_fixed.F 43 PROFILES_INIT_FIXED
      logical  exst
./pkg/profiles/profiles_init_fixed.F 499 PROFILES_INIT_FIXED
      inquire( file=fnameequinc, exist=exst )
./pkg/profiles/profiles_init_fixed.F 500 PROFILES_INIT_FIXED
      if (.NOT.exst) then
./pkg/profiles/profiles_init_fixed.F 521 PROFILES_INIT_FIXED
      inquire( file=fnameequinc, exist=exst )
./pkg/profiles/profiles_init_fixed.F 522 PROFILES_INIT_FIXED
      if (.NOT.exst) then
./pkg/profiles/profiles_init_varia.F 48 PROFILES_INIT_VARIA
      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 108 SEAICE_COST_CONCENTRATION
      logical exst
./pkg/seaice/seaice_cost_concentration.F 216 SEAICE_COST_CONCENTRATION
        inquire( file=fname2, exist=exst )
./pkg/seaice/seaice_cost_concentration.F 221 SEAICE_COST_CONCENTRATION
        if (.NOT. exst) then
./pkg/seaice/seaice_cost_init_fixed.F 102 SEAICE_COST_INIT_FIXED
      inquire( file='costfinal', exist=exst )
./pkg/seaice/seaice_cost_init_fixed.F 103 SEAICE_COST_INIT_FIXED
      if ( .NOT. exst) then
./pkg/seaice/seaice_cost_init_fixed.F 47 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 109 SEAICE_COST_SSS
      logical exst
./pkg/seaice/seaice_cost_sss.F 234 SEAICE_COST_SSS
      inquire( file=fname2, exist=exst )
./pkg/seaice/seaice_cost_sss.F 239 SEAICE_COST_SSS
        if (.NOT. exst) then
./pkg/seaice/seaice_cost_sst.F 107 SEAICE_COST_SST
      logical exst
./pkg/seaice/seaice_cost_sst.F 229 SEAICE_COST_SST
      inquire( file=fname2, exist=exst )
./pkg/seaice/seaice_cost_sst.F 234 SEAICE_COST_SST
        if (.NOT. exst) then
./verification/OpenAD/code_ad_openad/the_model_main.F 494 THE_MODEL_MAIN
      logical  exst
./verification/OpenAD/code_ad_openad/the_model_main.F 542 THE_MODEL_MAIN
         inquire( file='costfinal', exist=exst )
./verification/OpenAD/code_ad_openad/the_model_main.F 543 THE_MODEL_MAIN
         IF ( .NOT. exst ) THEN
./verification/OpenAD/code_ad_openad/the_model_main.F 571 THE_MODEL_MAIN
      inquire( file='costfinal', exist=exst )
./verification/OpenAD/code_ad_openad/the_model_main.F 572 THE_MODEL_MAIN
      IF ( .NOT. exst) THEN
./verification/OpenAD/code_oad_all/the_model_main.F 496 THE_MODEL_MAIN
      logical  exst
./verification/OpenAD/code_oad_all/the_model_main.F 553 THE_MODEL_MAIN
         inquire( file='costfinal', exist=exst )
./verification/OpenAD/code_oad_all/the_model_main.F 554 THE_MODEL_MAIN
         IF ( .NOT. exst ) THEN
./verification/OpenAD/code_oad_all/the_model_main.F 582 THE_MODEL_MAIN
      inquire( file='costfinal', exist=exst )
./verification/OpenAD/code_oad_all/the_model_main.F 583 THE_MODEL_MAIN
      IF ( .NOT. exst) THEN
./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
./verification/natl_box_adjoint/code_pack/the_model_main.F 490 THE_MODEL_MAIN
      logical  exst
./verification/natl_box_adjoint/code_pack/the_model_main.F 512 THE_MODEL_MAIN
         inquire( file='costfinal', exist=exst )
./verification/natl_box_adjoint/code_pack/the_model_main.F 513 THE_MODEL_MAIN
         IF ( .NOT. exst ) THEN
./verification/offline_exf_seaice/code_ad/the_model_main.F 490 THE_MODEL_MAIN
      logical  exst
./verification/offline_exf_seaice/code_ad/the_model_main.F 527 THE_MODEL_MAIN
         inquire( file='costfinal', exist=exst )
./verification/offline_exf_seaice/code_ad/the_model_main.F 528 THE_MODEL_MAIN
         IF ( .NOT. exst ) THEN
./verification/offline_exf_seaice/code_ad/the_model_main.F 556 THE_MODEL_MAIN
      inquire( file='costfinal', exist=exst )
./verification/offline_exf_seaice/code_ad/the_model_main.F 557 THE_MODEL_MAIN
      IF ( .NOT. exst) THEN
./model/src/the_model_main.F 490 THE_MODEL_MAIN
      logical  exst
./model/src/the_model_main.F 533 THE_MODEL_MAIN
         inquire( file='costfinal', exist=exst )
./model/src/the_model_main.F 534 THE_MODEL_MAIN
         IF ( .NOT. exst ) THEN
./model/src/the_model_main.F 565 THE_MODEL_MAIN
      inquire( file='costfinal', exist=exst )
./model/src/the_model_main.F 566 THE_MODEL_MAIN
      IF ( .NOT. exst) THEN
./eesupp/src/open_copy_data_file.F 49 OPEN_COPY_DATA_FILE
      LOGICAL  exst
./eesupp/src/open_copy_data_file.F 55 OPEN_COPY_DATA_FILE
      INQUIRE( FILE=data_file, EXIST=exst )
./eesupp/src/open_copy_data_file.F 56 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 58 CTRL_INIT_CTRLVAR
      logical  exst
./pkg/ctrl/ctrl_init_ctrlvar.F 77 CTRL_INIT_CTRLVAR
      inquire( file='costfinal', exist=exst )
./pkg/ctrl/ctrl_init_ctrlvar.F 80 CTRL_INIT_CTRLVAR
      IF ( .NOT. exst) THEN
./pkg/ecco/cost_argo_salt.F 136 COST_ARGO_SALT
        inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_argo_salt.F 137 COST_ARGO_SALT
        if (.NOT. exst) then
./pkg/ecco/cost_argo_salt.F 80 COST_ARGO_SALT
      logical exst
./pkg/ecco/cost_argo_theta.F 139 COST_ARGO_THETA
        inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_argo_theta.F 140 COST_ARGO_THETA
        if (.NOT. exst) then
./pkg/ecco/cost_argo_theta.F 79 COST_ARGO_THETA
      logical exst
./pkg/ecco/cost_bp_read.F 64 COST_BP_READ
      logical exst
./pkg/ecco/cost_bp_read.F 94 COST_BP_READ
      inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_bp_read.F 95 COST_BP_READ
      if (.NOT. exst) then
./pkg/ecco/cost_ctds.F 135 COST_CTDS
        inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_ctds.F 136 COST_CTDS
        if (.NOT. exst) then
./pkg/ecco/cost_ctds.F 80 COST_CTDS
      logical exst
./pkg/ecco/cost_ctdt.F 136 COST_CTDT
        inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_ctdt.F 137 COST_CTDT
        if (.NOT. exst) then
./pkg/ecco/cost_ctdt.F 81 COST_CTDT
      logical exst
./pkg/ecco/cost_generic.F 112 COST_GENERIC
      logical exst
./pkg/ecco/cost_generic.F 233 COST_GENERIC
        inquire( file=fname2, exist=exst )
./pkg/ecco/cost_generic.F 234 COST_GENERIC
        if (.NOT. 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 68 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 68 COST_READGFO
      logical exst
./pkg/ecco/cost_readscatxfields.F 110 COST_READSCATXFIELDS
      inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_readscatxfields.F 111 COST_READSCATXFIELDS
      if (.NOT. exst) then
./pkg/ecco/cost_readscatxfields.F 67 COST_READSCATXFIELDS
      logical exst
./pkg/ecco/cost_readscatyfields.F 109 COST_READSCATYFIELDS
      inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_readscatyfields.F 110 COST_READSCATYFIELDS
      if (.NOT. exst) then
./pkg/ecco/cost_readscatyfields.F 67 COST_READSCATYFIELDS
      logical exst
./pkg/ecco/cost_readtopex.F 113 COST_READTOPEX
      inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_readtopex.F 114 COST_READTOPEX
      if (.NOT. exst) then
./pkg/ecco/cost_readtopex.F 68 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 119 COST_SLA_READ
      if (.NOT. exst) then
./pkg/ecco/cost_sla_read.F 73 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 141 COST_XBT
        inquire( file=fnametmp, exist=exst )
./pkg/ecco/cost_xbt.F 142 COST_XBT
        if (.NOT. exst) then
./pkg/ecco/cost_xbt.F 80 COST_XBT
      logical exst
./pkg/ecco/ecco_cost_init_fixed.F 153 ECCO_COST_INIT_FIXED
      inquire( file='costfinal', exist=exst )
./pkg/ecco/ecco_cost_init_fixed.F 154 ECCO_COST_INIT_FIXED
      if ( .NOT. exst) then
./pkg/ecco/ecco_cost_init_fixed.F 58 ECCO_COST_INIT_FIXED
      logical exst
./pkg/ecco/ecco_cost_init_varia.F 49 ECCO_COST_INIT_VARIA
      logical exst
./pkg/exf/exf_interp_read.F 114 EXF_INTERP_READ
        INQUIRE( file=infile, exist=exst )
./pkg/exf/exf_interp_read.F 115 EXF_INTERP_READ
        IF (exst) THEN
./pkg/exf/exf_interp_read.F 55 EXF_INTERP_READ
      LOGICAL  exst