MODFLOW 6  version 6.9.0.dev0
USGS Modular Hydrologic Model
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
14 
16  logical :: auxiliary = .false.
17  logical :: boundnames = .false.
18  logical :: iprpak = .false.
19  logical :: iprflow = .false.
20  logical :: ipakcb = .false.
21  logical :: cell_averaging = .false.
22  logical :: cvoptions = .false.
23  logical :: variablecv = .false.
24  logical :: dewatered = .false.
25  logical :: newton = .false.
26  logical :: xt3d = .false.
27  logical :: gnc_filerecord = .false.
28  logical :: filein = .false.
29  logical :: gnc6 = .false.
30  logical :: gnc6_filename = .false.
31  logical :: mvr_filerecord = .false.
32  logical :: mvr6 = .false.
33  logical :: mvr6_filename = .false.
34  logical :: obs_filerecord = .false.
35  logical :: obs6 = .false.
36  logical :: obs6_filename = .false.
37  logical :: dev_ifmod_on = .false.
38  logical :: nexg = .false.
39  logical :: cellidm1 = .false.
40  logical :: cellidm2 = .false.
41  logical :: ihc = .false.
42  logical :: cl1 = .false.
43  logical :: cl2 = .false.
44  logical :: hwva = .false.
45  logical :: auxvar = .false.
46  logical :: boundname = .false.
48 
49  logical :: exg_gwfgwf_multi_package = .true.
50  logical :: exg_gwfgwf_is_advanced = .false.
51 
52  character(len=16), parameter :: &
54  [ &
55  ' ' &
56  ]
57 
58  type(inputparamdefinitiontype), parameter :: &
60  ( &
61  'EXG', & ! component
62  'GWFGWF', & ! subcomponent
63  'OPTIONS', & ! block
64  'AUXILIARY', & ! tag name
65  'AUXILIARY', & ! fortran variable
66  'STRING', & ! type
67  'NAUX', & ! shape
68  'keyword to specify aux variables', & ! longname
69  .false., & ! required
70  .false., & ! developmode
71  .false., & ! multi-record
72  .false., & ! preserve case
73  .false., & ! layered
74  .false. & ! timeseries
75  )
76 
77  type(inputparamdefinitiontype), parameter :: &
79  ( &
80  'EXG', & ! component
81  'GWFGWF', & ! subcomponent
82  'OPTIONS', & ! block
83  'BOUNDNAMES', & ! tag name
84  'BOUNDNAMES', & ! fortran variable
85  'KEYWORD', & ! type
86  '', & ! shape
87  '', & ! longname
88  .false., & ! required
89  .false., & ! developmode
90  .false., & ! multi-record
91  .false., & ! preserve case
92  .false., & ! layered
93  .false. & ! timeseries
94  )
95 
96  type(inputparamdefinitiontype), parameter :: &
98  ( &
99  'EXG', & ! component
100  'GWFGWF', & ! subcomponent
101  'OPTIONS', & ! block
102  'PRINT_INPUT', & ! tag name
103  'IPRPAK', & ! fortran variable
104  'KEYWORD', & ! type
105  '', & ! shape
106  'keyword to print input to list file', & ! longname
107  .false., & ! required
108  .false., & ! developmode
109  .false., & ! multi-record
110  .false., & ! preserve case
111  .false., & ! layered
112  .false. & ! timeseries
113  )
114 
115  type(inputparamdefinitiontype), parameter :: &
117  ( &
118  'EXG', & ! component
119  'GWFGWF', & ! subcomponent
120  'OPTIONS', & ! block
121  'PRINT_FLOWS', & ! tag name
122  'IPRFLOW', & ! fortran variable
123  'KEYWORD', & ! type
124  '', & ! shape
125  'keyword to print gwfgwf flows to list file', & ! longname
126  .false., & ! required
127  .false., & ! developmode
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  'SAVE_FLOWS', & ! tag name
141  'IPAKCB', & ! fortran variable
142  'KEYWORD', & ! type
143  '', & ! shape
144  'keyword to save GWFGWF flows', & ! longname
145  .false., & ! required
146  .false., & ! developmode
147  .false., & ! multi-record
148  .false., & ! preserve case
149  .false., & ! layered
150  .false. & ! timeseries
151  )
152 
153  type(inputparamdefinitiontype), parameter :: &
155  ( &
156  'EXG', & ! component
157  'GWFGWF', & ! subcomponent
158  'OPTIONS', & ! block
159  'CELL_AVERAGING', & ! tag name
160  'CELL_AVERAGING', & ! fortran variable
161  'STRING', & ! type
162  '', & ! shape
163  'conductance weighting option', & ! longname
164  .false., & ! required
165  .false., & ! developmode
166  .false., & ! multi-record
167  .false., & ! preserve case
168  .false., & ! layered
169  .false. & ! timeseries
170  )
171 
172  type(inputparamdefinitiontype), parameter :: &
174  ( &
175  'EXG', & ! component
176  'GWFGWF', & ! subcomponent
177  'OPTIONS', & ! block
178  'CVOPTIONS', & ! tag name
179  'CVOPTIONS', & ! fortran variable
180  'RECORD VARIABLECV DEWATERED', & ! type
181  '', & ! shape
182  'vertical conductance options', & ! longname
183  .false., & ! required
184  .false., & ! developmode
185  .false., & ! multi-record
186  .false., & ! preserve case
187  .false., & ! layered
188  .false. & ! timeseries
189  )
190 
191  type(inputparamdefinitiontype), parameter :: &
193  ( &
194  'EXG', & ! component
195  'GWFGWF', & ! subcomponent
196  'OPTIONS', & ! block
197  'VARIABLECV', & ! tag name
198  'VARIABLECV', & ! fortran variable
199  'KEYWORD', & ! type
200  '', & ! shape
201  'keyword to activate VARIABLECV option', & ! longname
202  .true., & ! required
203  .false., & ! developmode
204  .true., & ! multi-record
205  .false., & ! preserve case
206  .false., & ! layered
207  .false. & ! timeseries
208  )
209 
210  type(inputparamdefinitiontype), parameter :: &
212  ( &
213  'EXG', & ! component
214  'GWFGWF', & ! subcomponent
215  'OPTIONS', & ! block
216  'DEWATERED', & ! tag name
217  'DEWATERED', & ! fortran variable
218  'KEYWORD', & ! type
219  '', & ! shape
220  'keyword to activate DEWATERED option', & ! longname
221  .false., & ! required
222  .false., & ! developmode
223  .true., & ! multi-record
224  .false., & ! preserve case
225  .false., & ! layered
226  .false. & ! timeseries
227  )
228 
229  type(inputparamdefinitiontype), parameter :: &
231  ( &
232  'EXG', & ! component
233  'GWFGWF', & ! subcomponent
234  'OPTIONS', & ! block
235  'NEWTON', & ! tag name
236  'NEWTON', & ! fortran variable
237  'KEYWORD', & ! type
238  '', & ! shape
239  'keyword to activate Newton-Raphson', & ! longname
240  .false., & ! required
241  .false., & ! developmode
242  .false., & ! multi-record
243  .false., & ! preserve case
244  .false., & ! layered
245  .false. & ! timeseries
246  )
247 
248  type(inputparamdefinitiontype), parameter :: &
250  ( &
251  'EXG', & ! component
252  'GWFGWF', & ! subcomponent
253  'OPTIONS', & ! block
254  'XT3D', & ! tag name
255  'XT3D', & ! fortran variable
256  'KEYWORD', & ! type
257  '', & ! shape
258  'keyword to activate XT3D', & ! longname
259  .false., & ! required
260  .false., & ! developmode
261  .false., & ! multi-record
262  .false., & ! preserve case
263  .false., & ! layered
264  .false. & ! timeseries
265  )
266 
267  type(inputparamdefinitiontype), parameter :: &
269  ( &
270  'EXG', & ! component
271  'GWFGWF', & ! subcomponent
272  'OPTIONS', & ! block
273  'GNC_FILERECORD', & ! tag name
274  'GNC_FILERECORD', & ! fortran variable
275  'RECORD GNC6 FILEIN GNC6_FILENAME', & ! type
276  '', & ! shape
277  '', & ! longname
278  .false., & ! required
279  .false., & ! developmode
280  .false., & ! multi-record
281  .false., & ! preserve case
282  .false., & ! layered
283  .false. & ! timeseries
284  )
285 
286  type(inputparamdefinitiontype), parameter :: &
288  ( &
289  'EXG', & ! component
290  'GWFGWF', & ! subcomponent
291  'OPTIONS', & ! block
292  'FILEIN', & ! tag name
293  'FILEIN', & ! fortran variable
294  'KEYWORD', & ! type
295  '', & ! shape
296  'file keyword', & ! longname
297  .true., & ! required
298  .false., & ! developmode
299  .true., & ! multi-record
300  .false., & ! preserve case
301  .false., & ! layered
302  .false. & ! timeseries
303  )
304 
305  type(inputparamdefinitiontype), parameter :: &
307  ( &
308  'EXG', & ! component
309  'GWFGWF', & ! subcomponent
310  'OPTIONS', & ! block
311  'GNC6', & ! tag name
312  'GNC6', & ! fortran variable
313  'KEYWORD', & ! type
314  '', & ! shape
315  'gnc6 keyword', & ! longname
316  .true., & ! required
317  .false., & ! developmode
318  .true., & ! multi-record
319  .false., & ! preserve case
320  .false., & ! layered
321  .false. & ! timeseries
322  )
323 
324  type(inputparamdefinitiontype), parameter :: &
326  ( &
327  'EXG', & ! component
328  'GWFGWF', & ! subcomponent
329  'OPTIONS', & ! block
330  'GNC6_FILENAME', & ! tag name
331  'GNC6_FILENAME', & ! fortran variable
332  'STRING', & ! type
333  '', & ! shape
334  'gnc6 input filename', & ! longname
335  .true., & ! required
336  .false., & ! developmode
337  .true., & ! multi-record
338  .true., & ! preserve case
339  .false., & ! layered
340  .false. & ! timeseries
341  )
342 
343  type(inputparamdefinitiontype), parameter :: &
345  ( &
346  'EXG', & ! component
347  'GWFGWF', & ! subcomponent
348  'OPTIONS', & ! block
349  'MVR_FILERECORD', & ! tag name
350  'MVR_FILERECORD', & ! fortran variable
351  'RECORD MVR6 FILEIN MVR6_FILENAME', & ! type
352  '', & ! shape
353  '', & ! longname
354  .false., & ! required
355  .false., & ! developmode
356  .false., & ! multi-record
357  .false., & ! preserve case
358  .false., & ! layered
359  .false. & ! timeseries
360  )
361 
362  type(inputparamdefinitiontype), parameter :: &
364  ( &
365  'EXG', & ! component
366  'GWFGWF', & ! subcomponent
367  'OPTIONS', & ! block
368  'MVR6', & ! tag name
369  'MVR6', & ! fortran variable
370  'KEYWORD', & ! type
371  '', & ! shape
372  'obs keyword', & ! longname
373  .true., & ! required
374  .false., & ! developmode
375  .true., & ! multi-record
376  .false., & ! preserve case
377  .false., & ! layered
378  .false. & ! timeseries
379  )
380 
381  type(inputparamdefinitiontype), parameter :: &
383  ( &
384  'EXG', & ! component
385  'GWFGWF', & ! subcomponent
386  'OPTIONS', & ! block
387  'MVR6_FILENAME', & ! tag name
388  'MVR6_FILENAME', & ! fortran variable
389  'STRING', & ! type
390  '', & ! shape
391  'mvr6 input filename', & ! longname
392  .true., & ! required
393  .false., & ! developmode
394  .true., & ! multi-record
395  .true., & ! preserve case
396  .false., & ! layered
397  .false. & ! timeseries
398  )
399 
400  type(inputparamdefinitiontype), parameter :: &
402  ( &
403  'EXG', & ! component
404  'GWFGWF', & ! subcomponent
405  'OPTIONS', & ! block
406  'OBS_FILERECORD', & ! tag name
407  'OBS_FILERECORD', & ! fortran variable
408  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
409  '', & ! shape
410  '', & ! longname
411  .false., & ! required
412  .false., & ! developmode
413  .false., & ! multi-record
414  .false., & ! preserve case
415  .false., & ! layered
416  .false. & ! timeseries
417  )
418 
419  type(inputparamdefinitiontype), parameter :: &
421  ( &
422  'EXG', & ! component
423  'GWFGWF', & ! subcomponent
424  'OPTIONS', & ! block
425  'OBS6', & ! tag name
426  'OBS6', & ! fortran variable
427  'KEYWORD', & ! type
428  '', & ! shape
429  'obs keyword', & ! longname
430  .true., & ! required
431  .false., & ! developmode
432  .true., & ! multi-record
433  .false., & ! preserve case
434  .false., & ! layered
435  .false. & ! timeseries
436  )
437 
438  type(inputparamdefinitiontype), parameter :: &
440  ( &
441  'EXG', & ! component
442  'GWFGWF', & ! subcomponent
443  'OPTIONS', & ! block
444  'OBS6_FILENAME', & ! tag name
445  'OBS6_FILENAME', & ! fortran variable
446  'STRING', & ! type
447  '', & ! shape
448  'obs6 input filename', & ! longname
449  .true., & ! required
450  .false., & ! developmode
451  .true., & ! multi-record
452  .true., & ! preserve case
453  .false., & ! layered
454  .false. & ! timeseries
455  )
456 
457  type(inputparamdefinitiontype), parameter :: &
459  ( &
460  'EXG', & ! component
461  'GWFGWF', & ! subcomponent
462  'OPTIONS', & ! block
463  'DEV_INTERFACEMODEL_ON', & ! tag name
464  'DEV_IFMOD_ON', & ! fortran variable
465  'KEYWORD', & ! type
466  '', & ! shape
467  'activate interface model on exchange', & ! longname
468  .false., & ! required
469  .false., & ! developmode
470  .false., & ! multi-record
471  .false., & ! preserve case
472  .false., & ! layered
473  .false. & ! timeseries
474  )
475 
476  type(inputparamdefinitiontype), parameter :: &
478  ( &
479  'EXG', & ! component
480  'GWFGWF', & ! subcomponent
481  'DIMENSIONS', & ! block
482  'NEXG', & ! tag name
483  'NEXG', & ! fortran variable
484  'INTEGER', & ! type
485  '', & ! shape
486  'number of exchanges', & ! longname
487  .true., & ! required
488  .false., & ! developmode
489  .false., & ! multi-record
490  .false., & ! preserve case
491  .false., & ! layered
492  .false. & ! timeseries
493  )
494 
495  type(inputparamdefinitiontype), parameter :: &
497  ( &
498  'EXG', & ! component
499  'GWFGWF', & ! subcomponent
500  'EXCHANGEDATA', & ! block
501  'CELLIDM1', & ! tag name
502  'CELLIDM1', & ! fortran variable
503  'INTEGER1D', & ! type
504  'NCELLDIM', & ! shape
505  'cellid of first cell', & ! longname
506  .true., & ! required
507  .false., & ! developmode
508  .true., & ! multi-record
509  .false., & ! preserve case
510  .false., & ! layered
511  .false. & ! timeseries
512  )
513 
514  type(inputparamdefinitiontype), parameter :: &
516  ( &
517  'EXG', & ! component
518  'GWFGWF', & ! subcomponent
519  'EXCHANGEDATA', & ! block
520  'CELLIDM2', & ! tag name
521  'CELLIDM2', & ! fortran variable
522  'INTEGER1D', & ! type
523  'NCELLDIM', & ! shape
524  'cellid of second cell', & ! longname
525  .true., & ! required
526  .false., & ! developmode
527  .true., & ! multi-record
528  .false., & ! preserve case
529  .false., & ! layered
530  .false. & ! timeseries
531  )
532 
533  type(inputparamdefinitiontype), parameter :: &
535  ( &
536  'EXG', & ! component
537  'GWFGWF', & ! subcomponent
538  'EXCHANGEDATA', & ! block
539  'IHC', & ! tag name
540  'IHC', & ! fortran variable
541  'INTEGER', & ! type
542  '', & ! shape
543  'integer flag for connection type', & ! longname
544  .true., & ! required
545  .false., & ! developmode
546  .true., & ! multi-record
547  .false., & ! preserve case
548  .false., & ! layered
549  .false. & ! timeseries
550  )
551 
552  type(inputparamdefinitiontype), parameter :: &
554  ( &
555  'EXG', & ! component
556  'GWFGWF', & ! subcomponent
557  'EXCHANGEDATA', & ! block
558  'CL1', & ! tag name
559  'CL1', & ! fortran variable
560  'DOUBLE', & ! type
561  '', & ! shape
562  'connection distance', & ! longname
563  .true., & ! required
564  .false., & ! developmode
565  .true., & ! multi-record
566  .false., & ! preserve case
567  .false., & ! layered
568  .false. & ! timeseries
569  )
570 
571  type(inputparamdefinitiontype), parameter :: &
573  ( &
574  'EXG', & ! component
575  'GWFGWF', & ! subcomponent
576  'EXCHANGEDATA', & ! block
577  'CL2', & ! tag name
578  'CL2', & ! fortran variable
579  'DOUBLE', & ! type
580  '', & ! shape
581  'connection distance', & ! longname
582  .true., & ! required
583  .false., & ! developmode
584  .true., & ! multi-record
585  .false., & ! preserve case
586  .false., & ! layered
587  .false. & ! timeseries
588  )
589 
590  type(inputparamdefinitiontype), parameter :: &
592  ( &
593  'EXG', & ! component
594  'GWFGWF', & ! subcomponent
595  'EXCHANGEDATA', & ! block
596  'HWVA', & ! tag name
597  'HWVA', & ! fortran variable
598  'DOUBLE', & ! type
599  '', & ! shape
600  'horizontal cell width or area for vertical flow', & ! longname
601  .true., & ! required
602  .false., & ! developmode
603  .true., & ! multi-record
604  .false., & ! preserve case
605  .false., & ! layered
606  .false. & ! timeseries
607  )
608 
609  type(inputparamdefinitiontype), parameter :: &
611  ( &
612  'EXG', & ! component
613  'GWFGWF', & ! subcomponent
614  'EXCHANGEDATA', & ! block
615  'AUX', & ! tag name
616  'AUXVAR', & ! fortran variable
617  'DOUBLE1D', & ! type
618  'NAUX', & ! shape
619  'auxiliary variables', & ! longname
620  .false., & ! required
621  .false., & ! developmode
622  .true., & ! multi-record
623  .false., & ! preserve case
624  .false., & ! layered
625  .false. & ! timeseries
626  )
627 
628  type(inputparamdefinitiontype), parameter :: &
630  ( &
631  'EXG', & ! component
632  'GWFGWF', & ! subcomponent
633  'EXCHANGEDATA', & ! block
634  'BOUNDNAME', & ! tag name
635  'BOUNDNAME', & ! fortran variable
636  'STRING', & ! type
637  '', & ! shape
638  'exchange boundname', & ! longname
639  .false., & ! required
640  .false., & ! developmode
641  .true., & ! multi-record
642  .false., & ! preserve case
643  .false., & ! layered
644  .false. & ! timeseries
645  )
646 
647  type(inputparamdefinitiontype), parameter :: &
649  [ &
660  exggwfgwf_xt3d, &
663  exggwfgwf_gnc6, &
666  exggwfgwf_mvr6, &
669  exggwfgwf_obs6, &
672  exggwfgwf_nexg, &
675  exggwfgwf_ihc, &
676  exggwfgwf_cl1, &
677  exggwfgwf_cl2, &
678  exggwfgwf_hwva, &
681  ]
682 
683  type(inputparamdefinitiontype), parameter :: &
685  ( &
686  'EXG', & ! component
687  'GWFGWF', & ! subcomponent
688  'EXCHANGEDATA', & ! block
689  'EXCHANGEDATA', & ! tag name
690  'EXCHANGEDATA', & ! fortran variable
691  'RECARRAY CELLIDM1 CELLIDM2 IHC CL1 CL2 HWVA AUX BOUNDNAME', & ! type
692  'NEXG', & ! shape
693  'exchange data', & ! longname
694  .true., & ! required
695  .false., & ! developmode
696  .false., & ! multi-record
697  .false., & ! preserve case
698  .false., & ! layered
699  .false. & ! timeseries
700  )
701 
702  type(inputparamdefinitiontype), parameter :: &
704  [ &
706  ]
707 
708  type(inputblockdefinitiontype), parameter :: &
710  [ &
712  'OPTIONS', & ! blockname
713  .false., & ! required
714  .false., & ! aggregate
715  .false. & ! block_variable
716  ), &
718  'DIMENSIONS', & ! blockname
719  .true., & ! required
720  .false., & ! aggregate
721  .false. & ! block_variable
722  ), &
724  'EXCHANGEDATA', & ! blockname
725  .true., & ! required
726  .true., & ! aggregate
727  .false. & ! block_variable
728  ) &
729  ]
730 
731 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
character(len=16), dimension(*), parameter, public exg_gwfgwf_subpackages
logical, public exg_gwfgwf_is_advanced
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
Input definition module.
Input block definition. Describes an input block.
Input parameter definition. Describes an input parameter.