MODFLOW 6  version 6.9.0.dev0
USGS Modular Hydrologic Model
gwt-mwtidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module gwtmwtinputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public gwt_mwt_param_definitions
8  public gwt_mwt_aggregate_definitions
9  public gwt_mwt_block_definitions
10  public gwtmwtparamfoundtype
11  public gwt_mwt_multi_package
12  public gwt_mwt_is_advanced
13  public gwt_mwt_subpackages
14 
15  type gwtmwtparamfoundtype
16  logical :: flow_pkg_name = .false.
17  logical :: auxiliary = .false.
18  logical :: fp_aux_name = .false.
19  logical :: boundnames = .false.
20  logical :: iprpak = .false.
21  logical :: iprconc = .false.
22  logical :: iprflow = .false.
23  logical :: ipakcb = .false.
24  logical :: conc_filerec = .false.
25  logical :: options_concentration = .false.
26  logical :: concfile = .false.
27  logical :: budfilerec = .false.
28  logical :: budget = .false.
29  logical :: fileout = .false.
30  logical :: budgetfile = .false.
31  logical :: budcsvfilerec = .false.
32  logical :: budgetcsv = .false.
33  logical :: budgetcsvfile = .false.
34  logical :: ts_filerecord = .false.
35  logical :: ts6 = .false.
36  logical :: filein = .false.
37  logical :: ts6_filename = .false.
38  logical :: obs_filerecord = .false.
39  logical :: obs6 = .false.
40  logical :: obs6_filename = .false.
41  logical :: dev_nonexpanding = .false.
42  logical :: packagedata_ifno = .false.
43  logical :: strt = .false.
44  logical :: aux = .false.
45  logical :: boundname = .false.
46  logical :: ifno = .false.
47  logical :: status = .false.
48  logical :: concentration = .false.
49  logical :: rate = .false.
50  logical :: auxiliaryrecord = .false.
51  logical :: period_auxiliary = .false.
52  logical :: auxname = .false.
53  logical :: auxval = .false.
54  end type gwtmwtparamfoundtype
55 
56  logical :: gwt_mwt_multi_package = .true.
57  logical :: gwt_mwt_is_advanced = .true.
58 
59  character(len=16), parameter :: &
60  gwt_mwt_subpackages(*) = &
61  [ &
62  ' ' &
63  ]
64 
65  type(inputparamdefinitiontype), parameter :: &
66  gwtmwt_flow_pkg_name = inputparamdefinitiontype &
67  ( &
68  'GWT', & ! component
69  'MWT', & ! subcomponent
70  'OPTIONS', & ! block
71  'FLOW_PACKAGE_NAME', & ! tag name
72  'FLOW_PKG_NAME', & ! fortran variable
73  'STRING', & ! type
74  '', & ! shape
75  'keyword to specify name of corresponding flow package', & ! longname
76  .false., & ! required
77  .false., & ! developmode
78  .false., & ! multi-record
79  .false., & ! preserve case
80  .false., & ! layered
81  .false. & ! timeseries
82  )
83 
84  type(inputparamdefinitiontype), parameter :: &
85  gwtmwt_auxiliary = inputparamdefinitiontype &
86  ( &
87  'GWT', & ! component
88  'MWT', & ! subcomponent
89  'OPTIONS', & ! block
90  'AUXILIARY', & ! tag name
91  'AUXILIARY', & ! fortran variable
92  'STRING', & ! type
93  'NAUX', & ! shape
94  'keyword to specify aux variables', & ! longname
95  .false., & ! required
96  .false., & ! developmode
97  .false., & ! multi-record
98  .false., & ! preserve case
99  .false., & ! layered
100  .false. & ! timeseries
101  )
102 
103  type(inputparamdefinitiontype), parameter :: &
104  gwtmwt_fp_aux_name = inputparamdefinitiontype &
105  ( &
106  'GWT', & ! component
107  'MWT', & ! subcomponent
108  'OPTIONS', & ! block
109  'FLOW_PACKAGE_AUXILIARY_NAME', & ! tag name
110  'FP_AUX_NAME', & ! fortran variable
111  'STRING', & ! type
112  '', & ! shape
113  'keyword to specify name of concentration auxiliary variable '// &
114  'in flow package', & ! 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  gwtmwt_boundnames = inputparamdefinitiontype &
125  ( &
126  'GWT', & ! component
127  'MWT', & ! subcomponent
128  'OPTIONS', & ! block
129  'BOUNDNAMES', & ! tag name
130  'BOUNDNAMES', & ! fortran variable
131  'KEYWORD', & ! type
132  '', & ! shape
133  '', & ! 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  gwtmwt_iprpak = inputparamdefinitiontype &
144  ( &
145  'GWT', & ! component
146  'MWT', & ! subcomponent
147  'OPTIONS', & ! block
148  'PRINT_INPUT', & ! tag name
149  'IPRPAK', & ! fortran variable
150  'KEYWORD', & ! type
151  '', & ! shape
152  'print input to listing file', & ! 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  gwtmwt_iprconc = inputparamdefinitiontype &
163  ( &
164  'GWT', & ! component
165  'MWT', & ! subcomponent
166  'OPTIONS', & ! block
167  'PRINT_CONCENTRATION', & ! tag name
168  'IPRCONC', & ! fortran variable
169  'KEYWORD', & ! type
170  '', & ! shape
171  'print calculated concentrations to listing file', & ! longname
172  .false., & ! required
173  .false., & ! developmode
174  .false., & ! multi-record
175  .false., & ! preserve case
176  .false., & ! layered
177  .false. & ! timeseries
178  )
179 
180  type(inputparamdefinitiontype), parameter :: &
181  gwtmwt_iprflow = inputparamdefinitiontype &
182  ( &
183  'GWT', & ! component
184  'MWT', & ! subcomponent
185  'OPTIONS', & ! block
186  'PRINT_FLOWS', & ! tag name
187  'IPRFLOW', & ! fortran variable
188  'KEYWORD', & ! type
189  '', & ! shape
190  'print calculated flows to listing file', & ! longname
191  .false., & ! required
192  .false., & ! developmode
193  .false., & ! multi-record
194  .false., & ! preserve case
195  .false., & ! layered
196  .false. & ! timeseries
197  )
198 
199  type(inputparamdefinitiontype), parameter :: &
200  gwtmwt_ipakcb = inputparamdefinitiontype &
201  ( &
202  'GWT', & ! component
203  'MWT', & ! subcomponent
204  'OPTIONS', & ! block
205  'SAVE_FLOWS', & ! tag name
206  'IPAKCB', & ! fortran variable
207  'KEYWORD', & ! type
208  '', & ! shape
209  'save well flows to budget file', & ! longname
210  .false., & ! required
211  .false., & ! developmode
212  .false., & ! multi-record
213  .false., & ! preserve case
214  .false., & ! layered
215  .false. & ! timeseries
216  )
217 
218  type(inputparamdefinitiontype), parameter :: &
219  gwtmwt_conc_filerec = inputparamdefinitiontype &
220  ( &
221  'GWT', & ! component
222  'MWT', & ! subcomponent
223  'OPTIONS', & ! block
224  'CONCENTRATION_FILERECORD', & ! tag name
225  'CONC_FILEREC', & ! fortran variable
226  'RECORD CONCENTRATION FILEOUT CONCFILE', & ! 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  gwtmwt_options_concentration = inputparamdefinitiontype &
239  ( &
240  'GWT', & ! component
241  'MWT', & ! subcomponent
242  'OPTIONS', & ! block
243  'CONCENTRATION', & ! tag name
244  'CONCENTRATION', & ! fortran variable
245  'KEYWORD', & ! type
246  '', & ! shape
247  'stage 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  gwtmwt_concfile = inputparamdefinitiontype &
258  ( &
259  'GWT', & ! component
260  'MWT', & ! subcomponent
261  'OPTIONS', & ! block
262  'CONCFILE', & ! tag name
263  'CONCFILE', & ! fortran variable
264  'STRING', & ! type
265  '', & ! shape
266  'file keyword', & ! 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  gwtmwt_budfilerec = inputparamdefinitiontype &
277  ( &
278  'GWT', & ! component
279  'MWT', & ! subcomponent
280  'OPTIONS', & ! block
281  'BUDGET_FILERECORD', & ! tag name
282  'BUDFILEREC', & ! fortran variable
283  'RECORD BUDGET FILEOUT BUDGETFILE', & ! type
284  '', & ! shape
285  '', & ! longname
286  .false., & ! 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  gwtmwt_budget = inputparamdefinitiontype &
296  ( &
297  'GWT', & ! component
298  'MWT', & ! subcomponent
299  'OPTIONS', & ! block
300  'BUDGET', & ! tag name
301  'BUDGET', & ! fortran variable
302  'KEYWORD', & ! type
303  '', & ! shape
304  'budget keyword', & ! 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  gwtmwt_fileout = inputparamdefinitiontype &
315  ( &
316  'GWT', & ! component
317  'MWT', & ! subcomponent
318  'OPTIONS', & ! block
319  'FILEOUT', & ! tag name
320  'FILEOUT', & ! fortran variable
321  'KEYWORD', & ! type
322  '', & ! shape
323  'file keyword', & ! 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  gwtmwt_budgetfile = inputparamdefinitiontype &
334  ( &
335  'GWT', & ! component
336  'MWT', & ! subcomponent
337  'OPTIONS', & ! block
338  'BUDGETFILE', & ! tag name
339  'BUDGETFILE', & ! fortran variable
340  'STRING', & ! type
341  '', & ! shape
342  'file keyword', & ! longname
343  .true., & ! required
344  .false., & ! developmode
345  .true., & ! multi-record
346  .true., & ! preserve case
347  .false., & ! layered
348  .false. & ! timeseries
349  )
350 
351  type(inputparamdefinitiontype), parameter :: &
352  gwtmwt_budcsvfilerec = inputparamdefinitiontype &
353  ( &
354  'GWT', & ! component
355  'MWT', & ! subcomponent
356  'OPTIONS', & ! block
357  'BUDGETCSV_FILERECORD', & ! tag name
358  'BUDCSVFILEREC', & ! fortran variable
359  'RECORD BUDGETCSV FILEOUT BUDGETCSVFILE', & ! type
360  '', & ! shape
361  '', & ! longname
362  .false., & ! required
363  .false., & ! developmode
364  .false., & ! multi-record
365  .false., & ! preserve case
366  .false., & ! layered
367  .false. & ! timeseries
368  )
369 
370  type(inputparamdefinitiontype), parameter :: &
371  gwtmwt_budgetcsv = inputparamdefinitiontype &
372  ( &
373  'GWT', & ! component
374  'MWT', & ! subcomponent
375  'OPTIONS', & ! block
376  'BUDGETCSV', & ! tag name
377  'BUDGETCSV', & ! fortran variable
378  'KEYWORD', & ! type
379  '', & ! shape
380  'budget keyword', & ! longname
381  .true., & ! required
382  .false., & ! developmode
383  .true., & ! multi-record
384  .false., & ! preserve case
385  .false., & ! layered
386  .false. & ! timeseries
387  )
388 
389  type(inputparamdefinitiontype), parameter :: &
390  gwtmwt_budgetcsvfile = inputparamdefinitiontype &
391  ( &
392  'GWT', & ! component
393  'MWT', & ! subcomponent
394  'OPTIONS', & ! block
395  'BUDGETCSVFILE', & ! tag name
396  'BUDGETCSVFILE', & ! fortran variable
397  'STRING', & ! type
398  '', & ! shape
399  'file keyword', & ! longname
400  .true., & ! required
401  .false., & ! developmode
402  .true., & ! multi-record
403  .true., & ! preserve case
404  .false., & ! layered
405  .false. & ! timeseries
406  )
407 
408  type(inputparamdefinitiontype), parameter :: &
409  gwtmwt_ts_filerecord = inputparamdefinitiontype &
410  ( &
411  'GWT', & ! component
412  'MWT', & ! subcomponent
413  'OPTIONS', & ! block
414  'TS_FILERECORD', & ! tag name
415  'TS_FILERECORD', & ! fortran variable
416  'RECORD TS6 FILEIN TS6_FILENAME', & ! type
417  '', & ! shape
418  '', & ! longname
419  .false., & ! required
420  .false., & ! developmode
421  .false., & ! multi-record
422  .false., & ! preserve case
423  .false., & ! layered
424  .false. & ! timeseries
425  )
426 
427  type(inputparamdefinitiontype), parameter :: &
428  gwtmwt_ts6 = inputparamdefinitiontype &
429  ( &
430  'GWT', & ! component
431  'MWT', & ! subcomponent
432  'OPTIONS', & ! block
433  'TS6', & ! tag name
434  'TS6', & ! fortran variable
435  'KEYWORD', & ! type
436  '', & ! shape
437  'head keyword', & ! longname
438  .true., & ! required
439  .false., & ! developmode
440  .true., & ! multi-record
441  .false., & ! preserve case
442  .false., & ! layered
443  .false. & ! timeseries
444  )
445 
446  type(inputparamdefinitiontype), parameter :: &
447  gwtmwt_filein = inputparamdefinitiontype &
448  ( &
449  'GWT', & ! component
450  'MWT', & ! subcomponent
451  'OPTIONS', & ! block
452  'FILEIN', & ! tag name
453  'FILEIN', & ! fortran variable
454  'KEYWORD', & ! type
455  '', & ! shape
456  'file keyword', & ! longname
457  .true., & ! required
458  .false., & ! developmode
459  .true., & ! multi-record
460  .false., & ! preserve case
461  .false., & ! layered
462  .false. & ! timeseries
463  )
464 
465  type(inputparamdefinitiontype), parameter :: &
466  gwtmwt_ts6_filename = inputparamdefinitiontype &
467  ( &
468  'GWT', & ! component
469  'MWT', & ! subcomponent
470  'OPTIONS', & ! block
471  'TS6_FILENAME', & ! tag name
472  'TS6_FILENAME', & ! fortran variable
473  'STRING', & ! type
474  '', & ! shape
475  'file name of time series information', & ! longname
476  .true., & ! required
477  .false., & ! developmode
478  .true., & ! multi-record
479  .true., & ! preserve case
480  .false., & ! layered
481  .false. & ! timeseries
482  )
483 
484  type(inputparamdefinitiontype), parameter :: &
485  gwtmwt_obs_filerecord = inputparamdefinitiontype &
486  ( &
487  'GWT', & ! component
488  'MWT', & ! subcomponent
489  'OPTIONS', & ! block
490  'OBS_FILERECORD', & ! tag name
491  'OBS_FILERECORD', & ! fortran variable
492  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
493  '', & ! shape
494  '', & ! longname
495  .false., & ! required
496  .false., & ! developmode
497  .false., & ! multi-record
498  .false., & ! preserve case
499  .false., & ! layered
500  .false. & ! timeseries
501  )
502 
503  type(inputparamdefinitiontype), parameter :: &
504  gwtmwt_obs6 = inputparamdefinitiontype &
505  ( &
506  'GWT', & ! component
507  'MWT', & ! subcomponent
508  'OPTIONS', & ! block
509  'OBS6', & ! tag name
510  'OBS6', & ! fortran variable
511  'KEYWORD', & ! type
512  '', & ! shape
513  'obs keyword', & ! longname
514  .true., & ! required
515  .false., & ! developmode
516  .true., & ! multi-record
517  .false., & ! preserve case
518  .false., & ! layered
519  .false. & ! timeseries
520  )
521 
522  type(inputparamdefinitiontype), parameter :: &
523  gwtmwt_obs6_filename = inputparamdefinitiontype &
524  ( &
525  'GWT', & ! component
526  'MWT', & ! subcomponent
527  'OPTIONS', & ! block
528  'OBS6_FILENAME', & ! tag name
529  'OBS6_FILENAME', & ! fortran variable
530  'STRING', & ! type
531  '', & ! shape
532  'obs6 input filename', & ! longname
533  .true., & ! required
534  .false., & ! developmode
535  .true., & ! multi-record
536  .true., & ! preserve case
537  .false., & ! layered
538  .false. & ! timeseries
539  )
540 
541  type(inputparamdefinitiontype), parameter :: &
542  gwtmwt_dev_nonexpanding = inputparamdefinitiontype &
543  ( &
544  'GWT', & ! component
545  'MWT', & ! subcomponent
546  'OPTIONS', & ! block
547  'DEV_NONEXPANDING_MATRIX', & ! tag name
548  'DEV_NONEXPANDING', & ! fortran variable
549  'KEYWORD', & ! type
550  '', & ! shape
551  'do not add rows to the solution matrix', & ! longname
552  .false., & ! required
553  .false., & ! developmode
554  .false., & ! multi-record
555  .false., & ! preserve case
556  .false., & ! layered
557  .false. & ! timeseries
558  )
559 
560  type(inputparamdefinitiontype), parameter :: &
561  gwtmwt_packagedata_ifno = inputparamdefinitiontype &
562  ( &
563  'GWT', & ! component
564  'MWT', & ! subcomponent
565  'PACKAGEDATA', & ! block
566  'IFNO', & ! tag name
567  'PACKAGEDATA_IFNO', & ! fortran variable
568  'INTEGER', & ! type
569  '', & ! shape
570  'well number for this entry', & ! longname
571  .true., & ! required
572  .false., & ! developmode
573  .true., & ! multi-record
574  .false., & ! preserve case
575  .false., & ! layered
576  .false. & ! timeseries
577  )
578 
579  type(inputparamdefinitiontype), parameter :: &
580  gwtmwt_strt = inputparamdefinitiontype &
581  ( &
582  'GWT', & ! component
583  'MWT', & ! subcomponent
584  'PACKAGEDATA', & ! block
585  'STRT', & ! tag name
586  'STRT', & ! fortran variable
587  'DOUBLE', & ! type
588  '', & ! shape
589  'starting well concentration', & ! longname
590  .true., & ! required
591  .false., & ! developmode
592  .true., & ! multi-record
593  .false., & ! preserve case
594  .false., & ! layered
595  .false. & ! timeseries
596  )
597 
598  type(inputparamdefinitiontype), parameter :: &
599  gwtmwt_aux = inputparamdefinitiontype &
600  ( &
601  'GWT', & ! component
602  'MWT', & ! subcomponent
603  'PACKAGEDATA', & ! block
604  'AUX', & ! tag name
605  'AUX', & ! fortran variable
606  'DOUBLE1D', & ! type
607  'NAUX', & ! shape
608  'auxiliary variables', & ! longname
609  .false., & ! required
610  .false., & ! developmode
611  .true., & ! multi-record
612  .false., & ! preserve case
613  .false., & ! layered
614  .true. & ! timeseries
615  )
616 
617  type(inputparamdefinitiontype), parameter :: &
618  gwtmwt_boundname = inputparamdefinitiontype &
619  ( &
620  'GWT', & ! component
621  'MWT', & ! subcomponent
622  'PACKAGEDATA', & ! block
623  'BOUNDNAME', & ! tag name
624  'BOUNDNAME', & ! fortran variable
625  'STRING', & ! type
626  '', & ! shape
627  'well name', & ! longname
628  .false., & ! required
629  .false., & ! developmode
630  .true., & ! multi-record
631  .false., & ! preserve case
632  .false., & ! layered
633  .false. & ! timeseries
634  )
635 
636  type(inputparamdefinitiontype), parameter :: &
637  gwtmwt_ifno = inputparamdefinitiontype &
638  ( &
639  'GWT', & ! component
640  'MWT', & ! subcomponent
641  'PERIOD', & ! block
642  'IFNO', & ! tag name
643  'IFNO', & ! fortran variable
644  'INTEGER', & ! type
645  '', & ! shape
646  'well number for this entry', & ! longname
647  .true., & ! required
648  .false., & ! developmode
649  .true., & ! multi-record
650  .false., & ! preserve case
651  .false., & ! layered
652  .false. & ! timeseries
653  )
654 
655  type(inputparamdefinitiontype), parameter :: &
656  gwtmwt_status = inputparamdefinitiontype &
657  ( &
658  'GWT', & ! component
659  'MWT', & ! subcomponent
660  'PERIOD', & ! block
661  'STATUS', & ! tag name
662  'STATUS', & ! fortran variable
663  'STRING', & ! type
664  '', & ! shape
665  'well concentration status', & ! longname
666  .true., & ! required
667  .false., & ! developmode
668  .true., & ! multi-record
669  .false., & ! preserve case
670  .false., & ! layered
671  .false. & ! timeseries
672  )
673 
674  type(inputparamdefinitiontype), parameter :: &
675  gwtmwt_concentration = inputparamdefinitiontype &
676  ( &
677  'GWT', & ! component
678  'MWT', & ! subcomponent
679  'PERIOD', & ! block
680  'CONCENTRATION', & ! tag name
681  'CONCENTRATION', & ! fortran variable
682  'DOUBLE', & ! type
683  '', & ! shape
684  'well concentration', & ! longname
685  .true., & ! required
686  .false., & ! developmode
687  .true., & ! multi-record
688  .false., & ! preserve case
689  .false., & ! layered
690  .true. & ! timeseries
691  )
692 
693  type(inputparamdefinitiontype), parameter :: &
694  gwtmwt_rate = inputparamdefinitiontype &
695  ( &
696  'GWT', & ! component
697  'MWT', & ! subcomponent
698  'PERIOD', & ! block
699  'RATE', & ! tag name
700  'RATE', & ! fortran variable
701  'DOUBLE', & ! type
702  '', & ! shape
703  'well injection concentration', & ! longname
704  .true., & ! required
705  .false., & ! developmode
706  .true., & ! multi-record
707  .false., & ! preserve case
708  .false., & ! layered
709  .true. & ! timeseries
710  )
711 
712  type(inputparamdefinitiontype), parameter :: &
713  gwtmwt_auxiliaryrecord = inputparamdefinitiontype &
714  ( &
715  'GWT', & ! component
716  'MWT', & ! subcomponent
717  'PERIOD', & ! block
718  'AUXILIARYRECORD', & ! tag name
719  'AUXILIARYRECORD', & ! fortran variable
720  'RECORD AUXILIARY AUXNAME AUXVAL', & ! type
721  '', & ! shape
722  '', & ! longname
723  .true., & ! required
724  .false., & ! developmode
725  .true., & ! multi-record
726  .false., & ! preserve case
727  .false., & ! layered
728  .false. & ! timeseries
729  )
730 
731  type(inputparamdefinitiontype), parameter :: &
732  gwtmwt_period_auxiliary = inputparamdefinitiontype &
733  ( &
734  'GWT', & ! component
735  'MWT', & ! subcomponent
736  'PERIOD', & ! block
737  'AUXILIARY', & ! tag name
738  'PERIOD_AUXILIARY', & ! fortran variable
739  'KEYWORD', & ! type
740  '', & ! shape
741  '', & ! longname
742  .true., & ! required
743  .false., & ! developmode
744  .true., & ! multi-record
745  .false., & ! preserve case
746  .false., & ! layered
747  .false. & ! timeseries
748  )
749 
750  type(inputparamdefinitiontype), parameter :: &
751  gwtmwt_auxname = inputparamdefinitiontype &
752  ( &
753  'GWT', & ! component
754  'MWT', & ! subcomponent
755  'PERIOD', & ! block
756  'AUXNAME', & ! tag name
757  'AUXNAME', & ! fortran variable
758  'STRING', & ! type
759  '', & ! shape
760  '', & ! longname
761  .true., & ! required
762  .false., & ! developmode
763  .true., & ! multi-record
764  .false., & ! preserve case
765  .false., & ! layered
766  .false. & ! timeseries
767  )
768 
769  type(inputparamdefinitiontype), parameter :: &
770  gwtmwt_auxval = inputparamdefinitiontype &
771  ( &
772  'GWT', & ! component
773  'MWT', & ! subcomponent
774  'PERIOD', & ! block
775  'AUXVAL', & ! tag name
776  'AUXVAL', & ! fortran variable
777  'DOUBLE', & ! type
778  '', & ! shape
779  'auxiliary variable value', & ! longname
780  .true., & ! required
781  .false., & ! developmode
782  .true., & ! multi-record
783  .false., & ! preserve case
784  .false., & ! layered
785  .true. & ! timeseries
786  )
787 
788  type(inputparamdefinitiontype), parameter :: &
789  gwt_mwt_param_definitions(*) = &
790  [ &
791  gwtmwt_flow_pkg_name, &
792  gwtmwt_auxiliary, &
793  gwtmwt_fp_aux_name, &
794  gwtmwt_boundnames, &
795  gwtmwt_iprpak, &
796  gwtmwt_iprconc, &
797  gwtmwt_iprflow, &
798  gwtmwt_ipakcb, &
799  gwtmwt_conc_filerec, &
800  gwtmwt_options_concentration, &
801  gwtmwt_concfile, &
802  gwtmwt_budfilerec, &
803  gwtmwt_budget, &
804  gwtmwt_fileout, &
805  gwtmwt_budgetfile, &
806  gwtmwt_budcsvfilerec, &
807  gwtmwt_budgetcsv, &
808  gwtmwt_budgetcsvfile, &
809  gwtmwt_ts_filerecord, &
810  gwtmwt_ts6, &
811  gwtmwt_filein, &
812  gwtmwt_ts6_filename, &
813  gwtmwt_obs_filerecord, &
814  gwtmwt_obs6, &
815  gwtmwt_obs6_filename, &
816  gwtmwt_dev_nonexpanding, &
817  gwtmwt_packagedata_ifno, &
818  gwtmwt_strt, &
819  gwtmwt_aux, &
820  gwtmwt_boundname, &
821  gwtmwt_ifno, &
822  gwtmwt_status, &
823  gwtmwt_concentration, &
824  gwtmwt_rate, &
825  gwtmwt_auxiliaryrecord, &
826  gwtmwt_period_auxiliary, &
827  gwtmwt_auxname, &
828  gwtmwt_auxval &
829  ]
830 
831  type(inputparamdefinitiontype), parameter :: &
832  gwtmwt_packagedata = inputparamdefinitiontype &
833  ( &
834  'GWT', & ! component
835  'MWT', & ! subcomponent
836  'PACKAGEDATA', & ! block
837  'PACKAGEDATA', & ! tag name
838  'PACKAGEDATA', & ! fortran variable
839  'RECARRAY IFNO STRT AUX BOUNDNAME', & ! type
840  'NMAWWELLS', & ! shape
841  '', & ! longname
842  .true., & ! required
843  .false., & ! developmode
844  .false., & ! multi-record
845  .false., & ! preserve case
846  .false., & ! layered
847  .false. & ! timeseries
848  )
849 
850  type(inputparamdefinitiontype), parameter :: &
851  gwtmwt_mwtperioddata = inputparamdefinitiontype &
852  ( &
853  'GWT', & ! component
854  'MWT', & ! subcomponent
855  'PERIOD', & ! block
856  'MWTPERIODDATA', & ! tag name
857  'MWTPERIODDATA', & ! fortran variable
858  'RECARRAY IFNO MWTSETTING', & ! type
859  '', & ! shape
860  '', & ! longname
861  .true., & ! required
862  .false., & ! developmode
863  .false., & ! multi-record
864  .false., & ! preserve case
865  .false., & ! layered
866  .false. & ! timeseries
867  )
868 
869  type(inputparamdefinitiontype), parameter :: &
870  gwtmwt_mwtsetting = inputparamdefinitiontype &
871  ( &
872  'GWT', & ! component
873  'MWT', & ! subcomponent
874  'PERIOD', & ! block
875  'MWTSETTING', & ! tag name
876  'MWTSETTING', & ! fortran variable
877  'KEYSTRING STATUS CONCENTRATION RATE AUXILIARYRECORD', & ! type
878  '', & ! shape
879  '', & ! longname
880  .true., & ! required
881  .false., & ! developmode
882  .true., & ! multi-record
883  .false., & ! preserve case
884  .false., & ! layered
885  .false. & ! timeseries
886  )
887 
888  type(inputparamdefinitiontype), parameter :: &
889  gwt_mwt_aggregate_definitions(*) = &
890  [ &
891  gwtmwt_packagedata, &
892  gwtmwt_mwtperioddata, &
893  gwtmwt_mwtsetting &
894  ]
895 
896  type(inputblockdefinitiontype), parameter :: &
897  gwt_mwt_block_definitions(*) = &
898  [ &
899  inputblockdefinitiontype( &
900  'OPTIONS', & ! blockname
901  .false., & ! required
902  .false., & ! aggregate
903  .false. & ! block_variable
904  ), &
905  inputblockdefinitiontype( &
906  'PACKAGEDATA', & ! blockname
907  .true., & ! required
908  .true., & ! aggregate
909  .false. & ! block_variable
910  ), &
911  inputblockdefinitiontype( &
912  'PERIOD', & ! blockname
913  .true., & ! required
914  .true., & ! aggregate
915  .true. & ! block_variable
916  ) &
917  ]
918 
919 end module gwtmwtinputmodule
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
gwtmwtinputmodule::gwtmwt_period_auxiliary
type(inputparamdefinitiontype), parameter gwtmwt_period_auxiliary
Definition: gwt-mwtidm.f90:731
gwtmwtinputmodule::gwt_mwt_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwt_mwt_aggregate_definitions
Definition: gwt-mwtidm.f90:888
gwtmwtinputmodule::gwtmwt_auxval
type(inputparamdefinitiontype), parameter gwtmwt_auxval
Definition: gwt-mwtidm.f90:769
gwtmwtinputmodule::gwtmwt_filein
type(inputparamdefinitiontype), parameter gwtmwt_filein
Definition: gwt-mwtidm.f90:446
gwtmwtinputmodule::gwtmwt_budgetcsv
type(inputparamdefinitiontype), parameter gwtmwt_budgetcsv
Definition: gwt-mwtidm.f90:370
gwtmwtinputmodule::gwtmwt_status
type(inputparamdefinitiontype), parameter gwtmwt_status
Definition: gwt-mwtidm.f90:655
gwtmwtinputmodule::gwtmwt_ts6
type(inputparamdefinitiontype), parameter gwtmwt_ts6
Definition: gwt-mwtidm.f90:427
gwtmwtinputmodule::gwtmwt_auxname
type(inputparamdefinitiontype), parameter gwtmwt_auxname
Definition: gwt-mwtidm.f90:750
gwtmwtinputmodule::gwt_mwt_subpackages
character(len=16), dimension(*), parameter, public gwt_mwt_subpackages
Definition: gwt-mwtidm.f90:59
gwtmwtinputmodule::gwtmwt_obs6_filename
type(inputparamdefinitiontype), parameter gwtmwt_obs6_filename
Definition: gwt-mwtidm.f90:522
gwtmwtinputmodule::gwtmwt_budget
type(inputparamdefinitiontype), parameter gwtmwt_budget
Definition: gwt-mwtidm.f90:294
gwtmwtinputmodule::gwtmwt_conc_filerec
type(inputparamdefinitiontype), parameter gwtmwt_conc_filerec
Definition: gwt-mwtidm.f90:218
gwtmwtinputmodule::gwtmwt_aux
type(inputparamdefinitiontype), parameter gwtmwt_aux
Definition: gwt-mwtidm.f90:598
gwtmwtinputmodule::gwtmwt_iprflow
type(inputparamdefinitiontype), parameter gwtmwt_iprflow
Definition: gwt-mwtidm.f90:180
gwtmwtinputmodule::gwtmwt_iprpak
type(inputparamdefinitiontype), parameter gwtmwt_iprpak
Definition: gwt-mwtidm.f90:142
gwtmwtinputmodule::gwtmwt_obs6
type(inputparamdefinitiontype), parameter gwtmwt_obs6
Definition: gwt-mwtidm.f90:503
gwtmwtinputmodule::gwtmwt_iprconc
type(inputparamdefinitiontype), parameter gwtmwt_iprconc
Definition: gwt-mwtidm.f90:161
gwtmwtinputmodule::gwtmwt_budfilerec
type(inputparamdefinitiontype), parameter gwtmwt_budfilerec
Definition: gwt-mwtidm.f90:275
gwtmwtinputmodule::gwtmwt_ipakcb
type(inputparamdefinitiontype), parameter gwtmwt_ipakcb
Definition: gwt-mwtidm.f90:199
gwtmwtinputmodule::gwt_mwt_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public gwt_mwt_block_definitions
Definition: gwt-mwtidm.f90:896
gwtmwtinputmodule::gwtmwt_boundnames
type(inputparamdefinitiontype), parameter gwtmwt_boundnames
Definition: gwt-mwtidm.f90:123
gwtmwtinputmodule::gwtmwt_obs_filerecord
type(inputparamdefinitiontype), parameter gwtmwt_obs_filerecord
Definition: gwt-mwtidm.f90:484
gwtmwtinputmodule::gwtmwt_fp_aux_name
type(inputparamdefinitiontype), parameter gwtmwt_fp_aux_name
Definition: gwt-mwtidm.f90:103
gwtmwtinputmodule::gwtmwt_concfile
type(inputparamdefinitiontype), parameter gwtmwt_concfile
Definition: gwt-mwtidm.f90:256
gwtmwtinputmodule::gwtmwt_ts6_filename
type(inputparamdefinitiontype), parameter gwtmwt_ts6_filename
Definition: gwt-mwtidm.f90:465
gwtmwtinputmodule::gwtmwt_auxiliary
type(inputparamdefinitiontype), parameter gwtmwt_auxiliary
Definition: gwt-mwtidm.f90:84
gwtmwtinputmodule::gwtmwt_rate
type(inputparamdefinitiontype), parameter gwtmwt_rate
Definition: gwt-mwtidm.f90:693
gwtmwtinputmodule::gwtmwt_options_concentration
type(inputparamdefinitiontype), parameter gwtmwt_options_concentration
Definition: gwt-mwtidm.f90:237
gwtmwtinputmodule::gwtmwt_mwtsetting
type(inputparamdefinitiontype), parameter gwtmwt_mwtsetting
Definition: gwt-mwtidm.f90:869
gwtmwtinputmodule::gwtmwt_fileout
type(inputparamdefinitiontype), parameter gwtmwt_fileout
Definition: gwt-mwtidm.f90:313
gwtmwtinputmodule::gwtmwt_auxiliaryrecord
type(inputparamdefinitiontype), parameter gwtmwt_auxiliaryrecord
Definition: gwt-mwtidm.f90:712
gwtmwtinputmodule::gwtmwt_strt
type(inputparamdefinitiontype), parameter gwtmwt_strt
Definition: gwt-mwtidm.f90:579
gwtmwtinputmodule::gwtmwt_ifno
type(inputparamdefinitiontype), parameter gwtmwt_ifno
Definition: gwt-mwtidm.f90:636
gwtmwtinputmodule::gwtmwt_dev_nonexpanding
type(inputparamdefinitiontype), parameter gwtmwt_dev_nonexpanding
Definition: gwt-mwtidm.f90:541
gwtmwtinputmodule::gwtmwt_flow_pkg_name
type(inputparamdefinitiontype), parameter gwtmwt_flow_pkg_name
Definition: gwt-mwtidm.f90:65
gwtmwtinputmodule::gwt_mwt_multi_package
logical, public gwt_mwt_multi_package
Definition: gwt-mwtidm.f90:56
gwtmwtinputmodule::gwtmwt_packagedata
type(inputparamdefinitiontype), parameter gwtmwt_packagedata
Definition: gwt-mwtidm.f90:831
gwtmwtinputmodule::gwtmwt_mwtperioddata
type(inputparamdefinitiontype), parameter gwtmwt_mwtperioddata
Definition: gwt-mwtidm.f90:850
gwtmwtinputmodule::gwtmwt_packagedata_ifno
type(inputparamdefinitiontype), parameter gwtmwt_packagedata_ifno
Definition: gwt-mwtidm.f90:560
gwtmwtinputmodule::gwtmwt_concentration
type(inputparamdefinitiontype), parameter gwtmwt_concentration
Definition: gwt-mwtidm.f90:674
gwtmwtinputmodule::gwtmwt_budgetfile
type(inputparamdefinitiontype), parameter gwtmwt_budgetfile
Definition: gwt-mwtidm.f90:332
gwtmwtinputmodule::gwtmwt_budcsvfilerec
type(inputparamdefinitiontype), parameter gwtmwt_budcsvfilerec
Definition: gwt-mwtidm.f90:351
gwtmwtinputmodule::gwtmwt_ts_filerecord
type(inputparamdefinitiontype), parameter gwtmwt_ts_filerecord
Definition: gwt-mwtidm.f90:408
gwtmwtinputmodule::gwt_mwt_is_advanced
logical, public gwt_mwt_is_advanced
Definition: gwt-mwtidm.f90:57
gwtmwtinputmodule::gwtmwt_boundname
type(inputparamdefinitiontype), parameter gwtmwt_boundname
Definition: gwt-mwtidm.f90:617
gwtmwtinputmodule::gwt_mwt_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwt_mwt_param_definitions
Definition: gwt-mwtidm.f90:788
gwtmwtinputmodule::gwtmwt_budgetcsvfile
type(inputparamdefinitiontype), parameter gwtmwt_budgetcsvfile
Definition: gwt-mwtidm.f90:389
inputdefinitionmodule
Input definition module.
Definition: InputDefinition.f90:7
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