| File |
Line number |
Procedure |
Code |
|
./pkg/flt/flt_traj.F |
63 |
FLT_TRAJ |
logical exst |
|
./pkg/flt/flt_traj.F |
81 |
FLT_TRAJ |
inquire( file=dataFname, exist=exst ) |
|
./pkg/flt/flt_traj.F |
82 |
FLT_TRAJ |
if (exst) then |
|
./pkg/flt/flt_up.F |
64 |
FLT_UP |
logical exst |
|
./pkg/flt/flt_up.F |
82 |
FLT_UP |
inquire( file=dataFname, exist=exst ) |
|
./pkg/flt/flt_up.F |
83 |
FLT_UP |
if (exst) then |
|
./pkg/flt/flt_mdsreadvector.F |
107 |
MDSREADVECTOR_FLT |
inquire( file=dataFname, exist=exst ) |
|
./pkg/flt/flt_mdsreadvector.F |
110 |
MDSREADVECTOR_FLT |
if (exst) then |
|
./pkg/flt/flt_mdsreadvector.F |
124 |
MDSREADVECTOR_FLT |
inquire( file=dataFname, exist=exst ) |
|
./pkg/flt/flt_mdsreadvector.F |
125 |
MDSREADVECTOR_FLT |
if (exst) then |
|
./pkg/flt/flt_mdsreadvector.F |
132 |
MDSREADVECTOR_FLT |
inquire( file=dataFname, exist=exst ) |
|
./pkg/flt/flt_mdsreadvector.F |
133 |
MDSREADVECTOR_FLT |
if (exst) then |
|
./pkg/flt/flt_mdsreadvector.F |
160 |
MDSREADVECTOR_FLT |
inquire( file=dataFname, exist=exst ) |
|
./pkg/flt/flt_mdsreadvector.F |
163 |
MDSREADVECTOR_FLT |
if (exst) then |
|
./pkg/flt/flt_mdsreadvector.F |
72 |
MDSREADVECTOR_FLT |
logical exst |
|
./pkg/profiles/profiles_init_fixed.F |
294 |
PROFILES_INIT_FIXED |
inquire( file=fnameequinc, exist=exst ) |
|
./pkg/profiles/profiles_init_fixed.F |
295 |
PROFILES_INIT_FIXED |
if (.NOT.exst) then |
|
./pkg/profiles/profiles_init_fixed.F |
316 |
PROFILES_INIT_FIXED |
inquire( file=fnameequinc, exist=exst ) |
|
./pkg/profiles/profiles_init_fixed.F |
317 |
PROFILES_INIT_FIXED |
if (.NOT.exst) then |
|
./pkg/profiles/profiles_init_fixed.F |
41 |
PROFILES_INIT_FIXED |
logical exst |
|
./pkg/profiles/profiles_init_varia.F |
47 |
PROFILES_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 |
|
./verification/flt_example/extra/cvfloat.F |
128 |
NO PROCEDURE |
inquire( file=dataFname, exist=exst ) |
|
./verification/flt_example/extra/cvfloat.F |
129 |
NO PROCEDURE |
if (exst) iGmax = iGmax + 1 |
|
./verification/flt_example/extra/cvfloat.F |
136 |
NO PROCEDURE |
inquire( file=dataFname, exist=exst ) |
|
./verification/flt_example/extra/cvfloat.F |
137 |
NO PROCEDURE |
if (exst) jGmax = jGmax + 1 |
|
./verification/flt_example/extra/cvfloat.F |
27 |
NO PROCEDURE |
logical exst |
|
./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 |
|
./model/src/open_copy_data_file.F |
43 |
OPEN_COPY_DATA_FILE |
LOGICAL exst |
|
./model/src/open_copy_data_file.F |
50 |
OPEN_COPY_DATA_FILE |
INQUIRE( FILE=data_file, EXIST=exst ) |
|
./model/src/open_copy_data_file.F |
51 |
OPEN_COPY_DATA_FILE |
IF (exst) THEN |
|
./model/src/the_model_main.F |
490 |
THE_MODEL_MAIN |
logical exst |
|
./model/src/the_model_main.F |
527 |
THE_MODEL_MAIN |
inquire( file='costfinal', exist=exst ) |
|
./model/src/the_model_main.F |
528 |
THE_MODEL_MAIN |
IF ( .NOT. exst ) THEN |
|
./model/src/the_model_main.F |
556 |
THE_MODEL_MAIN |
inquire( file='costfinal', exist=exst ) |
|
./model/src/the_model_main.F |
557 |
THE_MODEL_MAIN |
IF ( .NOT. exst) THEN |
|
./pkg/cost/cost_final_restore.F |
37 |
COST_FINAL_RESTORE |
logical exst |
|
./pkg/cost/cost_final_restore.F |
46 |
COST_FINAL_RESTORE |
inquire(file='divided.ctrl',exist=exst) |
|
./pkg/cost/cost_final_restore.F |
47 |
COST_FINAL_RESTORE |
if (exst) then |
|
./pkg/mdsio/mdsio_slice.F |
102 |
MDSREADFIELDXZ |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_slice.F |
103 |
MDSREADFIELDXZ |
if (exst) then |
|
./pkg/mdsio/mdsio_slice.F |
116 |
MDSREADFIELDXZ |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_slice.F |
117 |
MDSREADFIELDXZ |
if (exst) then |
|
./pkg/mdsio/mdsio_slice.F |
145 |
MDSREADFIELDXZ |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_slice.F |
148 |
MDSREADFIELDXZ |
if (exst) then |
|
./pkg/mdsio/mdsio_slice.F |
298 |
MDSREADFIELDYZ |
logical exst |
|
./pkg/mdsio/mdsio_slice.F |
340 |
MDSREADFIELDYZ |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_slice.F |
341 |
MDSREADFIELDYZ |
if (exst) then |
|
./pkg/mdsio/mdsio_slice.F |
354 |
MDSREADFIELDYZ |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_slice.F |
355 |
MDSREADFIELDYZ |
if (exst) then |
|
./pkg/mdsio/mdsio_slice.F |
383 |
MDSREADFIELDYZ |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_slice.F |
386 |
MDSREADFIELDYZ |
if (exst) then |
|
./pkg/mdsio/mdsio_slice.F |
60 |
MDSREADFIELDXZ |
logical exst |
|
./pkg/mdsio/mdsio_readfield_loc.F |
109 |
MDSREADFIELD_LOC |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_readfield_loc.F |
110 |
MDSREADFIELD_LOC |
if (exst) then |
|
./pkg/mdsio/mdsio_readfield_loc.F |
138 |
MDSREADFIELD_LOC |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_readfield_loc.F |
141 |
MDSREADFIELD_LOC |
if (exst) then |
|
./pkg/mdsio/mdsio_readfield_loc.F |
62 |
MDSREADFIELD_LOC |
logical exst |
|
./pkg/mdsio/mdsio_readfield_loc.F |
95 |
MDSREADFIELD_LOC |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_readfield_loc.F |
96 |
MDSREADFIELD_LOC |
if (exst) then |
|
./pkg/mdsio/mdsio_readtile.F |
109 |
MDS_READTILE |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_readtile.F |
110 |
MDS_READTILE |
if (exst) then |
|
./pkg/mdsio/mdsio_readtile.F |
137 |
MDS_READTILE |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_readtile.F |
140 |
MDS_READTILE |
if (exst) then |
|
./pkg/mdsio/mdsio_readtile.F |
64 |
MDS_READTILE |
logical exst |
|
./pkg/mdsio/mdsio_readtile.F |
97 |
MDS_READTILE |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_readtile.F |
98 |
MDS_READTILE |
if (exst) then |
|
./pkg/mdsio/mdsio_slice_loc.F |
106 |
MDSREADFIELDXZ_LOC |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_slice_loc.F |
107 |
MDSREADFIELDXZ_LOC |
if (exst) then |
|
./pkg/mdsio/mdsio_slice_loc.F |
135 |
MDSREADFIELDXZ_LOC |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_slice_loc.F |
138 |
MDSREADFIELDXZ_LOC |
if (exst) then |
|
./pkg/mdsio/mdsio_slice_loc.F |
288 |
MDSREADFIELDYZ_LOC |
logical exst |
|
./pkg/mdsio/mdsio_slice_loc.F |
321 |
MDSREADFIELDYZ_LOC |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_slice_loc.F |
322 |
MDSREADFIELDYZ_LOC |
if (exst) then |
|
./pkg/mdsio/mdsio_slice_loc.F |
335 |
MDSREADFIELDYZ_LOC |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_slice_loc.F |
336 |
MDSREADFIELDYZ_LOC |
if (exst) then |
|
./pkg/mdsio/mdsio_slice_loc.F |
364 |
MDSREADFIELDYZ_LOC |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_slice_loc.F |
367 |
MDSREADFIELDYZ_LOC |
if (exst) then |
|
./pkg/mdsio/mdsio_slice_loc.F |
59 |
MDSREADFIELDXZ_LOC |
logical exst |
|
./pkg/mdsio/mdsio_slice_loc.F |
92 |
MDSREADFIELDXZ_LOC |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_slice_loc.F |
93 |
MDSREADFIELDXZ_LOC |
if (exst) then |
|
./pkg/mdsio/mdsio_readfield.F |
128 |
MDSREADFIELD |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_readfield.F |
129 |
MDSREADFIELD |
if (exst) then |
|
./pkg/mdsio/mdsio_readfield.F |
142 |
MDSREADFIELD |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_readfield.F |
143 |
MDSREADFIELD |
if (exst) then |
|
./pkg/mdsio/mdsio_readfield.F |
263 |
MDSREADFIELD |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_readfield.F |
266 |
MDSREADFIELD |
if (exst) then |
|
./pkg/mdsio/mdsio_readfield.F |
383 |
MDSREADFIELD |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_readfield.F |
384 |
MDSREADFIELD |
if (exst) then |
|
./pkg/mdsio/mdsio_readfield.F |
399 |
MDSREADFIELD |
inquire( file=dataFName, exist=exst ) |
|
./pkg/mdsio/mdsio_readfield.F |
400 |
MDSREADFIELD |
if (exst) then |
|
./pkg/mdsio/mdsio_readfield.F |
68 |
MDSREADFIELD |
logical exst |
|
./pkg/mdsio/mdsio_readvector.F |
118 |
MDSREADVECTOR |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_readvector.F |
119 |
MDSREADVECTOR |
if (exst) then |
|
./pkg/mdsio/mdsio_readvector.F |
132 |
MDSREADVECTOR |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_readvector.F |
133 |
MDSREADVECTOR |
if (exst) then |
|
./pkg/mdsio/mdsio_readvector.F |
161 |
MDSREADVECTOR |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_readvector.F |
164 |
MDSREADVECTOR |
if (exst) then |
|
./pkg/mdsio/mdsio_readvector.F |
245 |
MDSREADVECTOR |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_readvector.F |
246 |
MDSREADVECTOR |
if (exst) globalFile = .TRUE. |
|
./pkg/mdsio/mdsio_readvector.F |
251 |
MDSREADVECTOR |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_readvector.F |
252 |
MDSREADVECTOR |
if (exst) globalFile = .TRUE. |
|
./pkg/mdsio/mdsio_readvector.F |
60 |
MDSREADVECTOR |
logical exst |
|
./pkg/mdsio/mdsio_gl.F |
142 |
MDSREADFIELD_3D_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl.F |
143 |
MDSREADFIELD_3D_GL |
if (exst) globalFile = .TRUE. |
|
./pkg/mdsio/mdsio_gl.F |
148 |
MDSREADFIELD_3D_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl.F |
149 |
MDSREADFIELD_3D_GL |
if (exst) globalFile = .TRUE. |
|
./pkg/mdsio/mdsio_gl.F |
180 |
MDSREADFIELD_3D_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl.F |
181 |
MDSREADFIELD_3D_GL |
if (exst) then |
|
./pkg/mdsio/mdsio_gl.F |
191 |
MDSREADFIELD_3D_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl.F |
192 |
MDSREADFIELD_3D_GL |
if (exst) then |
|
./pkg/mdsio/mdsio_gl.F |
228 |
MDSREADFIELD_3D_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl.F |
231 |
MDSREADFIELD_3D_GL |
if (exst) then |
|
./pkg/mdsio/mdsio_gl.F |
802 |
MDSREADFIELD_2D_GL |
logical exst |
|
./pkg/mdsio/mdsio_gl.F |
857 |
MDSREADFIELD_2D_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl.F |
858 |
MDSREADFIELD_2D_GL |
if (exst) globalFile = .TRUE. |
|
./pkg/mdsio/mdsio_gl.F |
863 |
MDSREADFIELD_2D_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl.F |
864 |
MDSREADFIELD_2D_GL |
if (exst) globalFile = .TRUE. |
|
./pkg/mdsio/mdsio_gl.F |
88 |
MDSREADFIELD_3D_GL |
logical exst |
|
./pkg/mdsio/mdsio_gl.F |
894 |
MDSREADFIELD_2D_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl.F |
895 |
MDSREADFIELD_2D_GL |
if (exst) then |
|
./pkg/mdsio/mdsio_gl.F |
905 |
MDSREADFIELD_2D_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl.F |
906 |
MDSREADFIELD_2D_GL |
if (exst) then |
|
./pkg/mdsio/mdsio_gl.F |
942 |
MDSREADFIELD_2D_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl.F |
945 |
MDSREADFIELD_2D_GL |
if (exst) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
121 |
MDSREADFIELD_XZ_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
122 |
MDSREADFIELD_XZ_GL |
if (exst) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
132 |
MDSREADFIELD_XZ_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
133 |
MDSREADFIELD_XZ_GL |
if (exst) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
154 |
MDSREADFIELD_XZ_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
157 |
MDSREADFIELD_XZ_GL |
if (exst) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
310 |
MDSREADFIELD_YZ_GL |
logical exst |
|
./pkg/mdsio/mdsio_gl_slice.F |
344 |
MDSREADFIELD_YZ_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
345 |
MDSREADFIELD_YZ_GL |
if (exst) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
355 |
MDSREADFIELD_YZ_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
356 |
MDSREADFIELD_YZ_GL |
if (exst) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
376 |
MDSREADFIELD_YZ_GL |
inquire( file=dataFname, exist=exst ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
379 |
MDSREADFIELD_YZ_GL |
if (exst) then |
|
./pkg/mdsio/mdsio_gl_slice.F |
87 |
MDSREADFIELD_XZ_GL |
logical exst |
|
./pkg/ecco/cost_ctdt.F |
135 |
COST_CTDT |
inquire( file=fnametmp, exist=exst ) |
|
./pkg/ecco/cost_ctdt.F |
136 |
COST_CTDT |
if (.NOT. exst) then |
|
./pkg/ecco/cost_ctdt.F |
80 |
COST_CTDT |
logical exst |
|
./pkg/ecco/cost_readscatxfields.F |
109 |
COST_READSCATXFIELDS |
inquire( file=fnametmp, exist=exst ) |
|
./pkg/ecco/cost_readscatxfields.F |
110 |
COST_READSCATXFIELDS |
if (.NOT. exst) then |
|
./pkg/ecco/cost_readscatxfields.F |
66 |
COST_READSCATXFIELDS |
logical exst |
|
./pkg/ecco/cost_readscatyfields.F |
108 |
COST_READSCATYFIELDS |
inquire( file=fnametmp, exist=exst ) |
|
./pkg/ecco/cost_readscatyfields.F |
109 |
COST_READSCATYFIELDS |
if (.NOT. exst) then |
|
./pkg/ecco/cost_readscatyfields.F |
66 |
COST_READSCATYFIELDS |
logical exst |
|
./pkg/ecco/cost_readgfo.F |
112 |
COST_READGFO |
inquire( file=fnametmp, exist=exst ) |
|
./pkg/ecco/cost_readgfo.F |
113 |
COST_READGFO |
if (.NOT. exst) then |
|
./pkg/ecco/cost_readgfo.F |
67 |
COST_READGFO |
logical exst |
|
./pkg/ecco/ecco_cost_init_varia.F |
48 |
ECCO_COST_INIT_VARIA |
logical exst |
|
./pkg/ecco/cost_ctds.F |
134 |
COST_CTDS |
inquire( file=fnametmp, exist=exst ) |
|
./pkg/ecco/cost_ctds.F |
135 |
COST_CTDS |
if (.NOT. exst) then |
|
./pkg/ecco/cost_ctds.F |
79 |
COST_CTDS |
logical exst |
|
./pkg/ecco/cost_generic.F |
109 |
COST_GENERIC |
logical exst |
|
./pkg/ecco/cost_generic.F |
201 |
COST_GENERIC |
inquire( file=fname2, exist=exst ) |
|
./pkg/ecco/cost_generic.F |
202 |
COST_GENERIC |
if (.NOT. exst) then |
|
./pkg/ecco/cost_readtopex.F |
112 |
COST_READTOPEX |
inquire( file=fnametmp, exist=exst ) |
|
./pkg/ecco/cost_readtopex.F |
113 |
COST_READTOPEX |
if (.NOT. exst) then |
|
./pkg/ecco/cost_readtopex.F |
67 |
COST_READTOPEX |
logical exst |
|
./pkg/ecco/cost_argo_theta.F |
138 |
COST_ARGO_THETA |
inquire( file=fnametmp, exist=exst ) |
|
./pkg/ecco/cost_argo_theta.F |
139 |
COST_ARGO_THETA |
if (.NOT. exst) then |
|
./pkg/ecco/cost_argo_theta.F |
78 |
COST_ARGO_THETA |
logical exst |
|
./pkg/ecco/ecco_cost_init_fixed.F |
126 |
ECCO_COST_INIT_FIXED |
inquire( file='costfinal', exist=exst ) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
127 |
ECCO_COST_INIT_FIXED |
if ( .NOT. exst) then |
|
./pkg/ecco/ecco_cost_init_fixed.F |
55 |
ECCO_COST_INIT_FIXED |
logical exst |
|
./pkg/ecco/cost_argo_salt.F |
135 |
COST_ARGO_SALT |
inquire( file=fnametmp, exist=exst ) |
|
./pkg/ecco/cost_argo_salt.F |
136 |
COST_ARGO_SALT |
if (.NOT. exst) then |
|
./pkg/ecco/cost_argo_salt.F |
79 |
COST_ARGO_SALT |
logical exst |
|
./pkg/ecco/cost_readers.F |
112 |
COST_READERS |
inquire( file=fnametmp, exist=exst ) |
|
./pkg/ecco/cost_readers.F |
113 |
COST_READERS |
if (.NOT. exst) then |
|
./pkg/ecco/cost_readers.F |
67 |
COST_READERS |
logical exst |
|
./pkg/ecco/cost_xbt.F |
140 |
COST_XBT |
inquire( file=fnametmp, exist=exst ) |
|
./pkg/ecco/cost_xbt.F |
141 |
COST_XBT |
if (.NOT. exst) then |
|
./pkg/ecco/cost_xbt.F |
79 |
COST_XBT |
logical exst |
|
./pkg/ctrl/ctrl_init_ctrlvar.F |
61 |
CTRL_INIT_CTRLVAR |
logical exst |
|
./pkg/ctrl/ctrl_init_ctrlvar.F |
76 |
CTRL_INIT_CTRLVAR |
inquire( file='costfinal', exist=exst ) |
|
./pkg/ctrl/ctrl_init_ctrlvar.F |
77 |
CTRL_INIT_CTRLVAR |
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 |
46 |
SEAICE_COST_INIT_FIXED |
logical exst |
|
./pkg/seaice/seaice_cost_init_varia.F |
44 |
SEAICE_COST_INIT_VARIA |
logical exst |