MODFLOW 6  version 6.9.0.dev0
USGS Modular Hydrologic Model
olf-zdgidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module olfzdginputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public olf_zdg_param_definitions
8  public olf_zdg_aggregate_definitions
9  public olf_zdg_block_definitions
10  public olfzdgparamfoundtype
11  public olf_zdg_multi_package
12  public olf_zdg_is_advanced
13  public olf_zdg_subpackages
14 
15  type olfzdgparamfoundtype
16  logical :: auxiliary = .false.
17  logical :: boundnames = .false.
18  logical :: iprpak = .false.
19  logical :: iprflow = .false.
20  logical :: ipakcb = .false.
21  logical :: ts_filerecord = .false.
22  logical :: ts6 = .false.
23  logical :: filein = .false.
24  logical :: ts6_filename = .false.
25  logical :: obs_filerecord = .false.
26  logical :: obs6 = .false.
27  logical :: obs6_filename = .false.
28  logical :: maxbound = .false.
29  logical :: cellid = .false.
30  logical :: idcxs = .false.
31  logical :: width = .false.
32  logical :: slope = .false.
33  logical :: rough = .false.
34  logical :: auxvar = .false.
35  logical :: boundname = .false.
36  end type olfzdgparamfoundtype
37 
38  logical :: olf_zdg_multi_package = .true.
39  logical :: olf_zdg_is_advanced = .false.
40 
41  character(len=16), parameter :: &
42  olf_zdg_subpackages(*) = &
43  [ &
44  ' ' &
45  ]
46 
47  type(inputparamdefinitiontype), parameter :: &
48  olfzdg_auxiliary = inputparamdefinitiontype &
49  ( &
50  'OLF', & ! component
51  'ZDG', & ! subcomponent
52  'OPTIONS', & ! block
53  'AUXILIARY', & ! tag name
54  'AUXILIARY', & ! fortran variable
55  'STRING', & ! type
56  'NAUX', & ! shape
57  'keyword to specify aux variables', & ! longname
58  .false., & ! required
59  .false., & ! developmode
60  .false., & ! multi-record
61  .false., & ! preserve case
62  .false., & ! layered
63  .false. & ! timeseries
64  )
65 
66  type(inputparamdefinitiontype), parameter :: &
67  olfzdg_boundnames = inputparamdefinitiontype &
68  ( &
69  'OLF', & ! component
70  'ZDG', & ! subcomponent
71  'OPTIONS', & ! block
72  'BOUNDNAMES', & ! tag name
73  'BOUNDNAMES', & ! fortran variable
74  'KEYWORD', & ! type
75  '', & ! shape
76  '', & ! longname
77  .false., & ! required
78  .false., & ! developmode
79  .false., & ! multi-record
80  .false., & ! preserve case
81  .false., & ! layered
82  .false. & ! timeseries
83  )
84 
85  type(inputparamdefinitiontype), parameter :: &
86  olfzdg_iprpak = inputparamdefinitiontype &
87  ( &
88  'OLF', & ! component
89  'ZDG', & ! subcomponent
90  'OPTIONS', & ! block
91  'PRINT_INPUT', & ! tag name
92  'IPRPAK', & ! fortran variable
93  'KEYWORD', & ! type
94  '', & ! shape
95  'print input to listing file', & ! longname
96  .false., & ! required
97  .false., & ! developmode
98  .false., & ! multi-record
99  .false., & ! preserve case
100  .false., & ! layered
101  .false. & ! timeseries
102  )
103 
104  type(inputparamdefinitiontype), parameter :: &
105  olfzdg_iprflow = inputparamdefinitiontype &
106  ( &
107  'OLF', & ! component
108  'ZDG', & ! subcomponent
109  'OPTIONS', & ! block
110  'PRINT_FLOWS', & ! tag name
111  'IPRFLOW', & ! fortran variable
112  'KEYWORD', & ! type
113  '', & ! shape
114  'print calculated flows to listing file', & ! longname
115  .false., & ! required
116  .false., & ! developmode
117  .false., & ! multi-record
118  .false., & ! preserve case
119  .false., & ! layered
120  .false. & ! timeseries
121  )
122 
123  type(inputparamdefinitiontype), parameter :: &
124  olfzdg_ipakcb = inputparamdefinitiontype &
125  ( &
126  'OLF', & ! component
127  'ZDG', & ! subcomponent
128  'OPTIONS', & ! block
129  'SAVE_FLOWS', & ! tag name
130  'IPAKCB', & ! fortran variable
131  'KEYWORD', & ! type
132  '', & ! shape
133  'save flows to budget file', & ! longname
134  .false., & ! required
135  .false., & ! developmode
136  .false., & ! multi-record
137  .false., & ! preserve case
138  .false., & ! layered
139  .false. & ! timeseries
140  )
141 
142  type(inputparamdefinitiontype), parameter :: &
143  olfzdg_ts_filerecord = inputparamdefinitiontype &
144  ( &
145  'OLF', & ! component
146  'ZDG', & ! subcomponent
147  'OPTIONS', & ! block
148  'TS_FILERECORD', & ! tag name
149  'TS_FILERECORD', & ! fortran variable
150  'RECORD TS6 FILEIN TS6_FILENAME', & ! type
151  '', & ! shape
152  '', & ! longname
153  .false., & ! required
154  .false., & ! developmode
155  .false., & ! multi-record
156  .false., & ! preserve case
157  .false., & ! layered
158  .false. & ! timeseries
159  )
160 
161  type(inputparamdefinitiontype), parameter :: &
162  olfzdg_ts6 = inputparamdefinitiontype &
163  ( &
164  'OLF', & ! component
165  'ZDG', & ! subcomponent
166  'OPTIONS', & ! block
167  'TS6', & ! tag name
168  'TS6', & ! fortran variable
169  'KEYWORD', & ! type
170  '', & ! shape
171  'head keyword', & ! longname
172  .true., & ! required
173  .false., & ! developmode
174  .true., & ! multi-record
175  .false., & ! preserve case
176  .false., & ! layered
177  .false. & ! timeseries
178  )
179 
180  type(inputparamdefinitiontype), parameter :: &
181  olfzdg_filein = inputparamdefinitiontype &
182  ( &
183  'OLF', & ! component
184  'ZDG', & ! subcomponent
185  'OPTIONS', & ! block
186  'FILEIN', & ! tag name
187  'FILEIN', & ! fortran variable
188  'KEYWORD', & ! type
189  '', & ! shape
190  'file keyword', & ! longname
191  .true., & ! required
192  .false., & ! developmode
193  .true., & ! multi-record
194  .false., & ! preserve case
195  .false., & ! layered
196  .false. & ! timeseries
197  )
198 
199  type(inputparamdefinitiontype), parameter :: &
200  olfzdg_ts6_filename = inputparamdefinitiontype &
201  ( &
202  'OLF', & ! component
203  'ZDG', & ! subcomponent
204  'OPTIONS', & ! block
205  'TS6_FILENAME', & ! tag name
206  'TS6_FILENAME', & ! fortran variable
207  'STRING', & ! type
208  '', & ! shape
209  'file name of time series information', & ! longname
210  .true., & ! required
211  .false., & ! developmode
212  .true., & ! multi-record
213  .true., & ! preserve case
214  .false., & ! layered
215  .false. & ! timeseries
216  )
217 
218  type(inputparamdefinitiontype), parameter :: &
219  olfzdg_obs_filerecord = inputparamdefinitiontype &
220  ( &
221  'OLF', & ! component
222  'ZDG', & ! subcomponent
223  'OPTIONS', & ! block
224  'OBS_FILERECORD', & ! tag name
225  'OBS_FILERECORD', & ! fortran variable
226  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
227  '', & ! shape
228  '', & ! longname
229  .false., & ! required
230  .false., & ! developmode
231  .false., & ! multi-record
232  .false., & ! preserve case
233  .false., & ! layered
234  .false. & ! timeseries
235  )
236 
237  type(inputparamdefinitiontype), parameter :: &
238  olfzdg_obs6 = inputparamdefinitiontype &
239  ( &
240  'OLF', & ! component
241  'ZDG', & ! subcomponent
242  'OPTIONS', & ! block
243  'OBS6', & ! tag name
244  'OBS6', & ! fortran variable
245  'KEYWORD', & ! type
246  '', & ! shape
247  'obs keyword', & ! longname
248  .true., & ! required
249  .false., & ! developmode
250  .true., & ! multi-record
251  .false., & ! preserve case
252  .false., & ! layered
253  .false. & ! timeseries
254  )
255 
256  type(inputparamdefinitiontype), parameter :: &
257  olfzdg_obs6_filename = inputparamdefinitiontype &
258  ( &
259  'OLF', & ! component
260  'ZDG', & ! subcomponent
261  'OPTIONS', & ! block
262  'OBS6_FILENAME', & ! tag name
263  'OBS6_FILENAME', & ! fortran variable
264  'STRING', & ! type
265  '', & ! shape
266  'obs6 input filename', & ! longname
267  .true., & ! required
268  .false., & ! developmode
269  .true., & ! multi-record
270  .true., & ! preserve case
271  .false., & ! layered
272  .false. & ! timeseries
273  )
274 
275  type(inputparamdefinitiontype), parameter :: &
276  olfzdg_maxbound = inputparamdefinitiontype &
277  ( &
278  'OLF', & ! component
279  'ZDG', & ! subcomponent
280  'DIMENSIONS', & ! block
281  'MAXBOUND', & ! tag name
282  'MAXBOUND', & ! fortran variable
283  'INTEGER', & ! type
284  '', & ! shape
285  'maximum number of zero-depth-gradient boundaries', & ! longname
286  .true., & ! required
287  .false., & ! developmode
288  .false., & ! multi-record
289  .false., & ! preserve case
290  .false., & ! layered
291  .false. & ! timeseries
292  )
293 
294  type(inputparamdefinitiontype), parameter :: &
295  olfzdg_cellid = inputparamdefinitiontype &
296  ( &
297  'OLF', & ! component
298  'ZDG', & ! subcomponent
299  'PERIOD', & ! block
300  'CELLID', & ! tag name
301  'CELLID', & ! fortran variable
302  'INTEGER1D', & ! type
303  'NCELLDIM', & ! shape
304  'cell identifier', & ! longname
305  .true., & ! required
306  .false., & ! developmode
307  .true., & ! multi-record
308  .false., & ! preserve case
309  .false., & ! layered
310  .false. & ! timeseries
311  )
312 
313  type(inputparamdefinitiontype), parameter :: &
314  olfzdg_idcxs = inputparamdefinitiontype &
315  ( &
316  'OLF', & ! component
317  'ZDG', & ! subcomponent
318  'PERIOD', & ! block
319  'IDCXS', & ! tag name
320  'IDCXS', & ! fortran variable
321  'INTEGER', & ! type
322  '', & ! shape
323  'cross section identifier', & ! longname
324  .true., & ! required
325  .false., & ! developmode
326  .true., & ! multi-record
327  .false., & ! preserve case
328  .false., & ! layered
329  .false. & ! timeseries
330  )
331 
332  type(inputparamdefinitiontype), parameter :: &
333  olfzdg_width = inputparamdefinitiontype &
334  ( &
335  'OLF', & ! component
336  'ZDG', & ! subcomponent
337  'PERIOD', & ! block
338  'WIDTH', & ! tag name
339  'WIDTH', & ! fortran variable
340  'DOUBLE', & ! type
341  '', & ! shape
342  'width of the zero-depth gradient boundary', & ! longname
343  .true., & ! required
344  .false., & ! developmode
345  .true., & ! multi-record
346  .false., & ! preserve case
347  .false., & ! layered
348  .true. & ! timeseries
349  )
350 
351  type(inputparamdefinitiontype), parameter :: &
352  olfzdg_slope = inputparamdefinitiontype &
353  ( &
354  'OLF', & ! component
355  'ZDG', & ! subcomponent
356  'PERIOD', & ! block
357  'SLOPE', & ! tag name
358  'SLOPE', & ! fortran variable
359  'DOUBLE', & ! type
360  '', & ! shape
361  'channel slope', & ! longname
362  .true., & ! required
363  .false., & ! developmode
364  .true., & ! multi-record
365  .false., & ! preserve case
366  .false., & ! layered
367  .true. & ! timeseries
368  )
369 
370  type(inputparamdefinitiontype), parameter :: &
371  olfzdg_rough = inputparamdefinitiontype &
372  ( &
373  'OLF', & ! component
374  'ZDG', & ! subcomponent
375  'PERIOD', & ! block
376  'ROUGH', & ! tag name
377  'ROUGH', & ! fortran variable
378  'DOUBLE', & ! type
379  '', & ! shape
380  'channel roughness', & ! longname
381  .true., & ! required
382  .false., & ! developmode
383  .true., & ! multi-record
384  .false., & ! preserve case
385  .false., & ! layered
386  .true. & ! timeseries
387  )
388 
389  type(inputparamdefinitiontype), parameter :: &
390  olfzdg_auxvar = inputparamdefinitiontype &
391  ( &
392  'OLF', & ! component
393  'ZDG', & ! subcomponent
394  'PERIOD', & ! block
395  'AUX', & ! tag name
396  'AUXVAR', & ! fortran variable
397  'DOUBLE1D', & ! type
398  'NAUX', & ! shape
399  'auxiliary variables', & ! longname
400  .false., & ! required
401  .false., & ! developmode
402  .true., & ! multi-record
403  .false., & ! preserve case
404  .false., & ! layered
405  .true. & ! timeseries
406  )
407 
408  type(inputparamdefinitiontype), parameter :: &
409  olfzdg_boundname = inputparamdefinitiontype &
410  ( &
411  'OLF', & ! component
412  'ZDG', & ! subcomponent
413  'PERIOD', & ! block
414  'BOUNDNAME', & ! tag name
415  'BOUNDNAME', & ! fortran variable
416  'STRING', & ! type
417  '', & ! shape
418  'zero-depth-gradient boundary name', & ! longname
419  .false., & ! required
420  .false., & ! developmode
421  .true., & ! multi-record
422  .false., & ! preserve case
423  .false., & ! layered
424  .false. & ! timeseries
425  )
426 
427  type(inputparamdefinitiontype), parameter :: &
428  olf_zdg_param_definitions(*) = &
429  [ &
430  olfzdg_auxiliary, &
431  olfzdg_boundnames, &
432  olfzdg_iprpak, &
433  olfzdg_iprflow, &
434  olfzdg_ipakcb, &
435  olfzdg_ts_filerecord, &
436  olfzdg_ts6, &
437  olfzdg_filein, &
438  olfzdg_ts6_filename, &
439  olfzdg_obs_filerecord, &
440  olfzdg_obs6, &
441  olfzdg_obs6_filename, &
442  olfzdg_maxbound, &
443  olfzdg_cellid, &
444  olfzdg_idcxs, &
445  olfzdg_width, &
446  olfzdg_slope, &
447  olfzdg_rough, &
448  olfzdg_auxvar, &
449  olfzdg_boundname &
450  ]
451 
452  type(inputparamdefinitiontype), parameter :: &
453  olfzdg_spd = inputparamdefinitiontype &
454  ( &
455  'OLF', & ! component
456  'ZDG', & ! subcomponent
457  'PERIOD', & ! block
458  'STRESS_PERIOD_DATA', & ! tag name
459  'SPD', & ! fortran variable
460  'RECARRAY CELLID IDCXS WIDTH SLOPE ROUGH AUX BOUNDNAME', & ! type
461  'MAXBOUND', & ! shape
462  '', & ! longname
463  .true., & ! required
464  .false., & ! developmode
465  .false., & ! multi-record
466  .false., & ! preserve case
467  .false., & ! layered
468  .false. & ! timeseries
469  )
470 
471  type(inputparamdefinitiontype), parameter :: &
472  olf_zdg_aggregate_definitions(*) = &
473  [ &
474  olfzdg_spd &
475  ]
476 
477  type(inputblockdefinitiontype), parameter :: &
478  olf_zdg_block_definitions(*) = &
479  [ &
480  inputblockdefinitiontype( &
481  'OPTIONS', & ! blockname
482  .false., & ! required
483  .false., & ! aggregate
484  .false. & ! block_variable
485  ), &
486  inputblockdefinitiontype( &
487  'DIMENSIONS', & ! blockname
488  .true., & ! required
489  .false., & ! aggregate
490  .false. & ! block_variable
491  ), &
492  inputblockdefinitiontype( &
493  'PERIOD', & ! blockname
494  .true., & ! required
495  .true., & ! aggregate
496  .true. & ! block_variable
497  ) &
498  ]
499 
500 end module olfzdginputmodule
constantsmodule
This module contains simulation constants.
Definition: Constants.f90:9
constantsmodule::lenvarname
integer(i4b), parameter lenvarname
maximum length of a variable name
Definition: Constants.f90:17
inputdefinitionmodule
Input definition module.
Definition: InputDefinition.f90:7
olfzdginputmodule::olf_zdg_subpackages
character(len=16), dimension(*), parameter, public olf_zdg_subpackages
Definition: olf-zdgidm.f90:41
olfzdginputmodule::olf_zdg_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public olf_zdg_param_definitions
Definition: olf-zdgidm.f90:427
olfzdginputmodule::olfzdg_ipakcb
type(inputparamdefinitiontype), parameter olfzdg_ipakcb
Definition: olf-zdgidm.f90:123
olfzdginputmodule::olf_zdg_multi_package
logical, public olf_zdg_multi_package
Definition: olf-zdgidm.f90:38
olfzdginputmodule::olfzdg_idcxs
type(inputparamdefinitiontype), parameter olfzdg_idcxs
Definition: olf-zdgidm.f90:313
olfzdginputmodule::olfzdg_spd
type(inputparamdefinitiontype), parameter olfzdg_spd
Definition: olf-zdgidm.f90:452
olfzdginputmodule::olfzdg_boundname
type(inputparamdefinitiontype), parameter olfzdg_boundname
Definition: olf-zdgidm.f90:408
olfzdginputmodule::olfzdg_ts_filerecord
type(inputparamdefinitiontype), parameter olfzdg_ts_filerecord
Definition: olf-zdgidm.f90:142
olfzdginputmodule::olf_zdg_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public olf_zdg_block_definitions
Definition: olf-zdgidm.f90:477
olfzdginputmodule::olfzdg_iprflow
type(inputparamdefinitiontype), parameter olfzdg_iprflow
Definition: olf-zdgidm.f90:104
olfzdginputmodule::olfzdg_iprpak
type(inputparamdefinitiontype), parameter olfzdg_iprpak
Definition: olf-zdgidm.f90:85
olfzdginputmodule::olfzdg_obs6_filename
type(inputparamdefinitiontype), parameter olfzdg_obs6_filename
Definition: olf-zdgidm.f90:256
olfzdginputmodule::olfzdg_slope
type(inputparamdefinitiontype), parameter olfzdg_slope
Definition: olf-zdgidm.f90:351
olfzdginputmodule::olfzdg_auxvar
type(inputparamdefinitiontype), parameter olfzdg_auxvar
Definition: olf-zdgidm.f90:389
olfzdginputmodule::olfzdg_auxiliary
type(inputparamdefinitiontype), parameter olfzdg_auxiliary
Definition: olf-zdgidm.f90:47
olfzdginputmodule::olfzdg_maxbound
type(inputparamdefinitiontype), parameter olfzdg_maxbound
Definition: olf-zdgidm.f90:275
olfzdginputmodule::olfzdg_ts6_filename
type(inputparamdefinitiontype), parameter olfzdg_ts6_filename
Definition: olf-zdgidm.f90:199
olfzdginputmodule::olf_zdg_is_advanced
logical, public olf_zdg_is_advanced
Definition: olf-zdgidm.f90:39
olfzdginputmodule::olfzdg_rough
type(inputparamdefinitiontype), parameter olfzdg_rough
Definition: olf-zdgidm.f90:370
olfzdginputmodule::olfzdg_ts6
type(inputparamdefinitiontype), parameter olfzdg_ts6
Definition: olf-zdgidm.f90:161
olfzdginputmodule::olf_zdg_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public olf_zdg_aggregate_definitions
Definition: olf-zdgidm.f90:471
olfzdginputmodule::olfzdg_obs_filerecord
type(inputparamdefinitiontype), parameter olfzdg_obs_filerecord
Definition: olf-zdgidm.f90:218
olfzdginputmodule::olfzdg_cellid
type(inputparamdefinitiontype), parameter olfzdg_cellid
Definition: olf-zdgidm.f90:294
olfzdginputmodule::olfzdg_filein
type(inputparamdefinitiontype), parameter olfzdg_filein
Definition: olf-zdgidm.f90:180
olfzdginputmodule::olfzdg_obs6
type(inputparamdefinitiontype), parameter olfzdg_obs6
Definition: olf-zdgidm.f90:237
olfzdginputmodule::olfzdg_boundnames
type(inputparamdefinitiontype), parameter olfzdg_boundnames
Definition: olf-zdgidm.f90:66
olfzdginputmodule::olfzdg_width
type(inputparamdefinitiontype), parameter olfzdg_width
Definition: olf-zdgidm.f90:332
inputdefinitionmodule::inputblockdefinitiontype
Input block definition. Describes an input block.
Definition: InputDefinition.f90:36
inputdefinitionmodule::inputparamdefinitiontype
Input parameter definition. Describes an input parameter.
Definition: InputDefinition.f90:18