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