MODFLOW 6  version 6.9.0.dev0
USGS Modular Hydrologic Model
chf-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 chfocparamfoundtype
12  public chf_oc_is_advanced
13  public chf_oc_subpackages
14 
16  logical :: budfilerec = .false.
17  logical :: budget = .false.
18  logical :: fileout = .false.
19  logical :: budgetfile = .false.
20  logical :: budcsvfilerec = .false.
21  logical :: budgetcsv = .false.
22  logical :: budgetcsvfile = .false.
23  logical :: qoutfilerec = .false.
24  logical :: qoutflow = .false.
25  logical :: qoutflowfile = .false.
26  logical :: stagefilerec = .false.
27  logical :: stage = .false.
28  logical :: stagefile = .false.
29  logical :: qoutprintrec = .false.
30  logical :: print_format = .false.
31  logical :: formatrecord = .false.
32  logical :: columns = .false.
33  logical :: width = .false.
34  logical :: digits = .false.
35  logical :: format = .false.
36  logical :: saverecord = .false.
37  logical :: save = .false.
38  logical :: printrecord = .false.
39  logical :: print = .false.
40  logical :: rtype = .false.
41  logical :: all = .false.
42  logical :: first = .false.
43  logical :: last = .false.
44  logical :: frequency = .false.
45  logical :: steps = .false.
46  end type chfocparamfoundtype
47 
48  logical :: chf_oc_multi_package = .false.
49  logical :: chf_oc_is_advanced = .false.
50 
51  character(len=16), parameter :: &
52  chf_oc_subpackages(*) = &
53  [ &
54  ' ' &
55  ]
56 
57  type(inputparamdefinitiontype), parameter :: &
59  ( &
60  'CHF', & ! component
61  'OC', & ! subcomponent
62  'OPTIONS', & ! block
63  'BUDGET_FILERECORD', & ! tag name
64  'BUDFILEREC', & ! fortran variable
65  'RECORD BUDGET FILEOUT BUDGETFILE', & ! type
66  '', & ! shape
67  '', & ! longname
68  .false., & ! required
69  .false., & ! developmode
70  .false., & ! multi-record
71  .false., & ! preserve case
72  .false., & ! layered
73  .false. & ! timeseries
74  )
75 
76  type(inputparamdefinitiontype), parameter :: &
78  ( &
79  'CHF', & ! component
80  'OC', & ! subcomponent
81  'OPTIONS', & ! block
82  'BUDGET', & ! tag name
83  'BUDGET', & ! fortran variable
84  'KEYWORD', & ! type
85  '', & ! shape
86  'budget keyword', & ! longname
87  .true., & ! required
88  .false., & ! developmode
89  .true., & ! multi-record
90  .false., & ! preserve case
91  .false., & ! layered
92  .false. & ! timeseries
93  )
94 
95  type(inputparamdefinitiontype), parameter :: &
97  ( &
98  'CHF', & ! component
99  'OC', & ! subcomponent
100  'OPTIONS', & ! block
101  'FILEOUT', & ! tag name
102  'FILEOUT', & ! fortran variable
103  'KEYWORD', & ! type
104  '', & ! shape
105  'file keyword', & ! longname
106  .true., & ! required
107  .false., & ! developmode
108  .true., & ! multi-record
109  .false., & ! preserve case
110  .false., & ! layered
111  .false. & ! timeseries
112  )
113 
114  type(inputparamdefinitiontype), parameter :: &
116  ( &
117  'CHF', & ! component
118  'OC', & ! subcomponent
119  'OPTIONS', & ! block
120  'BUDGETFILE', & ! tag name
121  'BUDGETFILE', & ! fortran variable
122  'STRING', & ! type
123  '', & ! shape
124  'file keyword', & ! longname
125  .true., & ! required
126  .false., & ! developmode
127  .true., & ! multi-record
128  .true., & ! preserve case
129  .false., & ! layered
130  .false. & ! timeseries
131  )
132 
133  type(inputparamdefinitiontype), parameter :: &
135  ( &
136  'CHF', & ! component
137  'OC', & ! subcomponent
138  'OPTIONS', & ! block
139  'BUDGETCSV_FILERECORD', & ! tag name
140  'BUDCSVFILEREC', & ! fortran variable
141  'RECORD BUDGETCSV FILEOUT BUDGETCSVFILE', & ! type
142  '', & ! shape
143  '', & ! longname
144  .false., & ! required
145  .false., & ! developmode
146  .false., & ! multi-record
147  .false., & ! preserve case
148  .false., & ! layered
149  .false. & ! timeseries
150  )
151 
152  type(inputparamdefinitiontype), parameter :: &
154  ( &
155  'CHF', & ! component
156  'OC', & ! subcomponent
157  'OPTIONS', & ! block
158  'BUDGETCSV', & ! tag name
159  'BUDGETCSV', & ! fortran variable
160  'KEYWORD', & ! type
161  '', & ! shape
162  'budget keyword', & ! longname
163  .true., & ! required
164  .false., & ! developmode
165  .true., & ! multi-record
166  .false., & ! preserve case
167  .false., & ! layered
168  .false. & ! timeseries
169  )
170 
171  type(inputparamdefinitiontype), parameter :: &
173  ( &
174  'CHF', & ! component
175  'OC', & ! subcomponent
176  'OPTIONS', & ! block
177  'BUDGETCSVFILE', & ! tag name
178  'BUDGETCSVFILE', & ! fortran variable
179  'STRING', & ! type
180  '', & ! shape
181  'file keyword', & ! longname
182  .true., & ! required
183  .false., & ! developmode
184  .true., & ! multi-record
185  .true., & ! preserve case
186  .false., & ! layered
187  .false. & ! timeseries
188  )
189 
190  type(inputparamdefinitiontype), parameter :: &
192  ( &
193  'CHF', & ! component
194  'OC', & ! subcomponent
195  'OPTIONS', & ! block
196  'QOUTFLOW_FILERECORD', & ! tag name
197  'QOUTFILEREC', & ! fortran variable
198  'RECORD QOUTFLOW FILEOUT QOUTFLOWFILE', & ! type
199  '', & ! shape
200  '', & ! longname
201  .false., & ! required
202  .false., & ! developmode
203  .false., & ! multi-record
204  .false., & ! preserve case
205  .false., & ! layered
206  .false. & ! timeseries
207  )
208 
209  type(inputparamdefinitiontype), parameter :: &
211  ( &
212  'CHF', & ! component
213  'OC', & ! subcomponent
214  'OPTIONS', & ! block
215  'QOUTFLOW', & ! tag name
216  'QOUTFLOW', & ! fortran variable
217  'KEYWORD', & ! type
218  '', & ! shape
219  'qoutflow keyword', & ! longname
220  .true., & ! required
221  .false., & ! developmode
222  .true., & ! multi-record
223  .false., & ! preserve case
224  .false., & ! layered
225  .false. & ! timeseries
226  )
227 
228  type(inputparamdefinitiontype), parameter :: &
230  ( &
231  'CHF', & ! component
232  'OC', & ! subcomponent
233  'OPTIONS', & ! block
234  'QOUTFLOWFILE', & ! tag name
235  'QOUTFLOWFILE', & ! fortran variable
236  'STRING', & ! type
237  '', & ! shape
238  'file keyword', & ! longname
239  .true., & ! required
240  .false., & ! developmode
241  .true., & ! multi-record
242  .true., & ! preserve case
243  .false., & ! layered
244  .false. & ! timeseries
245  )
246 
247  type(inputparamdefinitiontype), parameter :: &
249  ( &
250  'CHF', & ! component
251  'OC', & ! subcomponent
252  'OPTIONS', & ! block
253  'STAGE_FILERECORD', & ! tag name
254  'STAGEFILEREC', & ! fortran variable
255  'RECORD STAGE FILEOUT STAGEFILE', & ! type
256  '', & ! shape
257  '', & ! longname
258  .false., & ! required
259  .false., & ! developmode
260  .false., & ! multi-record
261  .false., & ! preserve case
262  .false., & ! layered
263  .false. & ! timeseries
264  )
265 
266  type(inputparamdefinitiontype), parameter :: &
268  ( &
269  'CHF', & ! component
270  'OC', & ! subcomponent
271  'OPTIONS', & ! block
272  'STAGE', & ! tag name
273  'STAGE', & ! fortran variable
274  'KEYWORD', & ! type
275  '', & ! shape
276  'stage keyword', & ! longname
277  .true., & ! required
278  .false., & ! developmode
279  .true., & ! multi-record
280  .false., & ! preserve case
281  .false., & ! layered
282  .false. & ! timeseries
283  )
284 
285  type(inputparamdefinitiontype), parameter :: &
287  ( &
288  'CHF', & ! component
289  'OC', & ! subcomponent
290  'OPTIONS', & ! block
291  'STAGEFILE', & ! tag name
292  'STAGEFILE', & ! fortran variable
293  'STRING', & ! type
294  '', & ! shape
295  'file keyword', & ! longname
296  .true., & ! required
297  .false., & ! developmode
298  .true., & ! multi-record
299  .true., & ! preserve case
300  .false., & ! layered
301  .false. & ! timeseries
302  )
303 
304  type(inputparamdefinitiontype), parameter :: &
306  ( &
307  'CHF', & ! component
308  'OC', & ! subcomponent
309  'OPTIONS', & ! block
310  'QOUTFLOWPRINTRECORD', & ! tag name
311  'QOUTPRINTREC', & ! fortran variable
312  'RECORD QOUTFLOW PRINT_FORMAT FORMATRECORD', & ! type
313  '', & ! shape
314  '', & ! longname
315  .false., & ! required
316  .false., & ! developmode
317  .false., & ! multi-record
318  .false., & ! preserve case
319  .false., & ! layered
320  .false. & ! timeseries
321  )
322 
323  type(inputparamdefinitiontype), parameter :: &
325  ( &
326  'CHF', & ! component
327  'OC', & ! subcomponent
328  'OPTIONS', & ! block
329  'PRINT_FORMAT', & ! tag name
330  'PRINT_FORMAT', & ! fortran variable
331  'KEYWORD', & ! type
332  '', & ! shape
333  'keyword to indicate that a print format follows', & ! longname
334  .true., & ! required
335  .false., & ! developmode
336  .true., & ! multi-record
337  .false., & ! preserve case
338  .false., & ! layered
339  .false. & ! timeseries
340  )
341 
342  type(inputparamdefinitiontype), parameter :: &
344  ( &
345  'CHF', & ! component
346  'OC', & ! subcomponent
347  'OPTIONS', & ! block
348  'FORMATRECORD', & ! tag name
349  'FORMATRECORD', & ! fortran variable
350  'RECORD COLUMNS WIDTH DIGITS FORMAT', & ! type
351  '', & ! shape
352  '', & ! longname
353  .true., & ! required
354  .false., & ! developmode
355  .true., & ! multi-record
356  .false., & ! preserve case
357  .false., & ! layered
358  .false. & ! timeseries
359  )
360 
361  type(inputparamdefinitiontype), parameter :: &
363  ( &
364  'CHF', & ! component
365  'OC', & ! subcomponent
366  'OPTIONS', & ! block
367  'COLUMNS', & ! tag name
368  'COLUMNS', & ! fortran variable
369  'INTEGER', & ! type
370  '', & ! shape
371  'number of columns', & ! longname
372  .true., & ! required
373  .false., & ! developmode
374  .true., & ! multi-record
375  .false., & ! preserve case
376  .false., & ! layered
377  .false. & ! timeseries
378  )
379 
380  type(inputparamdefinitiontype), parameter :: &
382  ( &
383  'CHF', & ! component
384  'OC', & ! subcomponent
385  'OPTIONS', & ! block
386  'WIDTH', & ! tag name
387  'WIDTH', & ! fortran variable
388  'INTEGER', & ! type
389  '', & ! shape
390  'width for each number', & ! longname
391  .true., & ! required
392  .false., & ! developmode
393  .true., & ! multi-record
394  .false., & ! preserve case
395  .false., & ! layered
396  .false. & ! timeseries
397  )
398 
399  type(inputparamdefinitiontype), parameter :: &
401  ( &
402  'CHF', & ! component
403  'OC', & ! subcomponent
404  'OPTIONS', & ! block
405  'DIGITS', & ! tag name
406  'DIGITS', & ! fortran variable
407  'INTEGER', & ! type
408  '', & ! shape
409  'number of digits', & ! longname
410  .true., & ! required
411  .false., & ! developmode
412  .true., & ! multi-record
413  .false., & ! preserve case
414  .false., & ! layered
415  .false. & ! timeseries
416  )
417 
418  type(inputparamdefinitiontype), parameter :: &
420  ( &
421  'CHF', & ! component
422  'OC', & ! subcomponent
423  'OPTIONS', & ! block
424  'FORMAT', & ! tag name
425  'FORMAT', & ! fortran variable
426  'STRING', & ! type
427  '', & ! shape
428  'write format', & ! longname
429  .true., & ! required
430  .false., & ! developmode
431  .true., & ! multi-record
432  .false., & ! preserve case
433  .false., & ! layered
434  .false. & ! timeseries
435  )
436 
437  type(inputparamdefinitiontype), parameter :: &
439  ( &
440  'CHF', & ! component
441  'OC', & ! subcomponent
442  'PERIOD', & ! block
443  'SAVERECORD', & ! tag name
444  'SAVERECORD', & ! fortran variable
445  'RECORD SAVE RTYPE OCSETTING', & ! type
446  '', & ! shape
447  '', & ! longname
448  .false., & ! required
449  .false., & ! developmode
450  .false., & ! multi-record
451  .false., & ! preserve case
452  .false., & ! layered
453  .false. & ! timeseries
454  )
455 
456  type(inputparamdefinitiontype), parameter :: &
458  ( &
459  'CHF', & ! component
460  'OC', & ! subcomponent
461  'PERIOD', & ! block
462  'SAVE', & ! tag name
463  'SAVE', & ! fortran variable
464  'KEYWORD', & ! type
465  '', & ! shape
466  'keyword to save', & ! longname
467  .true., & ! required
468  .false., & ! developmode
469  .true., & ! multi-record
470  .false., & ! preserve case
471  .false., & ! layered
472  .false. & ! timeseries
473  )
474 
475  type(inputparamdefinitiontype), parameter :: &
477  ( &
478  'CHF', & ! component
479  'OC', & ! subcomponent
480  'PERIOD', & ! block
481  'PRINTRECORD', & ! tag name
482  'PRINTRECORD', & ! fortran variable
483  'RECORD PRINT RTYPE OCSETTING', & ! type
484  '', & ! shape
485  '', & ! longname
486  .false., & ! required
487  .false., & ! developmode
488  .false., & ! multi-record
489  .false., & ! preserve case
490  .false., & ! layered
491  .false. & ! timeseries
492  )
493 
494  type(inputparamdefinitiontype), parameter :: &
496  ( &
497  'CHF', & ! component
498  'OC', & ! subcomponent
499  'PERIOD', & ! block
500  'PRINT', & ! tag name
501  'PRINT', & ! fortran variable
502  'KEYWORD', & ! type
503  '', & ! shape
504  'keyword to save', & ! longname
505  .true., & ! required
506  .false., & ! developmode
507  .true., & ! multi-record
508  .false., & ! preserve case
509  .false., & ! layered
510  .false. & ! timeseries
511  )
512 
513  type(inputparamdefinitiontype), parameter :: &
515  ( &
516  'CHF', & ! component
517  'OC', & ! subcomponent
518  'PERIOD', & ! block
519  'RTYPE', & ! tag name
520  'RTYPE', & ! fortran variable
521  'STRING', & ! type
522  '', & ! shape
523  'record type', & ! longname
524  .true., & ! required
525  .false., & ! developmode
526  .true., & ! multi-record
527  .false., & ! preserve case
528  .false., & ! layered
529  .false. & ! timeseries
530  )
531 
532  type(inputparamdefinitiontype), parameter :: &
534  ( &
535  'CHF', & ! component
536  'OC', & ! subcomponent
537  'PERIOD', & ! block
538  'ALL', & ! tag name
539  'ALL', & ! fortran variable
540  'KEYWORD', & ! type
541  '', & ! shape
542  '', & ! longname
543  .true., & ! required
544  .false., & ! developmode
545  .true., & ! multi-record
546  .false., & ! preserve case
547  .false., & ! layered
548  .false. & ! timeseries
549  )
550 
551  type(inputparamdefinitiontype), parameter :: &
553  ( &
554  'CHF', & ! component
555  'OC', & ! subcomponent
556  'PERIOD', & ! block
557  'FIRST', & ! tag name
558  'FIRST', & ! fortran variable
559  'KEYWORD', & ! type
560  '', & ! shape
561  '', & ! longname
562  .true., & ! required
563  .false., & ! developmode
564  .true., & ! multi-record
565  .false., & ! preserve case
566  .false., & ! layered
567  .false. & ! timeseries
568  )
569 
570  type(inputparamdefinitiontype), parameter :: &
572  ( &
573  'CHF', & ! component
574  'OC', & ! subcomponent
575  'PERIOD', & ! block
576  'LAST', & ! tag name
577  'LAST', & ! fortran variable
578  'KEYWORD', & ! type
579  '', & ! shape
580  '', & ! longname
581  .true., & ! required
582  .false., & ! developmode
583  .true., & ! multi-record
584  .false., & ! preserve case
585  .false., & ! layered
586  .false. & ! timeseries
587  )
588 
589  type(inputparamdefinitiontype), parameter :: &
591  ( &
592  'CHF', & ! component
593  'OC', & ! subcomponent
594  'PERIOD', & ! block
595  'FREQUENCY', & ! tag name
596  'FREQUENCY', & ! fortran variable
597  'INTEGER', & ! type
598  '', & ! shape
599  '', & ! longname
600  .true., & ! required
601  .false., & ! developmode
602  .true., & ! multi-record
603  .false., & ! preserve case
604  .false., & ! layered
605  .false. & ! timeseries
606  )
607 
608  type(inputparamdefinitiontype), parameter :: &
610  ( &
611  'CHF', & ! component
612  'OC', & ! subcomponent
613  'PERIOD', & ! block
614  'STEPS', & ! tag name
615  'STEPS', & ! fortran variable
616  'INTEGER1D', & ! type
617  '<NSTP', & ! shape
618  '', & ! longname
619  .true., & ! required
620  .false., & ! developmode
621  .true., & ! multi-record
622  .false., & ! preserve case
623  .false., & ! layered
624  .false. & ! timeseries
625  )
626 
627  type(inputparamdefinitiontype), parameter :: &
629  [ &
631  chfoc_budget, &
632  chfoc_fileout, &
635  chfoc_budgetcsv, &
638  chfoc_qoutflow, &
641  chfoc_stage, &
642  chfoc_stagefile, &
646  chfoc_columns, &
647  chfoc_width, &
648  chfoc_digits, &
649  chfoc_format, &
651  chfoc_save, &
653  chfoc_print, &
654  chfoc_rtype, &
655  chfoc_all, &
656  chfoc_first, &
657  chfoc_last, &
658  chfoc_frequency, &
659  chfoc_steps &
660  ]
661 
662  type(inputparamdefinitiontype), parameter :: &
664  ( &
665  'CHF', & ! component
666  'OC', & ! subcomponent
667  'PERIOD', & ! block
668  'OCSETTING', & ! tag name
669  'OCSETTING', & ! fortran variable
670  'KEYSTRING ALL FIRST LAST FREQUENCY STEPS', & ! type
671  '', & ! shape
672  '', & ! longname
673  .true., & ! required
674  .false., & ! developmode
675  .true., & ! multi-record
676  .false., & ! preserve case
677  .false., & ! layered
678  .false. & ! timeseries
679  )
680 
681  type(inputparamdefinitiontype), parameter :: &
683  [ &
685  ]
686 
687  type(inputblockdefinitiontype), parameter :: &
689  [ &
691  'OPTIONS', & ! blockname
692  .false., & ! required
693  .false., & ! aggregate
694  .false. & ! block_variable
695  ), &
697  'PERIOD', & ! blockname
698  .true., & ! required
699  .true., & ! aggregate
700  .true. & ! block_variable
701  ) &
702  ]
703 
704 end module chfocinputmodule
type(inputparamdefinitiontype), parameter chfoc_stagefilerec
Definition: chf-ocidm.f90:247
logical, public chf_oc_multi_package
Definition: chf-ocidm.f90:48
type(inputparamdefinitiontype), parameter chfoc_printrecord
Definition: chf-ocidm.f90:475
type(inputparamdefinitiontype), parameter chfoc_formatrecord
Definition: chf-ocidm.f90:342
type(inputparamdefinitiontype), parameter chfoc_qoutfilerec
Definition: chf-ocidm.f90:190
type(inputparamdefinitiontype), parameter chfoc_first
Definition: chf-ocidm.f90:551
type(inputparamdefinitiontype), dimension(*), parameter, public chf_oc_param_definitions
Definition: chf-ocidm.f90:627
type(inputparamdefinitiontype), parameter chfoc_fileout
Definition: chf-ocidm.f90:95
type(inputparamdefinitiontype), parameter chfoc_format
Definition: chf-ocidm.f90:418
type(inputparamdefinitiontype), parameter chfoc_stagefile
Definition: chf-ocidm.f90:285
type(inputparamdefinitiontype), parameter chfoc_digits
Definition: chf-ocidm.f90:399
type(inputparamdefinitiontype), parameter chfoc_budget
Definition: chf-ocidm.f90:76
type(inputparamdefinitiontype), parameter chfoc_stage
Definition: chf-ocidm.f90:266
type(inputparamdefinitiontype), parameter chfoc_width
Definition: chf-ocidm.f90:380
type(inputparamdefinitiontype), parameter chfoc_qoutflowfile
Definition: chf-ocidm.f90:228
type(inputparamdefinitiontype), parameter chfoc_budgetcsvfile
Definition: chf-ocidm.f90:171
type(inputparamdefinitiontype), parameter chfoc_print
Definition: chf-ocidm.f90:494
type(inputparamdefinitiontype), parameter chfoc_saverecord
Definition: chf-ocidm.f90:437
type(inputparamdefinitiontype), parameter chfoc_steps
Definition: chf-ocidm.f90:608
type(inputparamdefinitiontype), dimension(*), parameter, public chf_oc_aggregate_definitions
Definition: chf-ocidm.f90:681
character(len=16), dimension(*), parameter, public chf_oc_subpackages
Definition: chf-ocidm.f90:51
type(inputparamdefinitiontype), parameter chfoc_ocsetting
Definition: chf-ocidm.f90:662
type(inputparamdefinitiontype), parameter chfoc_print_format
Definition: chf-ocidm.f90:323
type(inputparamdefinitiontype), parameter chfoc_columns
Definition: chf-ocidm.f90:361
logical, public chf_oc_is_advanced
Definition: chf-ocidm.f90:49
type(inputparamdefinitiontype), parameter chfoc_last
Definition: chf-ocidm.f90:570
type(inputparamdefinitiontype), parameter chfoc_qoutflow
Definition: chf-ocidm.f90:209
type(inputblockdefinitiontype), dimension(*), parameter, public chf_oc_block_definitions
Definition: chf-ocidm.f90:687
type(inputparamdefinitiontype), parameter chfoc_all
Definition: chf-ocidm.f90:532
type(inputparamdefinitiontype), parameter chfoc_rtype
Definition: chf-ocidm.f90:513
type(inputparamdefinitiontype), parameter chfoc_qoutprintrec
Definition: chf-ocidm.f90:304
type(inputparamdefinitiontype), parameter chfoc_frequency
Definition: chf-ocidm.f90:589
type(inputparamdefinitiontype), parameter chfoc_save
Definition: chf-ocidm.f90:456
type(inputparamdefinitiontype), parameter chfoc_budgetcsv
Definition: chf-ocidm.f90:152
type(inputparamdefinitiontype), parameter chfoc_budfilerec
Definition: chf-ocidm.f90:57
type(inputparamdefinitiontype), parameter chfoc_budcsvfilerec
Definition: chf-ocidm.f90:133
type(inputparamdefinitiontype), parameter chfoc_budgetfile
Definition: chf-ocidm.f90:114
This module contains simulation constants.
Definition: Constants.f90:9
integer(i4b), parameter lenvarname
maximum length of a variable name
Definition: Constants.f90:17
Input definition module.
Input block definition. Describes an input block.
Input parameter definition. Describes an input parameter.