MODFLOW 6  version 6.5.0.dev2
MODFLOW 6 Code Documentation
exg-gwfgwfidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
3  use constantsmodule, only: lenvarname
6  private
12 
14  logical :: auxiliary = .false.
15  logical :: boundnames = .false.
16  logical :: iprpak = .false.
17  logical :: iprflow = .false.
18  logical :: ipakcb = .false.
19  logical :: cell_averaging = .false.
20  logical :: cvoptions = .false.
21  logical :: variablecv = .false.
22  logical :: dewatered = .false.
23  logical :: newton = .false.
24  logical :: xt3d = .false.
25  logical :: gnc_filerecord = .false.
26  logical :: filein = .false.
27  logical :: gnc6 = .false.
28  logical :: gnc6_filename = .false.
29  logical :: mvr_filerecord = .false.
30  logical :: mvr6 = .false.
31  logical :: mvr6_filename = .false.
32  logical :: obs_filerecord = .false.
33  logical :: obs6 = .false.
34  logical :: obs6_filename = .false.
35  logical :: dev_ifmod_on = .false.
36  logical :: nexg = .false.
37  logical :: cellidm1 = .false.
38  logical :: cellidm2 = .false.
39  logical :: ihc = .false.
40  logical :: cl1 = .false.
41  logical :: cl2 = .false.
42  logical :: hwva = .false.
43  logical :: auxvar = .false.
44  logical :: boundname = .false.
46 
47  logical :: exg_gwfgwf_multi_package = .true.
48 
49  type(inputparamdefinitiontype), parameter :: &
51  ( &
52  'EXG', & ! component
53  'GWFGWF', & ! subcomponent
54  'OPTIONS', & ! block
55  'AUXILIARY', & ! tag name
56  'AUXILIARY', & ! fortran variable
57  'STRING', & ! type
58  'NAUX', & ! shape
59  .false., & ! required
60  .false., & ! multi-record
61  .false., & ! preserve case
62  .false., & ! layered
63  .false. & ! timeseries
64  )
65 
66  type(inputparamdefinitiontype), parameter :: &
68  ( &
69  'EXG', & ! component
70  'GWFGWF', & ! subcomponent
71  'OPTIONS', & ! block
72  'BOUNDNAMES', & ! tag name
73  'BOUNDNAMES', & ! fortran variable
74  'KEYWORD', & ! type
75  '', & ! shape
76  .false., & ! required
77  .false., & ! multi-record
78  .false., & ! preserve case
79  .false., & ! layered
80  .false. & ! timeseries
81  )
82 
83  type(inputparamdefinitiontype), parameter :: &
85  ( &
86  'EXG', & ! component
87  'GWFGWF', & ! subcomponent
88  'OPTIONS', & ! block
89  'PRINT_INPUT', & ! tag name
90  'IPRPAK', & ! fortran variable
91  'KEYWORD', & ! type
92  '', & ! shape
93  .false., & ! required
94  .false., & ! multi-record
95  .false., & ! preserve case
96  .false., & ! layered
97  .false. & ! timeseries
98  )
99 
100  type(inputparamdefinitiontype), parameter :: &
102  ( &
103  'EXG', & ! component
104  'GWFGWF', & ! subcomponent
105  'OPTIONS', & ! block
106  'PRINT_FLOWS', & ! tag name
107  'IPRFLOW', & ! fortran variable
108  'KEYWORD', & ! type
109  '', & ! shape
110  .false., & ! required
111  .false., & ! multi-record
112  .false., & ! preserve case
113  .false., & ! layered
114  .false. & ! timeseries
115  )
116 
117  type(inputparamdefinitiontype), parameter :: &
119  ( &
120  'EXG', & ! component
121  'GWFGWF', & ! subcomponent
122  'OPTIONS', & ! block
123  'SAVE_FLOWS', & ! tag name
124  'IPAKCB', & ! fortran variable
125  'KEYWORD', & ! type
126  '', & ! shape
127  .false., & ! required
128  .false., & ! multi-record
129  .false., & ! preserve case
130  .false., & ! layered
131  .false. & ! timeseries
132  )
133 
134  type(inputparamdefinitiontype), parameter :: &
136  ( &
137  'EXG', & ! component
138  'GWFGWF', & ! subcomponent
139  'OPTIONS', & ! block
140  'CELL_AVERAGING', & ! tag name
141  'CELL_AVERAGING', & ! fortran variable
142  'STRING', & ! type
143  '', & ! shape
144  .false., & ! required
145  .false., & ! multi-record
146  .false., & ! preserve case
147  .false., & ! layered
148  .false. & ! timeseries
149  )
150 
151  type(inputparamdefinitiontype), parameter :: &
153  ( &
154  'EXG', & ! component
155  'GWFGWF', & ! subcomponent
156  'OPTIONS', & ! block
157  'CVOPTIONS', & ! tag name
158  'CVOPTIONS', & ! fortran variable
159  'RECORD VARIABLECV DEWATERED', & ! type
160  '', & ! shape
161  .false., & ! required
162  .false., & ! multi-record
163  .false., & ! preserve case
164  .false., & ! layered
165  .false. & ! timeseries
166  )
167 
168  type(inputparamdefinitiontype), parameter :: &
170  ( &
171  'EXG', & ! component
172  'GWFGWF', & ! subcomponent
173  'OPTIONS', & ! block
174  'VARIABLECV', & ! tag name
175  'VARIABLECV', & ! fortran variable
176  'KEYWORD', & ! type
177  '', & ! shape
178  .true., & ! required
179  .true., & ! multi-record
180  .false., & ! preserve case
181  .false., & ! layered
182  .false. & ! timeseries
183  )
184 
185  type(inputparamdefinitiontype), parameter :: &
187  ( &
188  'EXG', & ! component
189  'GWFGWF', & ! subcomponent
190  'OPTIONS', & ! block
191  'DEWATERED', & ! tag name
192  'DEWATERED', & ! fortran variable
193  'KEYWORD', & ! type
194  '', & ! shape
195  .false., & ! required
196  .true., & ! multi-record
197  .false., & ! preserve case
198  .false., & ! layered
199  .false. & ! timeseries
200  )
201 
202  type(inputparamdefinitiontype), parameter :: &
204  ( &
205  'EXG', & ! component
206  'GWFGWF', & ! subcomponent
207  'OPTIONS', & ! block
208  'NEWTON', & ! tag name
209  'NEWTON', & ! fortran variable
210  'KEYWORD', & ! type
211  '', & ! shape
212  .false., & ! required
213  .false., & ! multi-record
214  .false., & ! preserve case
215  .false., & ! layered
216  .false. & ! timeseries
217  )
218 
219  type(inputparamdefinitiontype), parameter :: &
221  ( &
222  'EXG', & ! component
223  'GWFGWF', & ! subcomponent
224  'OPTIONS', & ! block
225  'XT3D', & ! tag name
226  'XT3D', & ! fortran variable
227  'KEYWORD', & ! type
228  '', & ! shape
229  .false., & ! required
230  .false., & ! multi-record
231  .false., & ! preserve case
232  .false., & ! layered
233  .false. & ! timeseries
234  )
235 
236  type(inputparamdefinitiontype), parameter :: &
238  ( &
239  'EXG', & ! component
240  'GWFGWF', & ! subcomponent
241  'OPTIONS', & ! block
242  'GNC_FILERECORD', & ! tag name
243  'GNC_FILERECORD', & ! fortran variable
244  'RECORD GNC6 FILEIN GNC6_FILENAME', & ! type
245  '', & ! shape
246  .false., & ! required
247  .false., & ! multi-record
248  .false., & ! preserve case
249  .false., & ! layered
250  .false. & ! timeseries
251  )
252 
253  type(inputparamdefinitiontype), parameter :: &
255  ( &
256  'EXG', & ! component
257  'GWFGWF', & ! subcomponent
258  'OPTIONS', & ! block
259  'FILEIN', & ! tag name
260  'FILEIN', & ! fortran variable
261  'KEYWORD', & ! type
262  '', & ! shape
263  .true., & ! required
264  .true., & ! multi-record
265  .false., & ! preserve case
266  .false., & ! layered
267  .false. & ! timeseries
268  )
269 
270  type(inputparamdefinitiontype), parameter :: &
272  ( &
273  'EXG', & ! component
274  'GWFGWF', & ! subcomponent
275  'OPTIONS', & ! block
276  'GNC6', & ! tag name
277  'GNC6', & ! fortran variable
278  'KEYWORD', & ! type
279  '', & ! shape
280  .true., & ! required
281  .true., & ! multi-record
282  .false., & ! preserve case
283  .false., & ! layered
284  .false. & ! timeseries
285  )
286 
287  type(inputparamdefinitiontype), parameter :: &
289  ( &
290  'EXG', & ! component
291  'GWFGWF', & ! subcomponent
292  'OPTIONS', & ! block
293  'GNC6_FILENAME', & ! tag name
294  'GNC6_FILENAME', & ! fortran variable
295  'STRING', & ! type
296  '', & ! shape
297  .true., & ! required
298  .true., & ! multi-record
299  .true., & ! preserve case
300  .false., & ! layered
301  .false. & ! timeseries
302  )
303 
304  type(inputparamdefinitiontype), parameter :: &
306  ( &
307  'EXG', & ! component
308  'GWFGWF', & ! subcomponent
309  'OPTIONS', & ! block
310  'MVR_FILERECORD', & ! tag name
311  'MVR_FILERECORD', & ! fortran variable
312  'RECORD MVR6 FILEIN MVR6_FILENAME', & ! type
313  '', & ! shape
314  .false., & ! required
315  .false., & ! multi-record
316  .false., & ! preserve case
317  .false., & ! layered
318  .false. & ! timeseries
319  )
320 
321  type(inputparamdefinitiontype), parameter :: &
323  ( &
324  'EXG', & ! component
325  'GWFGWF', & ! subcomponent
326  'OPTIONS', & ! block
327  'MVR6', & ! tag name
328  'MVR6', & ! fortran variable
329  'KEYWORD', & ! type
330  '', & ! shape
331  .true., & ! required
332  .true., & ! multi-record
333  .false., & ! preserve case
334  .false., & ! layered
335  .false. & ! timeseries
336  )
337 
338  type(inputparamdefinitiontype), parameter :: &
340  ( &
341  'EXG', & ! component
342  'GWFGWF', & ! subcomponent
343  'OPTIONS', & ! block
344  'MVR6_FILENAME', & ! tag name
345  'MVR6_FILENAME', & ! fortran variable
346  'STRING', & ! type
347  '', & ! shape
348  .true., & ! required
349  .true., & ! multi-record
350  .true., & ! preserve case
351  .false., & ! layered
352  .false. & ! timeseries
353  )
354 
355  type(inputparamdefinitiontype), parameter :: &
357  ( &
358  'EXG', & ! component
359  'GWFGWF', & ! subcomponent
360  'OPTIONS', & ! block
361  'OBS_FILERECORD', & ! tag name
362  'OBS_FILERECORD', & ! fortran variable
363  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
364  '', & ! shape
365  .false., & ! required
366  .false., & ! multi-record
367  .false., & ! preserve case
368  .false., & ! layered
369  .false. & ! timeseries
370  )
371 
372  type(inputparamdefinitiontype), parameter :: &
374  ( &
375  'EXG', & ! component
376  'GWFGWF', & ! subcomponent
377  'OPTIONS', & ! block
378  'OBS6', & ! tag name
379  'OBS6', & ! fortran variable
380  'KEYWORD', & ! type
381  '', & ! shape
382  .true., & ! required
383  .true., & ! multi-record
384  .false., & ! preserve case
385  .false., & ! layered
386  .false. & ! timeseries
387  )
388 
389  type(inputparamdefinitiontype), parameter :: &
391  ( &
392  'EXG', & ! component
393  'GWFGWF', & ! subcomponent
394  'OPTIONS', & ! block
395  'OBS6_FILENAME', & ! tag name
396  'OBS6_FILENAME', & ! fortran variable
397  'STRING', & ! type
398  '', & ! shape
399  .true., & ! required
400  .true., & ! multi-record
401  .true., & ! preserve case
402  .false., & ! layered
403  .false. & ! timeseries
404  )
405 
406  type(inputparamdefinitiontype), parameter :: &
408  ( &
409  'EXG', & ! component
410  'GWFGWF', & ! subcomponent
411  'OPTIONS', & ! block
412  'DEV_INTERFACEMODEL_ON', & ! tag name
413  'DEV_IFMOD_ON', & ! fortran variable
414  'KEYWORD', & ! type
415  '', & ! shape
416  .false., & ! required
417  .false., & ! multi-record
418  .false., & ! preserve case
419  .false., & ! layered
420  .false. & ! timeseries
421  )
422 
423  type(inputparamdefinitiontype), parameter :: &
425  ( &
426  'EXG', & ! component
427  'GWFGWF', & ! subcomponent
428  'DIMENSIONS', & ! block
429  'NEXG', & ! tag name
430  'NEXG', & ! fortran variable
431  'INTEGER', & ! type
432  '', & ! shape
433  .true., & ! required
434  .false., & ! multi-record
435  .false., & ! preserve case
436  .false., & ! layered
437  .false. & ! timeseries
438  )
439 
440  type(inputparamdefinitiontype), parameter :: &
442  ( &
443  'EXG', & ! component
444  'GWFGWF', & ! subcomponent
445  'EXCHANGEDATA', & ! block
446  'CELLIDM1', & ! tag name
447  'CELLIDM1', & ! fortran variable
448  'INTEGER1D', & ! type
449  'NCELLDIM', & ! shape
450  .true., & ! required
451  .true., & ! multi-record
452  .false., & ! preserve case
453  .false., & ! layered
454  .false. & ! timeseries
455  )
456 
457  type(inputparamdefinitiontype), parameter :: &
459  ( &
460  'EXG', & ! component
461  'GWFGWF', & ! subcomponent
462  'EXCHANGEDATA', & ! block
463  'CELLIDM2', & ! tag name
464  'CELLIDM2', & ! fortran variable
465  'INTEGER1D', & ! type
466  'NCELLDIM', & ! shape
467  .true., & ! required
468  .true., & ! multi-record
469  .false., & ! preserve case
470  .false., & ! layered
471  .false. & ! timeseries
472  )
473 
474  type(inputparamdefinitiontype), parameter :: &
476  ( &
477  'EXG', & ! component
478  'GWFGWF', & ! subcomponent
479  'EXCHANGEDATA', & ! block
480  'IHC', & ! tag name
481  'IHC', & ! fortran variable
482  'INTEGER', & ! type
483  '', & ! shape
484  .true., & ! required
485  .true., & ! multi-record
486  .false., & ! preserve case
487  .false., & ! layered
488  .false. & ! timeseries
489  )
490 
491  type(inputparamdefinitiontype), parameter :: &
493  ( &
494  'EXG', & ! component
495  'GWFGWF', & ! subcomponent
496  'EXCHANGEDATA', & ! block
497  'CL1', & ! tag name
498  'CL1', & ! fortran variable
499  'DOUBLE', & ! type
500  '', & ! shape
501  .true., & ! required
502  .true., & ! multi-record
503  .false., & ! preserve case
504  .false., & ! layered
505  .false. & ! timeseries
506  )
507 
508  type(inputparamdefinitiontype), parameter :: &
510  ( &
511  'EXG', & ! component
512  'GWFGWF', & ! subcomponent
513  'EXCHANGEDATA', & ! block
514  'CL2', & ! tag name
515  'CL2', & ! fortran variable
516  'DOUBLE', & ! type
517  '', & ! shape
518  .true., & ! required
519  .true., & ! multi-record
520  .false., & ! preserve case
521  .false., & ! layered
522  .false. & ! timeseries
523  )
524 
525  type(inputparamdefinitiontype), parameter :: &
527  ( &
528  'EXG', & ! component
529  'GWFGWF', & ! subcomponent
530  'EXCHANGEDATA', & ! block
531  'HWVA', & ! tag name
532  'HWVA', & ! fortran variable
533  'DOUBLE', & ! type
534  '', & ! shape
535  .true., & ! required
536  .true., & ! multi-record
537  .false., & ! preserve case
538  .false., & ! layered
539  .false. & ! timeseries
540  )
541 
542  type(inputparamdefinitiontype), parameter :: &
544  ( &
545  'EXG', & ! component
546  'GWFGWF', & ! subcomponent
547  'EXCHANGEDATA', & ! block
548  'AUX', & ! tag name
549  'AUXVAR', & ! fortran variable
550  'DOUBLE1D', & ! type
551  'NAUX', & ! shape
552  .false., & ! required
553  .true., & ! multi-record
554  .false., & ! preserve case
555  .false., & ! layered
556  .false. & ! timeseries
557  )
558 
559  type(inputparamdefinitiontype), parameter :: &
561  ( &
562  'EXG', & ! component
563  'GWFGWF', & ! subcomponent
564  'EXCHANGEDATA', & ! block
565  'BOUNDNAME', & ! tag name
566  'BOUNDNAME', & ! fortran variable
567  'STRING', & ! type
568  '', & ! shape
569  .false., & ! required
570  .true., & ! multi-record
571  .false., & ! preserve case
572  .false., & ! layered
573  .false. & ! timeseries
574  )
575 
576  type(inputparamdefinitiontype), parameter :: &
578  [ &
589  exggwfgwf_xt3d, &
592  exggwfgwf_gnc6, &
595  exggwfgwf_mvr6, &
598  exggwfgwf_obs6, &
601  exggwfgwf_nexg, &
604  exggwfgwf_ihc, &
605  exggwfgwf_cl1, &
606  exggwfgwf_cl2, &
607  exggwfgwf_hwva, &
610  ]
611 
612  type(inputparamdefinitiontype), parameter :: &
614  ( &
615  'EXG', & ! component
616  'GWFGWF', & ! subcomponent
617  'EXCHANGEDATA', & ! block
618  'EXCHANGEDATA', & ! tag name
619  'EXCHANGEDATA', & ! fortran variable
620  'RECARRAY CELLIDM1 CELLIDM2 IHC CL1 CL2 HWVA AUX BOUNDNAME', & ! type
621  'NEXG', & ! shape
622  .true., & ! required
623  .false., & ! multi-record
624  .false., & ! preserve case
625  .false., & ! layered
626  .false. & ! timeseries
627  )
628 
629  type(inputparamdefinitiontype), parameter :: &
631  [ &
633  ]
634 
635  type(inputblockdefinitiontype), parameter :: &
637  [ &
639  'OPTIONS', & ! blockname
640  .false., & ! required
641  .false., & ! aggregate
642  .false. & ! block_variable
643  ), &
645  'DIMENSIONS', & ! blockname
646  .true., & ! required
647  .false., & ! aggregate
648  .false. & ! block_variable
649  ), &
651  'EXCHANGEDATA', & ! blockname
652  .true., & ! required
653  .true., & ! aggregate
654  .false. & ! block_variable
655  ) &
656  ]
657 
658 end module exggwfgwfinputmodule
This module contains simulation constants.
Definition: Constants.f90:9
integer(i4b), parameter lenvarname
maximum length of a variable name
Definition: Constants.f90:17
type(inputparamdefinitiontype), parameter exggwfgwf_cell_averaging
type(inputparamdefinitiontype), parameter exggwfgwf_mvr6
type(inputparamdefinitiontype), parameter exggwfgwf_exchangedata
type(inputparamdefinitiontype), parameter exggwfgwf_gnc6
type(inputparamdefinitiontype), parameter exggwfgwf_obs6
type(inputparamdefinitiontype), parameter exggwfgwf_boundnames
type(inputparamdefinitiontype), parameter exggwfgwf_auxvar
type(inputparamdefinitiontype), parameter exggwfgwf_iprpak
type(inputparamdefinitiontype), parameter exggwfgwf_gnc6_filename
type(inputparamdefinitiontype), parameter exggwfgwf_dev_ifmod_on
type(inputparamdefinitiontype), parameter exggwfgwf_variablecv
type(inputparamdefinitiontype), parameter exggwfgwf_cellidm1
type(inputparamdefinitiontype), parameter exggwfgwf_dewatered
type(inputparamdefinitiontype), parameter exggwfgwf_xt3d
type(inputparamdefinitiontype), parameter exggwfgwf_cl1
type(inputblockdefinitiontype), dimension(*), parameter, public exg_gwfgwf_block_definitions
type(inputparamdefinitiontype), parameter exggwfgwf_ipakcb
type(inputparamdefinitiontype), parameter exggwfgwf_obs6_filename
type(inputparamdefinitiontype), parameter exggwfgwf_gnc_filerecord
logical, public exg_gwfgwf_multi_package
type(inputparamdefinitiontype), dimension(*), parameter, public exg_gwfgwf_param_definitions
type(inputparamdefinitiontype), parameter exggwfgwf_obs_filerecord
type(inputparamdefinitiontype), parameter exggwfgwf_cvoptions
type(inputparamdefinitiontype), parameter exggwfgwf_mvr_filerecord
type(inputparamdefinitiontype), parameter exggwfgwf_cellidm2
type(inputparamdefinitiontype), parameter exggwfgwf_auxiliary
type(inputparamdefinitiontype), parameter exggwfgwf_ihc
type(inputparamdefinitiontype), parameter exggwfgwf_filein
type(inputparamdefinitiontype), parameter exggwfgwf_hwva
type(inputparamdefinitiontype), parameter exggwfgwf_mvr6_filename
type(inputparamdefinitiontype), dimension(*), parameter, public exg_gwfgwf_aggregate_definitions
type(inputparamdefinitiontype), parameter exggwfgwf_boundname
type(inputparamdefinitiontype), parameter exggwfgwf_iprflow
type(inputparamdefinitiontype), parameter exggwfgwf_nexg
type(inputparamdefinitiontype), parameter exggwfgwf_newton
type(inputparamdefinitiontype), parameter exggwfgwf_cl2
This module contains the InputDefinitionModule.