MODFLOW 6  version 6.7.0.dev3
USGS Modular Hydrologic Model
swf-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 swfocparamfoundtype
12  public swf_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 :: ocsetting = .false.
41  logical :: all = .false.
42  logical :: first = .false.
43  logical :: last = .false.
44  logical :: frequency = .false.
45  logical :: steps = .false.
46  end type swfocparamfoundtype
47 
48  logical :: swf_oc_multi_package = .false.
49 
50  character(len=16), parameter :: &
51  swf_oc_subpackages(*) = &
52  [ &
53  ' ' &
54  ]
55 
56  type(inputparamdefinitiontype), parameter :: &
58  ( &
59  'SWF', & ! component
60  'OC', & ! subcomponent
61  'OPTIONS', & ! block
62  'BUDGET_FILERECORD', & ! tag name
63  'BUDFILEREC', & ! fortran variable
64  'RECORD BUDGET FILEOUT BUDGETFILE', & ! type
65  '', & ! shape
66  '', & ! longname
67  .false., & ! required
68  .false., & ! developmode
69  .false., & ! multi-record
70  .false., & ! preserve case
71  .false., & ! layered
72  .false. & ! timeseries
73  )
74 
75  type(inputparamdefinitiontype), parameter :: &
77  ( &
78  'SWF', & ! component
79  'OC', & ! subcomponent
80  'OPTIONS', & ! block
81  'BUDGET', & ! tag name
82  'BUDGET', & ! fortran variable
83  'KEYWORD', & ! type
84  '', & ! shape
85  'budget keyword', & ! longname
86  .true., & ! required
87  .false., & ! developmode
88  .true., & ! multi-record
89  .false., & ! preserve case
90  .false., & ! layered
91  .false. & ! timeseries
92  )
93 
94  type(inputparamdefinitiontype), parameter :: &
96  ( &
97  'SWF', & ! component
98  'OC', & ! subcomponent
99  'OPTIONS', & ! block
100  'FILEOUT', & ! tag name
101  'FILEOUT', & ! fortran variable
102  'KEYWORD', & ! type
103  '', & ! shape
104  'file keyword', & ! longname
105  .true., & ! required
106  .false., & ! developmode
107  .true., & ! multi-record
108  .false., & ! preserve case
109  .false., & ! layered
110  .false. & ! timeseries
111  )
112 
113  type(inputparamdefinitiontype), parameter :: &
115  ( &
116  'SWF', & ! component
117  'OC', & ! subcomponent
118  'OPTIONS', & ! block
119  'BUDGETFILE', & ! tag name
120  'BUDGETFILE', & ! fortran variable
121  'STRING', & ! type
122  '', & ! shape
123  'file keyword', & ! longname
124  .true., & ! required
125  .false., & ! developmode
126  .true., & ! multi-record
127  .true., & ! preserve case
128  .false., & ! layered
129  .false. & ! timeseries
130  )
131 
132  type(inputparamdefinitiontype), parameter :: &
134  ( &
135  'SWF', & ! component
136  'OC', & ! subcomponent
137  'OPTIONS', & ! block
138  'BUDGETCSV_FILERECORD', & ! tag name
139  'BUDCSVFILEREC', & ! fortran variable
140  'RECORD BUDGETCSV FILEOUT BUDGETCSVFILE', & ! type
141  '', & ! shape
142  '', & ! longname
143  .false., & ! required
144  .false., & ! developmode
145  .false., & ! multi-record
146  .false., & ! preserve case
147  .false., & ! layered
148  .false. & ! timeseries
149  )
150 
151  type(inputparamdefinitiontype), parameter :: &
153  ( &
154  'SWF', & ! component
155  'OC', & ! subcomponent
156  'OPTIONS', & ! block
157  'BUDGETCSV', & ! tag name
158  'BUDGETCSV', & ! fortran variable
159  'KEYWORD', & ! type
160  '', & ! shape
161  'budget keyword', & ! longname
162  .true., & ! required
163  .false., & ! developmode
164  .true., & ! multi-record
165  .false., & ! preserve case
166  .false., & ! layered
167  .false. & ! timeseries
168  )
169 
170  type(inputparamdefinitiontype), parameter :: &
172  ( &
173  'SWF', & ! component
174  'OC', & ! subcomponent
175  'OPTIONS', & ! block
176  'BUDGETCSVFILE', & ! tag name
177  'BUDGETCSVFILE', & ! fortran variable
178  'STRING', & ! type
179  '', & ! shape
180  'file keyword', & ! longname
181  .true., & ! required
182  .false., & ! developmode
183  .true., & ! multi-record
184  .true., & ! preserve case
185  .false., & ! layered
186  .false. & ! timeseries
187  )
188 
189  type(inputparamdefinitiontype), parameter :: &
191  ( &
192  'SWF', & ! component
193  'OC', & ! subcomponent
194  'OPTIONS', & ! block
195  'QOUTFLOW_FILERECORD', & ! tag name
196  'QOUTFILEREC', & ! fortran variable
197  'RECORD QOUTFLOW FILEOUT QOUTFLOWFILE', & ! type
198  '', & ! shape
199  '', & ! longname
200  .false., & ! required
201  .false., & ! developmode
202  .false., & ! multi-record
203  .false., & ! preserve case
204  .false., & ! layered
205  .false. & ! timeseries
206  )
207 
208  type(inputparamdefinitiontype), parameter :: &
210  ( &
211  'SWF', & ! component
212  'OC', & ! subcomponent
213  'OPTIONS', & ! block
214  'QOUTFLOW', & ! tag name
215  'QOUTFLOW', & ! fortran variable
216  'KEYWORD', & ! type
217  '', & ! shape
218  'qoutflow keyword', & ! longname
219  .true., & ! required
220  .false., & ! developmode
221  .true., & ! multi-record
222  .false., & ! preserve case
223  .false., & ! layered
224  .false. & ! timeseries
225  )
226 
227  type(inputparamdefinitiontype), parameter :: &
229  ( &
230  'SWF', & ! component
231  'OC', & ! subcomponent
232  'OPTIONS', & ! block
233  'QOUTFLOWFILE', & ! tag name
234  'QOUTFLOWFILE', & ! fortran variable
235  'STRING', & ! type
236  '', & ! shape
237  'file keyword', & ! longname
238  .true., & ! required
239  .false., & ! developmode
240  .true., & ! multi-record
241  .true., & ! preserve case
242  .false., & ! layered
243  .false. & ! timeseries
244  )
245 
246  type(inputparamdefinitiontype), parameter :: &
248  ( &
249  'SWF', & ! component
250  'OC', & ! subcomponent
251  'OPTIONS', & ! block
252  'STAGE_FILERECORD', & ! tag name
253  'STAGEFILEREC', & ! fortran variable
254  'RECORD STAGE FILEOUT STAGEFILE', & ! type
255  '', & ! shape
256  '', & ! longname
257  .false., & ! required
258  .false., & ! developmode
259  .false., & ! multi-record
260  .false., & ! preserve case
261  .false., & ! layered
262  .false. & ! timeseries
263  )
264 
265  type(inputparamdefinitiontype), parameter :: &
267  ( &
268  'SWF', & ! component
269  'OC', & ! subcomponent
270  'OPTIONS', & ! block
271  'STAGE', & ! tag name
272  'STAGE', & ! fortran variable
273  'KEYWORD', & ! type
274  '', & ! shape
275  'stage keyword', & ! longname
276  .true., & ! required
277  .false., & ! developmode
278  .true., & ! multi-record
279  .false., & ! preserve case
280  .false., & ! layered
281  .false. & ! timeseries
282  )
283 
284  type(inputparamdefinitiontype), parameter :: &
286  ( &
287  'SWF', & ! component
288  'OC', & ! subcomponent
289  'OPTIONS', & ! block
290  'STAGEFILE', & ! tag name
291  'STAGEFILE', & ! fortran variable
292  'STRING', & ! type
293  '', & ! shape
294  'file keyword', & ! longname
295  .true., & ! required
296  .false., & ! developmode
297  .true., & ! multi-record
298  .true., & ! preserve case
299  .false., & ! layered
300  .false. & ! timeseries
301  )
302 
303  type(inputparamdefinitiontype), parameter :: &
305  ( &
306  'SWF', & ! component
307  'OC', & ! subcomponent
308  'OPTIONS', & ! block
309  'QOUTFLOWPRINTRECORD', & ! tag name
310  'QOUTPRINTREC', & ! fortran variable
311  'RECORD QOUTFLOW PRINT_FORMAT FORMATRECORD', & ! type
312  '', & ! shape
313  '', & ! longname
314  .false., & ! required
315  .false., & ! developmode
316  .false., & ! multi-record
317  .false., & ! preserve case
318  .false., & ! layered
319  .false. & ! timeseries
320  )
321 
322  type(inputparamdefinitiontype), parameter :: &
324  ( &
325  'SWF', & ! component
326  'OC', & ! subcomponent
327  'OPTIONS', & ! block
328  'PRINT_FORMAT', & ! tag name
329  'PRINT_FORMAT', & ! fortran variable
330  'KEYWORD', & ! type
331  '', & ! shape
332  'keyword to indicate that a print format follows', & ! longname
333  .true., & ! required
334  .false., & ! developmode
335  .true., & ! multi-record
336  .false., & ! preserve case
337  .false., & ! layered
338  .false. & ! timeseries
339  )
340 
341  type(inputparamdefinitiontype), parameter :: &
343  ( &
344  'SWF', & ! component
345  'OC', & ! subcomponent
346  'OPTIONS', & ! block
347  'FORMATRECORD', & ! tag name
348  'FORMATRECORD', & ! fortran variable
349  'RECORD COLUMNS WIDTH DIGITS FORMAT', & ! type
350  '', & ! shape
351  '', & ! longname
352  .true., & ! required
353  .false., & ! developmode
354  .true., & ! multi-record
355  .false., & ! preserve case
356  .false., & ! layered
357  .false. & ! timeseries
358  )
359 
360  type(inputparamdefinitiontype), parameter :: &
362  ( &
363  'SWF', & ! component
364  'OC', & ! subcomponent
365  'OPTIONS', & ! block
366  'COLUMNS', & ! tag name
367  'COLUMNS', & ! fortran variable
368  'INTEGER', & ! type
369  '', & ! shape
370  'number of columns', & ! longname
371  .true., & ! required
372  .false., & ! developmode
373  .true., & ! multi-record
374  .false., & ! preserve case
375  .false., & ! layered
376  .false. & ! timeseries
377  )
378 
379  type(inputparamdefinitiontype), parameter :: &
381  ( &
382  'SWF', & ! component
383  'OC', & ! subcomponent
384  'OPTIONS', & ! block
385  'WIDTH', & ! tag name
386  'WIDTH', & ! fortran variable
387  'INTEGER', & ! type
388  '', & ! shape
389  'width for each number', & ! longname
390  .true., & ! required
391  .false., & ! developmode
392  .true., & ! multi-record
393  .false., & ! preserve case
394  .false., & ! layered
395  .false. & ! timeseries
396  )
397 
398  type(inputparamdefinitiontype), parameter :: &
400  ( &
401  'SWF', & ! component
402  'OC', & ! subcomponent
403  'OPTIONS', & ! block
404  'DIGITS', & ! tag name
405  'DIGITS', & ! fortran variable
406  'INTEGER', & ! type
407  '', & ! shape
408  'number of digits', & ! longname
409  .true., & ! required
410  .false., & ! developmode
411  .true., & ! multi-record
412  .false., & ! preserve case
413  .false., & ! layered
414  .false. & ! timeseries
415  )
416 
417  type(inputparamdefinitiontype), parameter :: &
419  ( &
420  'SWF', & ! component
421  'OC', & ! subcomponent
422  'OPTIONS', & ! block
423  'FORMAT', & ! tag name
424  'FORMAT', & ! fortran variable
425  'STRING', & ! type
426  '', & ! shape
427  'write format', & ! longname
428  .true., & ! required
429  .false., & ! developmode
430  .true., & ! multi-record
431  .false., & ! preserve case
432  .false., & ! layered
433  .false. & ! timeseries
434  )
435 
436  type(inputparamdefinitiontype), parameter :: &
438  ( &
439  'SWF', & ! component
440  'OC', & ! subcomponent
441  'PERIOD', & ! block
442  'SAVERECORD', & ! tag name
443  'SAVERECORD', & ! fortran variable
444  'RECORD SAVE RTYPE OCSETTING', & ! type
445  '', & ! shape
446  '', & ! longname
447  .false., & ! required
448  .false., & ! developmode
449  .false., & ! multi-record
450  .false., & ! preserve case
451  .false., & ! layered
452  .false. & ! timeseries
453  )
454 
455  type(inputparamdefinitiontype), parameter :: &
457  ( &
458  'SWF', & ! component
459  'OC', & ! subcomponent
460  'PERIOD', & ! block
461  'SAVE', & ! tag name
462  'SAVE', & ! fortran variable
463  'KEYWORD', & ! type
464  '', & ! shape
465  'keyword to save', & ! longname
466  .true., & ! required
467  .false., & ! developmode
468  .true., & ! multi-record
469  .false., & ! preserve case
470  .false., & ! layered
471  .false. & ! timeseries
472  )
473 
474  type(inputparamdefinitiontype), parameter :: &
476  ( &
477  'SWF', & ! component
478  'OC', & ! subcomponent
479  'PERIOD', & ! block
480  'PRINTRECORD', & ! tag name
481  'PRINTRECORD', & ! fortran variable
482  'RECORD PRINT RTYPE OCSETTING', & ! type
483  '', & ! shape
484  '', & ! longname
485  .false., & ! required
486  .false., & ! developmode
487  .false., & ! multi-record
488  .false., & ! preserve case
489  .false., & ! layered
490  .false. & ! timeseries
491  )
492 
493  type(inputparamdefinitiontype), parameter :: &
495  ( &
496  'SWF', & ! component
497  'OC', & ! subcomponent
498  'PERIOD', & ! block
499  'PRINT', & ! tag name
500  'PRINT', & ! fortran variable
501  'KEYWORD', & ! type
502  '', & ! shape
503  'keyword to save', & ! longname
504  .true., & ! required
505  .false., & ! developmode
506  .true., & ! multi-record
507  .false., & ! preserve case
508  .false., & ! layered
509  .false. & ! timeseries
510  )
511 
512  type(inputparamdefinitiontype), parameter :: &
514  ( &
515  'SWF', & ! component
516  'OC', & ! subcomponent
517  'PERIOD', & ! block
518  'RTYPE', & ! tag name
519  'RTYPE', & ! fortran variable
520  'STRING', & ! type
521  '', & ! shape
522  'record type', & ! longname
523  .true., & ! required
524  .false., & ! developmode
525  .true., & ! multi-record
526  .false., & ! preserve case
527  .false., & ! layered
528  .false. & ! timeseries
529  )
530 
531  type(inputparamdefinitiontype), parameter :: &
533  ( &
534  'SWF', & ! component
535  'OC', & ! subcomponent
536  'PERIOD', & ! block
537  'OCSETTING', & ! tag name
538  'OCSETTING', & ! fortran variable
539  'KEYSTRING ALL FIRST LAST FREQUENCY STEPS', & ! type
540  '', & ! shape
541  '', & ! longname
542  .true., & ! required
543  .false., & ! developmode
544  .true., & ! multi-record
545  .false., & ! preserve case
546  .false., & ! layered
547  .false. & ! timeseries
548  )
549 
550  type(inputparamdefinitiontype), parameter :: &
552  ( &
553  'SWF', & ! component
554  'OC', & ! subcomponent
555  'PERIOD', & ! block
556  'ALL', & ! tag name
557  'ALL', & ! fortran variable
558  'KEYWORD', & ! type
559  '', & ! shape
560  '', & ! longname
561  .true., & ! required
562  .false., & ! developmode
563  .true., & ! multi-record
564  .false., & ! preserve case
565  .false., & ! layered
566  .false. & ! timeseries
567  )
568 
569  type(inputparamdefinitiontype), parameter :: &
571  ( &
572  'SWF', & ! component
573  'OC', & ! subcomponent
574  'PERIOD', & ! block
575  'FIRST', & ! tag name
576  'FIRST', & ! fortran variable
577  'KEYWORD', & ! type
578  '', & ! shape
579  '', & ! longname
580  .true., & ! required
581  .false., & ! developmode
582  .true., & ! multi-record
583  .false., & ! preserve case
584  .false., & ! layered
585  .false. & ! timeseries
586  )
587 
588  type(inputparamdefinitiontype), parameter :: &
590  ( &
591  'SWF', & ! component
592  'OC', & ! subcomponent
593  'PERIOD', & ! block
594  'LAST', & ! tag name
595  'LAST', & ! fortran variable
596  'KEYWORD', & ! type
597  '', & ! shape
598  '', & ! longname
599  .true., & ! required
600  .false., & ! developmode
601  .true., & ! multi-record
602  .false., & ! preserve case
603  .false., & ! layered
604  .false. & ! timeseries
605  )
606 
607  type(inputparamdefinitiontype), parameter :: &
609  ( &
610  'SWF', & ! component
611  'OC', & ! subcomponent
612  'PERIOD', & ! block
613  'FREQUENCY', & ! tag name
614  'FREQUENCY', & ! fortran variable
615  'INTEGER', & ! type
616  '', & ! shape
617  '', & ! longname
618  .true., & ! required
619  .false., & ! developmode
620  .true., & ! multi-record
621  .false., & ! preserve case
622  .false., & ! layered
623  .false. & ! timeseries
624  )
625 
626  type(inputparamdefinitiontype), parameter :: &
628  ( &
629  'SWF', & ! component
630  'OC', & ! subcomponent
631  'PERIOD', & ! block
632  'STEPS', & ! tag name
633  'STEPS', & ! fortran variable
634  'INTEGER1D', & ! type
635  '<NSTP', & ! shape
636  '', & ! longname
637  .true., & ! required
638  .false., & ! developmode
639  .true., & ! multi-record
640  .false., & ! preserve case
641  .false., & ! layered
642  .false. & ! timeseries
643  )
644 
645  type(inputparamdefinitiontype), parameter :: &
647  [ &
649  swfoc_budget, &
650  swfoc_fileout, &
653  swfoc_budgetcsv, &
656  swfoc_qoutflow, &
659  swfoc_stage, &
660  swfoc_stagefile, &
664  swfoc_columns, &
665  swfoc_width, &
666  swfoc_digits, &
667  swfoc_format, &
669  swfoc_save, &
671  swfoc_print, &
672  swfoc_rtype, &
673  swfoc_ocsetting, &
674  swfoc_all, &
675  swfoc_first, &
676  swfoc_last, &
677  swfoc_frequency, &
678  swfoc_steps &
679  ]
680 
681  type(inputparamdefinitiontype), parameter :: &
683  [ &
685  ( &
686  '', & ! component
687  '', & ! subcomponent
688  '', & ! block
689  '', & ! tag name
690  '', & ! fortran variable
691  '', & ! type
692  '', & ! shape
693  '', & ! longname
694  .false., & ! required
695  .false., & ! developmode
696  .false., & ! multi-record
697  .false., & ! preserve case
698  .false., & ! layered
699  .false. & ! timeseries
700  ) &
701  ]
702 
703  type(inputblockdefinitiontype), parameter :: &
705  [ &
707  'OPTIONS', & ! blockname
708  .false., & ! required
709  .false., & ! aggregate
710  .false. & ! block_variable
711  ), &
713  'PERIOD', & ! blockname
714  .false., & ! required
715  .false., & ! aggregate
716  .true. & ! block_variable
717  ) &
718  ]
719 
720 end module swfocinputmodule
This module contains simulation constants.
Definition: Constants.f90:9
integer(i4b), parameter lenvarname
maximum length of a variable name
Definition: Constants.f90:17
This module contains the InputDefinitionModule.
character(len=16), dimension(*), parameter, public swf_oc_subpackages
Definition: swf-ocidm.f90:50
type(inputparamdefinitiontype), parameter swfoc_budcsvfilerec
Definition: swf-ocidm.f90:132
type(inputparamdefinitiontype), parameter swfoc_print
Definition: swf-ocidm.f90:493
type(inputparamdefinitiontype), parameter swfoc_frequency
Definition: swf-ocidm.f90:607
type(inputparamdefinitiontype), parameter swfoc_print_format
Definition: swf-ocidm.f90:322
type(inputparamdefinitiontype), parameter swfoc_qoutflowfile
Definition: swf-ocidm.f90:227
type(inputparamdefinitiontype), parameter swfoc_qoutflow
Definition: swf-ocidm.f90:208
type(inputparamdefinitiontype), parameter swfoc_last
Definition: swf-ocidm.f90:588
type(inputparamdefinitiontype), parameter swfoc_digits
Definition: swf-ocidm.f90:398
type(inputparamdefinitiontype), parameter swfoc_saverecord
Definition: swf-ocidm.f90:436
type(inputparamdefinitiontype), parameter swfoc_budgetcsvfile
Definition: swf-ocidm.f90:170
type(inputparamdefinitiontype), parameter swfoc_rtype
Definition: swf-ocidm.f90:512
type(inputparamdefinitiontype), parameter swfoc_all
Definition: swf-ocidm.f90:550
type(inputparamdefinitiontype), parameter swfoc_budgetfile
Definition: swf-ocidm.f90:113
type(inputparamdefinitiontype), parameter swfoc_format
Definition: swf-ocidm.f90:417
type(inputparamdefinitiontype), parameter swfoc_stagefile
Definition: swf-ocidm.f90:284
type(inputparamdefinitiontype), parameter swfoc_fileout
Definition: swf-ocidm.f90:94
logical, public swf_oc_multi_package
Definition: swf-ocidm.f90:48
type(inputparamdefinitiontype), parameter swfoc_stage
Definition: swf-ocidm.f90:265
type(inputparamdefinitiontype), parameter swfoc_width
Definition: swf-ocidm.f90:379
type(inputparamdefinitiontype), parameter swfoc_formatrecord
Definition: swf-ocidm.f90:341
type(inputparamdefinitiontype), dimension(*), parameter, public swf_oc_aggregate_definitions
Definition: swf-ocidm.f90:681
type(inputparamdefinitiontype), parameter swfoc_save
Definition: swf-ocidm.f90:455
type(inputparamdefinitiontype), parameter swfoc_qoutprintrec
Definition: swf-ocidm.f90:303
type(inputparamdefinitiontype), parameter swfoc_stagefilerec
Definition: swf-ocidm.f90:246
type(inputparamdefinitiontype), parameter swfoc_budfilerec
Definition: swf-ocidm.f90:56
type(inputparamdefinitiontype), dimension(*), parameter, public swf_oc_param_definitions
Definition: swf-ocidm.f90:645
type(inputparamdefinitiontype), parameter swfoc_steps
Definition: swf-ocidm.f90:626
type(inputparamdefinitiontype), parameter swfoc_budgetcsv
Definition: swf-ocidm.f90:151
type(inputparamdefinitiontype), parameter swfoc_budget
Definition: swf-ocidm.f90:75
type(inputparamdefinitiontype), parameter swfoc_ocsetting
Definition: swf-ocidm.f90:531
type(inputblockdefinitiontype), dimension(*), parameter, public swf_oc_block_definitions
Definition: swf-ocidm.f90:703
type(inputparamdefinitiontype), parameter swfoc_printrecord
Definition: swf-ocidm.f90:474
type(inputparamdefinitiontype), parameter swfoc_qoutfilerec
Definition: swf-ocidm.f90:189
type(inputparamdefinitiontype), parameter swfoc_first
Definition: swf-ocidm.f90:569
type(inputparamdefinitiontype), parameter swfoc_columns
Definition: swf-ocidm.f90:360