MODFLOW 6  version 6.7.0.dev3
USGS Modular Hydrologic Model
gwf-ocidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
3  use constantsmodule, only: lenvarname
6  private
10  public gwfocparamfoundtype
12  public gwf_oc_subpackages
13 
15  logical :: budfilerec = .false.
16  logical :: budget = .false.
17  logical :: fileout = .false.
18  logical :: budgetfile = .false.
19  logical :: budcsvfilerec = .false.
20  logical :: budgetcsv = .false.
21  logical :: budgetcsvfile = .false.
22  logical :: headfilerec = .false.
23  logical :: head = .false.
24  logical :: headfile = .false.
25  logical :: headprintrec = .false.
26  logical :: print_format = .false.
27  logical :: formatrecord = .false.
28  logical :: columns = .false.
29  logical :: width = .false.
30  logical :: digits = .false.
31  logical :: format = .false.
32  logical :: saverecord = .false.
33  logical :: save = .false.
34  logical :: printrecord = .false.
35  logical :: print = .false.
36  logical :: rtype = .false.
37  logical :: ocsetting = .false.
38  logical :: all = .false.
39  logical :: first = .false.
40  logical :: last = .false.
41  logical :: frequency = .false.
42  logical :: steps = .false.
43  end type gwfocparamfoundtype
44 
45  logical :: gwf_oc_multi_package = .false.
46 
47  character(len=16), parameter :: &
48  gwf_oc_subpackages(*) = &
49  [ &
50  ' ' &
51  ]
52 
53  type(inputparamdefinitiontype), parameter :: &
55  ( &
56  'GWF', & ! component
57  'OC', & ! subcomponent
58  'OPTIONS', & ! block
59  'BUDGET_FILERECORD', & ! tag name
60  'BUDFILEREC', & ! fortran variable
61  'RECORD BUDGET FILEOUT BUDGETFILE', & ! type
62  '', & ! shape
63  '', & ! longname
64  .false., & ! required
65  .false., & ! developmode
66  .false., & ! multi-record
67  .false., & ! preserve case
68  .false., & ! layered
69  .false. & ! timeseries
70  )
71 
72  type(inputparamdefinitiontype), parameter :: &
74  ( &
75  'GWF', & ! component
76  'OC', & ! subcomponent
77  'OPTIONS', & ! block
78  'BUDGET', & ! tag name
79  'BUDGET', & ! fortran variable
80  'KEYWORD', & ! type
81  '', & ! shape
82  'budget keyword', & ! longname
83  .true., & ! required
84  .false., & ! developmode
85  .true., & ! multi-record
86  .false., & ! preserve case
87  .false., & ! layered
88  .false. & ! timeseries
89  )
90 
91  type(inputparamdefinitiontype), parameter :: &
93  ( &
94  'GWF', & ! component
95  'OC', & ! subcomponent
96  'OPTIONS', & ! block
97  'FILEOUT', & ! tag name
98  'FILEOUT', & ! fortran variable
99  'KEYWORD', & ! type
100  '', & ! shape
101  'file keyword', & ! longname
102  .true., & ! required
103  .false., & ! developmode
104  .true., & ! multi-record
105  .false., & ! preserve case
106  .false., & ! layered
107  .false. & ! timeseries
108  )
109 
110  type(inputparamdefinitiontype), parameter :: &
112  ( &
113  'GWF', & ! component
114  'OC', & ! subcomponent
115  'OPTIONS', & ! block
116  'BUDGETFILE', & ! tag name
117  'BUDGETFILE', & ! fortran variable
118  'STRING', & ! type
119  '', & ! shape
120  'file keyword', & ! longname
121  .true., & ! required
122  .false., & ! developmode
123  .true., & ! multi-record
124  .true., & ! preserve case
125  .false., & ! layered
126  .false. & ! timeseries
127  )
128 
129  type(inputparamdefinitiontype), parameter :: &
131  ( &
132  'GWF', & ! component
133  'OC', & ! subcomponent
134  'OPTIONS', & ! block
135  'BUDGETCSV_FILERECORD', & ! tag name
136  'BUDCSVFILEREC', & ! fortran variable
137  'RECORD BUDGETCSV FILEOUT BUDGETCSVFILE', & ! type
138  '', & ! shape
139  '', & ! longname
140  .false., & ! required
141  .false., & ! developmode
142  .false., & ! multi-record
143  .false., & ! preserve case
144  .false., & ! layered
145  .false. & ! timeseries
146  )
147 
148  type(inputparamdefinitiontype), parameter :: &
150  ( &
151  'GWF', & ! component
152  'OC', & ! subcomponent
153  'OPTIONS', & ! block
154  'BUDGETCSV', & ! tag name
155  'BUDGETCSV', & ! fortran variable
156  'KEYWORD', & ! type
157  '', & ! shape
158  'budget keyword', & ! longname
159  .true., & ! required
160  .false., & ! developmode
161  .true., & ! multi-record
162  .false., & ! preserve case
163  .false., & ! layered
164  .false. & ! timeseries
165  )
166 
167  type(inputparamdefinitiontype), parameter :: &
169  ( &
170  'GWF', & ! component
171  'OC', & ! subcomponent
172  'OPTIONS', & ! block
173  'BUDGETCSVFILE', & ! tag name
174  'BUDGETCSVFILE', & ! fortran variable
175  'STRING', & ! type
176  '', & ! shape
177  'file keyword', & ! longname
178  .true., & ! required
179  .false., & ! developmode
180  .true., & ! multi-record
181  .true., & ! preserve case
182  .false., & ! layered
183  .false. & ! timeseries
184  )
185 
186  type(inputparamdefinitiontype), parameter :: &
188  ( &
189  'GWF', & ! component
190  'OC', & ! subcomponent
191  'OPTIONS', & ! block
192  'HEAD_FILERECORD', & ! tag name
193  'HEADFILEREC', & ! fortran variable
194  'RECORD HEAD FILEOUT HEADFILE', & ! type
195  '', & ! shape
196  '', & ! longname
197  .false., & ! required
198  .false., & ! developmode
199  .false., & ! multi-record
200  .false., & ! preserve case
201  .false., & ! layered
202  .false. & ! timeseries
203  )
204 
205  type(inputparamdefinitiontype), parameter :: &
207  ( &
208  'GWF', & ! component
209  'OC', & ! subcomponent
210  'OPTIONS', & ! block
211  'HEAD', & ! tag name
212  'HEAD', & ! fortran variable
213  'KEYWORD', & ! type
214  '', & ! shape
215  'head keyword', & ! longname
216  .true., & ! required
217  .false., & ! developmode
218  .true., & ! multi-record
219  .false., & ! preserve case
220  .false., & ! layered
221  .false. & ! timeseries
222  )
223 
224  type(inputparamdefinitiontype), parameter :: &
226  ( &
227  'GWF', & ! component
228  'OC', & ! subcomponent
229  'OPTIONS', & ! block
230  'HEADFILE', & ! tag name
231  'HEADFILE', & ! fortran variable
232  'STRING', & ! type
233  '', & ! shape
234  'file keyword', & ! longname
235  .true., & ! required
236  .false., & ! developmode
237  .true., & ! multi-record
238  .true., & ! preserve case
239  .false., & ! layered
240  .false. & ! timeseries
241  )
242 
243  type(inputparamdefinitiontype), parameter :: &
245  ( &
246  'GWF', & ! component
247  'OC', & ! subcomponent
248  'OPTIONS', & ! block
249  'HEADPRINTRECORD', & ! tag name
250  'HEADPRINTREC', & ! fortran variable
251  'RECORD HEAD PRINT_FORMAT FORMATRECORD', & ! type
252  '', & ! shape
253  '', & ! longname
254  .false., & ! required
255  .false., & ! developmode
256  .false., & ! multi-record
257  .false., & ! preserve case
258  .false., & ! layered
259  .false. & ! timeseries
260  )
261 
262  type(inputparamdefinitiontype), parameter :: &
264  ( &
265  'GWF', & ! component
266  'OC', & ! subcomponent
267  'OPTIONS', & ! block
268  'PRINT_FORMAT', & ! tag name
269  'PRINT_FORMAT', & ! fortran variable
270  'KEYWORD', & ! type
271  '', & ! shape
272  'keyword to indicate that a print format follows', & ! longname
273  .true., & ! required
274  .false., & ! developmode
275  .true., & ! multi-record
276  .false., & ! preserve case
277  .false., & ! layered
278  .false. & ! timeseries
279  )
280 
281  type(inputparamdefinitiontype), parameter :: &
283  ( &
284  'GWF', & ! component
285  'OC', & ! subcomponent
286  'OPTIONS', & ! block
287  'FORMATRECORD', & ! tag name
288  'FORMATRECORD', & ! fortran variable
289  'RECORD COLUMNS WIDTH DIGITS FORMAT', & ! type
290  '', & ! shape
291  '', & ! longname
292  .true., & ! required
293  .false., & ! developmode
294  .true., & ! multi-record
295  .false., & ! preserve case
296  .false., & ! layered
297  .false. & ! timeseries
298  )
299 
300  type(inputparamdefinitiontype), parameter :: &
302  ( &
303  'GWF', & ! component
304  'OC', & ! subcomponent
305  'OPTIONS', & ! block
306  'COLUMNS', & ! tag name
307  'COLUMNS', & ! fortran variable
308  'INTEGER', & ! type
309  '', & ! shape
310  'number of columns', & ! longname
311  .true., & ! required
312  .false., & ! developmode
313  .true., & ! multi-record
314  .false., & ! preserve case
315  .false., & ! layered
316  .false. & ! timeseries
317  )
318 
319  type(inputparamdefinitiontype), parameter :: &
321  ( &
322  'GWF', & ! component
323  'OC', & ! subcomponent
324  'OPTIONS', & ! block
325  'WIDTH', & ! tag name
326  'WIDTH', & ! fortran variable
327  'INTEGER', & ! type
328  '', & ! shape
329  'width for each number', & ! longname
330  .true., & ! required
331  .false., & ! developmode
332  .true., & ! multi-record
333  .false., & ! preserve case
334  .false., & ! layered
335  .false. & ! timeseries
336  )
337 
338  type(inputparamdefinitiontype), parameter :: &
340  ( &
341  'GWF', & ! component
342  'OC', & ! subcomponent
343  'OPTIONS', & ! block
344  'DIGITS', & ! tag name
345  'DIGITS', & ! fortran variable
346  'INTEGER', & ! type
347  '', & ! shape
348  'number of digits', & ! longname
349  .true., & ! required
350  .false., & ! developmode
351  .true., & ! multi-record
352  .false., & ! preserve case
353  .false., & ! layered
354  .false. & ! timeseries
355  )
356 
357  type(inputparamdefinitiontype), parameter :: &
359  ( &
360  'GWF', & ! component
361  'OC', & ! subcomponent
362  'OPTIONS', & ! block
363  'FORMAT', & ! tag name
364  'FORMAT', & ! fortran variable
365  'STRING', & ! type
366  '', & ! shape
367  'write format', & ! longname
368  .true., & ! required
369  .false., & ! developmode
370  .true., & ! multi-record
371  .false., & ! preserve case
372  .false., & ! layered
373  .false. & ! timeseries
374  )
375 
376  type(inputparamdefinitiontype), parameter :: &
378  ( &
379  'GWF', & ! component
380  'OC', & ! subcomponent
381  'PERIOD', & ! block
382  'SAVERECORD', & ! tag name
383  'SAVERECORD', & ! fortran variable
384  'RECORD SAVE RTYPE OCSETTING', & ! type
385  '', & ! shape
386  '', & ! longname
387  .false., & ! required
388  .false., & ! developmode
389  .false., & ! multi-record
390  .false., & ! preserve case
391  .false., & ! layered
392  .false. & ! timeseries
393  )
394 
395  type(inputparamdefinitiontype), parameter :: &
397  ( &
398  'GWF', & ! component
399  'OC', & ! subcomponent
400  'PERIOD', & ! block
401  'SAVE', & ! tag name
402  'SAVE', & ! fortran variable
403  'KEYWORD', & ! type
404  '', & ! shape
405  'keyword to save', & ! longname
406  .true., & ! required
407  .false., & ! developmode
408  .true., & ! multi-record
409  .false., & ! preserve case
410  .false., & ! layered
411  .false. & ! timeseries
412  )
413 
414  type(inputparamdefinitiontype), parameter :: &
416  ( &
417  'GWF', & ! component
418  'OC', & ! subcomponent
419  'PERIOD', & ! block
420  'PRINTRECORD', & ! tag name
421  'PRINTRECORD', & ! fortran variable
422  'RECORD PRINT RTYPE OCSETTING', & ! type
423  '', & ! shape
424  '', & ! longname
425  .false., & ! required
426  .false., & ! developmode
427  .false., & ! multi-record
428  .false., & ! preserve case
429  .false., & ! layered
430  .false. & ! timeseries
431  )
432 
433  type(inputparamdefinitiontype), parameter :: &
435  ( &
436  'GWF', & ! component
437  'OC', & ! subcomponent
438  'PERIOD', & ! block
439  'PRINT', & ! tag name
440  'PRINT', & ! fortran variable
441  'KEYWORD', & ! type
442  '', & ! shape
443  'keyword to save', & ! longname
444  .true., & ! required
445  .false., & ! developmode
446  .true., & ! multi-record
447  .false., & ! preserve case
448  .false., & ! layered
449  .false. & ! timeseries
450  )
451 
452  type(inputparamdefinitiontype), parameter :: &
454  ( &
455  'GWF', & ! component
456  'OC', & ! subcomponent
457  'PERIOD', & ! block
458  'RTYPE', & ! tag name
459  'RTYPE', & ! fortran variable
460  'STRING', & ! type
461  '', & ! shape
462  'record type', & ! longname
463  .true., & ! required
464  .false., & ! developmode
465  .true., & ! multi-record
466  .false., & ! preserve case
467  .false., & ! layered
468  .false. & ! timeseries
469  )
470 
471  type(inputparamdefinitiontype), parameter :: &
473  ( &
474  'GWF', & ! component
475  'OC', & ! subcomponent
476  'PERIOD', & ! block
477  'OCSETTING', & ! tag name
478  'OCSETTING', & ! fortran variable
479  'KEYSTRING ALL FIRST LAST FREQUENCY STEPS', & ! type
480  '', & ! shape
481  '', & ! longname
482  .true., & ! required
483  .false., & ! developmode
484  .true., & ! multi-record
485  .false., & ! preserve case
486  .false., & ! layered
487  .false. & ! timeseries
488  )
489 
490  type(inputparamdefinitiontype), parameter :: &
492  ( &
493  'GWF', & ! component
494  'OC', & ! subcomponent
495  'PERIOD', & ! block
496  'ALL', & ! tag name
497  'ALL', & ! fortran variable
498  'KEYWORD', & ! type
499  '', & ! shape
500  '', & ! longname
501  .true., & ! required
502  .false., & ! developmode
503  .true., & ! multi-record
504  .false., & ! preserve case
505  .false., & ! layered
506  .false. & ! timeseries
507  )
508 
509  type(inputparamdefinitiontype), parameter :: &
511  ( &
512  'GWF', & ! component
513  'OC', & ! subcomponent
514  'PERIOD', & ! block
515  'FIRST', & ! tag name
516  'FIRST', & ! fortran variable
517  'KEYWORD', & ! type
518  '', & ! shape
519  '', & ! longname
520  .true., & ! required
521  .false., & ! developmode
522  .true., & ! multi-record
523  .false., & ! preserve case
524  .false., & ! layered
525  .false. & ! timeseries
526  )
527 
528  type(inputparamdefinitiontype), parameter :: &
530  ( &
531  'GWF', & ! component
532  'OC', & ! subcomponent
533  'PERIOD', & ! block
534  'LAST', & ! tag name
535  'LAST', & ! fortran variable
536  'KEYWORD', & ! type
537  '', & ! shape
538  '', & ! longname
539  .true., & ! required
540  .false., & ! developmode
541  .true., & ! multi-record
542  .false., & ! preserve case
543  .false., & ! layered
544  .false. & ! timeseries
545  )
546 
547  type(inputparamdefinitiontype), parameter :: &
549  ( &
550  'GWF', & ! component
551  'OC', & ! subcomponent
552  'PERIOD', & ! block
553  'FREQUENCY', & ! tag name
554  'FREQUENCY', & ! fortran variable
555  'INTEGER', & ! type
556  '', & ! shape
557  '', & ! longname
558  .true., & ! required
559  .false., & ! developmode
560  .true., & ! multi-record
561  .false., & ! preserve case
562  .false., & ! layered
563  .false. & ! timeseries
564  )
565 
566  type(inputparamdefinitiontype), parameter :: &
568  ( &
569  'GWF', & ! component
570  'OC', & ! subcomponent
571  'PERIOD', & ! block
572  'STEPS', & ! tag name
573  'STEPS', & ! fortran variable
574  'INTEGER1D', & ! type
575  '<NSTP', & ! shape
576  '', & ! longname
577  .true., & ! required
578  .false., & ! developmode
579  .true., & ! multi-record
580  .false., & ! preserve case
581  .false., & ! layered
582  .false. & ! timeseries
583  )
584 
585  type(inputparamdefinitiontype), parameter :: &
587  [ &
589  gwfoc_budget, &
590  gwfoc_fileout, &
593  gwfoc_budgetcsv, &
596  gwfoc_head, &
597  gwfoc_headfile, &
601  gwfoc_columns, &
602  gwfoc_width, &
603  gwfoc_digits, &
604  gwfoc_format, &
606  gwfoc_save, &
608  gwfoc_print, &
609  gwfoc_rtype, &
610  gwfoc_ocsetting, &
611  gwfoc_all, &
612  gwfoc_first, &
613  gwfoc_last, &
614  gwfoc_frequency, &
615  gwfoc_steps &
616  ]
617 
618  type(inputparamdefinitiontype), parameter :: &
620  [ &
622  ( &
623  '', & ! component
624  '', & ! subcomponent
625  '', & ! block
626  '', & ! tag name
627  '', & ! fortran variable
628  '', & ! type
629  '', & ! shape
630  '', & ! longname
631  .false., & ! required
632  .false., & ! developmode
633  .false., & ! multi-record
634  .false., & ! preserve case
635  .false., & ! layered
636  .false. & ! timeseries
637  ) &
638  ]
639 
640  type(inputblockdefinitiontype), parameter :: &
642  [ &
644  'OPTIONS', & ! blockname
645  .false., & ! required
646  .false., & ! aggregate
647  .false. & ! block_variable
648  ), &
650  'PERIOD', & ! blockname
651  .false., & ! required
652  .false., & ! aggregate
653  .true. & ! block_variable
654  ) &
655  ]
656 
657 end module gwfocinputmodule
This module contains simulation constants.
Definition: Constants.f90:9
integer(i4b), parameter lenvarname
maximum length of a variable name
Definition: Constants.f90:17
type(inputparamdefinitiontype), parameter gwfoc_print
Definition: gwf-ocidm.f90:433
type(inputparamdefinitiontype), parameter gwfoc_budgetcsv
Definition: gwf-ocidm.f90:148
type(inputparamdefinitiontype), parameter gwfoc_headfile
Definition: gwf-ocidm.f90:224
type(inputparamdefinitiontype), parameter gwfoc_save
Definition: gwf-ocidm.f90:395
type(inputparamdefinitiontype), parameter gwfoc_frequency
Definition: gwf-ocidm.f90:547
type(inputparamdefinitiontype), parameter gwfoc_budcsvfilerec
Definition: gwf-ocidm.f90:129
logical, public gwf_oc_multi_package
Definition: gwf-ocidm.f90:45
type(inputblockdefinitiontype), dimension(*), parameter, public gwf_oc_block_definitions
Definition: gwf-ocidm.f90:640
type(inputparamdefinitiontype), parameter gwfoc_headfilerec
Definition: gwf-ocidm.f90:186
type(inputparamdefinitiontype), parameter gwfoc_first
Definition: gwf-ocidm.f90:509
type(inputparamdefinitiontype), parameter gwfoc_all
Definition: gwf-ocidm.f90:490
type(inputparamdefinitiontype), parameter gwfoc_last
Definition: gwf-ocidm.f90:528
type(inputparamdefinitiontype), parameter gwfoc_head
Definition: gwf-ocidm.f90:205
type(inputparamdefinitiontype), parameter gwfoc_printrecord
Definition: gwf-ocidm.f90:414
type(inputparamdefinitiontype), parameter gwfoc_budfilerec
Definition: gwf-ocidm.f90:53
type(inputparamdefinitiontype), parameter gwfoc_columns
Definition: gwf-ocidm.f90:300
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_oc_param_definitions
Definition: gwf-ocidm.f90:585
type(inputparamdefinitiontype), parameter gwfoc_budgetcsvfile
Definition: gwf-ocidm.f90:167
type(inputparamdefinitiontype), parameter gwfoc_fileout
Definition: gwf-ocidm.f90:91
type(inputparamdefinitiontype), parameter gwfoc_headprintrec
Definition: gwf-ocidm.f90:243
type(inputparamdefinitiontype), parameter gwfoc_format
Definition: gwf-ocidm.f90:357
type(inputparamdefinitiontype), parameter gwfoc_ocsetting
Definition: gwf-ocidm.f90:471
type(inputparamdefinitiontype), parameter gwfoc_print_format
Definition: gwf-ocidm.f90:262
type(inputparamdefinitiontype), parameter gwfoc_steps
Definition: gwf-ocidm.f90:566
character(len=16), dimension(*), parameter, public gwf_oc_subpackages
Definition: gwf-ocidm.f90:47
type(inputparamdefinitiontype), parameter gwfoc_formatrecord
Definition: gwf-ocidm.f90:281
type(inputparamdefinitiontype), parameter gwfoc_width
Definition: gwf-ocidm.f90:319
type(inputparamdefinitiontype), parameter gwfoc_budgetfile
Definition: gwf-ocidm.f90:110
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_oc_aggregate_definitions
Definition: gwf-ocidm.f90:618
type(inputparamdefinitiontype), parameter gwfoc_rtype
Definition: gwf-ocidm.f90:452
type(inputparamdefinitiontype), parameter gwfoc_digits
Definition: gwf-ocidm.f90:338
type(inputparamdefinitiontype), parameter gwfoc_budget
Definition: gwf-ocidm.f90:72
type(inputparamdefinitiontype), parameter gwfoc_saverecord
Definition: gwf-ocidm.f90:376
This module contains the InputDefinitionModule.