MODFLOW 6  version 6.8.0.dev0
USGS Modular Hydrologic Model
gwf-csubidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module gwfcsubinputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public gwf_csub_param_definitions
8  public gwf_csub_aggregate_definitions
9  public gwf_csub_block_definitions
10  public gwfcsubparamfoundtype
11  public gwf_csub_multi_package
12  public gwf_csub_subpackages
13 
14  type gwfcsubparamfoundtype
15  logical :: boundnames = .false.
16  logical :: print_input = .false.
17  logical :: save_flows = .false.
18  logical :: gammaw = .false.
19  logical :: beta = .false.
20  logical :: head_based = .false.
21  logical :: precon_head = .false.
22  logical :: ndelaycells = .false.
23  logical :: icompress = .false.
24  logical :: matprop = .false.
25  logical :: cell_fraction = .false.
26  logical :: interbed_state = .false.
27  logical :: precon_stress = .false.
28  logical :: delay_head = .false.
29  logical :: stress_lag = .false.
30  logical :: strainibfr = .false.
31  logical :: csvinterbed = .false.
32  logical :: fileout = .false.
33  logical :: interbedstrainfn = .false.
34  logical :: straincgfr = .false.
35  logical :: csvcoarse = .false.
36  logical :: coarsestrainfn = .false.
37  logical :: cmpfr = .false.
38  logical :: compaction = .false.
39  logical :: cmpfn = .false.
40  logical :: cmpelasticfr = .false.
41  logical :: cmpelastic = .false.
42  logical :: elasticcmpfn = .false.
43  logical :: cmpinelasticfr = .false.
44  logical :: cmpinelastic = .false.
45  logical :: inelasticcmpfn = .false.
46  logical :: cmpinterbedfr = .false.
47  logical :: cmpinterbed = .false.
48  logical :: interbedcmpfn = .false.
49  logical :: cmpcoarsefr = .false.
50  logical :: cmpcoarse = .false.
51  logical :: cmpcoarsefn = .false.
52  logical :: zdispfr = .false.
53  logical :: zdisplacement = .false.
54  logical :: zdispfn = .false.
55  logical :: pkgconvergefr = .false.
56  logical :: pkgconverge = .false.
57  logical :: pkgconvergefn = .false.
58  logical :: ts_filerecord = .false.
59  logical :: ts6 = .false.
60  logical :: filein = .false.
61  logical :: ts6_filename = .false.
62  logical :: obs_filerecord = .false.
63  logical :: obs6 = .false.
64  logical :: obs6_filename = .false.
65  logical :: ninterbeds = .false.
66  logical :: maxbound = .false.
67  logical :: cg_ske_cr = .false.
68  logical :: cg_theta = .false.
69  logical :: sgm = .false.
70  logical :: sgs = .false.
71  logical :: icsubno = .false.
72  logical :: cellid_pkgdata = .false.
73  logical :: cdelay = .false.
74  logical :: pcs0 = .false.
75  logical :: thick_frac = .false.
76  logical :: rnb = .false.
77  logical :: ssv_cc = .false.
78  logical :: sse_cr = .false.
79  logical :: theta = .false.
80  logical :: kv = .false.
81  logical :: h0 = .false.
82  logical :: boundname = .false.
83  logical :: cellid = .false.
84  logical :: sig0 = .false.
85  end type gwfcsubparamfoundtype
86 
87  logical :: gwf_csub_multi_package = .false.
88 
89  character(len=16), parameter :: &
90  gwf_csub_subpackages(*) = &
91  [ &
92  ' ' &
93  ]
94 
95  type(inputparamdefinitiontype), parameter :: &
96  gwfcsub_boundnames = inputparamdefinitiontype &
97  ( &
98  'GWF', & ! component
99  'CSUB', & ! subcomponent
100  'OPTIONS', & ! block
101  'BOUNDNAMES', & ! tag name
102  'BOUNDNAMES', & ! fortran variable
103  'KEYWORD', & ! type
104  '', & ! shape
105  '', & ! longname
106  .false., & ! required
107  .false., & ! developmode
108  .false., & ! multi-record
109  .false., & ! preserve case
110  .false., & ! layered
111  .false. & ! timeseries
112  )
113 
114  type(inputparamdefinitiontype), parameter :: &
115  gwfcsub_print_input = inputparamdefinitiontype &
116  ( &
117  'GWF', & ! component
118  'CSUB', & ! subcomponent
119  'OPTIONS', & ! block
120  'PRINT_INPUT', & ! tag name
121  'PRINT_INPUT', & ! fortran variable
122  'KEYWORD', & ! type
123  '', & ! shape
124  'print input to listing file', & ! longname
125  .false., & ! required
126  .false., & ! developmode
127  .false., & ! multi-record
128  .false., & ! preserve case
129  .false., & ! layered
130  .false. & ! timeseries
131  )
132 
133  type(inputparamdefinitiontype), parameter :: &
134  gwfcsub_save_flows = inputparamdefinitiontype &
135  ( &
136  'GWF', & ! component
137  'CSUB', & ! subcomponent
138  'OPTIONS', & ! block
139  'SAVE_FLOWS', & ! tag name
140  'SAVE_FLOWS', & ! fortran variable
141  'KEYWORD', & ! type
142  '', & ! shape
143  'keyword to save CSUB flows', & ! longname
144  .false., & ! required
145  .false., & ! developmode
146  .false., & ! multi-record
147  .false., & ! preserve case
148  .false., & ! layered
149  .false. & ! timeseries
150  )
151 
152  type(inputparamdefinitiontype), parameter :: &
153  gwfcsub_gammaw = inputparamdefinitiontype &
154  ( &
155  'GWF', & ! component
156  'CSUB', & ! subcomponent
157  'OPTIONS', & ! block
158  'GAMMAW', & ! tag name
159  'GAMMAW', & ! fortran variable
160  'DOUBLE', & ! type
161  '', & ! shape
162  'unit weight of water', & ! longname
163  .false., & ! required
164  .false., & ! developmode
165  .false., & ! multi-record
166  .false., & ! preserve case
167  .false., & ! layered
168  .false. & ! timeseries
169  )
170 
171  type(inputparamdefinitiontype), parameter :: &
172  gwfcsub_beta = inputparamdefinitiontype &
173  ( &
174  'GWF', & ! component
175  'CSUB', & ! subcomponent
176  'OPTIONS', & ! block
177  'BETA', & ! tag name
178  'BETA', & ! fortran variable
179  'DOUBLE', & ! type
180  '', & ! shape
181  'compressibility of water', & ! longname
182  .false., & ! required
183  .false., & ! developmode
184  .false., & ! multi-record
185  .false., & ! preserve case
186  .false., & ! layered
187  .false. & ! timeseries
188  )
189 
190  type(inputparamdefinitiontype), parameter :: &
191  gwfcsub_head_based = inputparamdefinitiontype &
192  ( &
193  'GWF', & ! component
194  'CSUB', & ! subcomponent
195  'OPTIONS', & ! block
196  'HEAD_BASED', & ! tag name
197  'HEAD_BASED', & ! fortran variable
198  'KEYWORD', & ! type
199  '', & ! shape
200  'keyword to indicate the head-based formulation will be used', & ! longname
201  .false., & ! required
202  .false., & ! developmode
203  .false., & ! multi-record
204  .false., & ! preserve case
205  .false., & ! layered
206  .false. & ! timeseries
207  )
208 
209  type(inputparamdefinitiontype), parameter :: &
210  gwfcsub_precon_head = inputparamdefinitiontype &
211  ( &
212  'GWF', & ! component
213  'CSUB', & ! subcomponent
214  'OPTIONS', & ! block
215  'INITIAL_PRECONSOLIDATION_HEAD', & ! tag name
216  'PRECON_HEAD', & ! fortran variable
217  'KEYWORD', & ! type
218  '', & ! shape
219  'keyword to indicate that preconsolidation heads will be '// &
220  'specified', & ! longname
221  .false., & ! required
222  .false., & ! developmode
223  .false., & ! multi-record
224  .false., & ! preserve case
225  .false., & ! layered
226  .false. & ! timeseries
227  )
228 
229  type(inputparamdefinitiontype), parameter :: &
230  gwfcsub_ndelaycells = inputparamdefinitiontype &
231  ( &
232  'GWF', & ! component
233  'CSUB', & ! subcomponent
234  'OPTIONS', & ! block
235  'NDELAYCELLS', & ! tag name
236  'NDELAYCELLS', & ! fortran variable
237  'INTEGER', & ! type
238  '', & ! shape
239  'number of interbed cell nodes', & ! 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 :: &
249  gwfcsub_icompress = inputparamdefinitiontype &
250  ( &
251  'GWF', & ! component
252  'CSUB', & ! subcomponent
253  'OPTIONS', & ! block
254  'COMPRESSION_INDICES', & ! tag name
255  'ICOMPRESS', & ! fortran variable
256  'KEYWORD', & ! type
257  '', & ! shape
258  'keyword to indicate CR and CC are read instead of SSE and '// &
259  'SSV', & ! longname
260  .false., & ! required
261  .false., & ! developmode
262  .false., & ! multi-record
263  .false., & ! preserve case
264  .false., & ! layered
265  .false. & ! timeseries
266  )
267 
268  type(inputparamdefinitiontype), parameter :: &
269  gwfcsub_matprop = inputparamdefinitiontype &
270  ( &
271  'GWF', & ! component
272  'CSUB', & ! subcomponent
273  'OPTIONS', & ! block
274  'UPDATE_MATERIAL_PROPERTIES', & ! tag name
275  'MATPROP', & ! fortran variable
276  'KEYWORD', & ! type
277  '', & ! shape
278  'keyword to indicate material properties can change during '// &
279  'the simulations', & ! longname
280  .false., & ! required
281  .false., & ! developmode
282  .false., & ! multi-record
283  .false., & ! preserve case
284  .false., & ! layered
285  .false. & ! timeseries
286  )
287 
288  type(inputparamdefinitiontype), parameter :: &
289  gwfcsub_cell_fraction = inputparamdefinitiontype &
290  ( &
291  'GWF', & ! component
292  'CSUB', & ! subcomponent
293  'OPTIONS', & ! block
294  'CELL_FRACTION', & ! tag name
295  'CELL_FRACTION', & ! fortran variable
296  'KEYWORD', & ! type
297  '', & ! shape
298  'keyword to indicate cell fraction interbed thickness', & ! longname
299  .false., & ! required
300  .false., & ! developmode
301  .false., & ! multi-record
302  .false., & ! preserve case
303  .false., & ! layered
304  .false. & ! timeseries
305  )
306 
307  type(inputparamdefinitiontype), parameter :: &
308  gwfcsub_interbed_state = inputparamdefinitiontype &
309  ( &
310  'GWF', & ! component
311  'CSUB', & ! subcomponent
312  'OPTIONS', & ! block
313  'SPECIFIED_INITIAL_INTERBED_STATE', & ! tag name
314  'INTERBED_STATE', & ! fortran variable
315  'KEYWORD', & ! type
316  '', & ! shape
317  'keyword to indicate that absolute initial states will be '// &
318  'specified', & ! longname
319  .false., & ! required
320  .false., & ! developmode
321  .false., & ! multi-record
322  .false., & ! preserve case
323  .false., & ! layered
324  .false. & ! timeseries
325  )
326 
327  type(inputparamdefinitiontype), parameter :: &
328  gwfcsub_precon_stress = inputparamdefinitiontype &
329  ( &
330  'GWF', & ! component
331  'CSUB', & ! subcomponent
332  'OPTIONS', & ! block
333  'SPECIFIED_INITIAL_PRECONSOLIDATION_STRESS', & ! tag name
334  'PRECON_STRESS', & ! fortran variable
335  'KEYWORD', & ! type
336  '', & ! shape
337  'keyword to indicate that absolute initial preconsolidation '// &
338  'stresses (head) will be specified', & ! longname
339  .false., & ! required
340  .false., & ! developmode
341  .false., & ! multi-record
342  .false., & ! preserve case
343  .false., & ! layered
344  .false. & ! timeseries
345  )
346 
347  type(inputparamdefinitiontype), parameter :: &
348  gwfcsub_delay_head = inputparamdefinitiontype &
349  ( &
350  'GWF', & ! component
351  'CSUB', & ! subcomponent
352  'OPTIONS', & ! block
353  'SPECIFIED_INITIAL_DELAY_HEAD', & ! tag name
354  'DELAY_HEAD', & ! fortran variable
355  'KEYWORD', & ! type
356  '', & ! shape
357  'keyword to indicate that absolute initial delay bed heads '// &
358  'will be specified', & ! longname
359  .false., & ! required
360  .false., & ! developmode
361  .false., & ! multi-record
362  .false., & ! preserve case
363  .false., & ! layered
364  .false. & ! timeseries
365  )
366 
367  type(inputparamdefinitiontype), parameter :: &
368  gwfcsub_stress_lag = inputparamdefinitiontype &
369  ( &
370  'GWF', & ! component
371  'CSUB', & ! subcomponent
372  'OPTIONS', & ! block
373  'EFFECTIVE_STRESS_LAG', & ! tag name
374  'STRESS_LAG', & ! fortran variable
375  'KEYWORD', & ! type
376  '', & ! shape
377  'keyword to indicate that specific storage will be calculate '// &
378  'using the effective stress from the previous time step', & ! longname
379  .false., & ! required
380  .false., & ! developmode
381  .false., & ! multi-record
382  .false., & ! preserve case
383  .false., & ! layered
384  .false. & ! timeseries
385  )
386 
387  type(inputparamdefinitiontype), parameter :: &
388  gwfcsub_strainibfr = inputparamdefinitiontype &
389  ( &
390  'GWF', & ! component
391  'CSUB', & ! subcomponent
392  'OPTIONS', & ! block
393  'STRAINIB_FILERECORD', & ! tag name
394  'STRAINIBFR', & ! fortran variable
395  'RECORD STRAIN_CSV_INTERBED FILEOUT INTERBEDSTRAIN_FILENAME', & ! type
396  '', & ! shape
397  '', & ! longname
398  .false., & ! required
399  .false., & ! developmode
400  .false., & ! multi-record
401  .false., & ! preserve case
402  .false., & ! layered
403  .false. & ! timeseries
404  )
405 
406  type(inputparamdefinitiontype), parameter :: &
407  gwfcsub_csvinterbed = inputparamdefinitiontype &
408  ( &
409  'GWF', & ! component
410  'CSUB', & ! subcomponent
411  'OPTIONS', & ! block
412  'STRAIN_CSV_INTERBED', & ! tag name
413  'CSVINTERBED', & ! fortran variable
414  'KEYWORD', & ! type
415  '', & ! shape
416  'budget keyword', & ! longname
417  .true., & ! required
418  .false., & ! developmode
419  .true., & ! multi-record
420  .false., & ! preserve case
421  .false., & ! layered
422  .false. & ! timeseries
423  )
424 
425  type(inputparamdefinitiontype), parameter :: &
426  gwfcsub_fileout = inputparamdefinitiontype &
427  ( &
428  'GWF', & ! component
429  'CSUB', & ! subcomponent
430  'OPTIONS', & ! block
431  'FILEOUT', & ! tag name
432  'FILEOUT', & ! fortran variable
433  'KEYWORD', & ! type
434  '', & ! shape
435  'file keyword', & ! longname
436  .true., & ! required
437  .false., & ! developmode
438  .true., & ! multi-record
439  .false., & ! preserve case
440  .false., & ! layered
441  .false. & ! timeseries
442  )
443 
444  type(inputparamdefinitiontype), parameter :: &
445  gwfcsub_interbedstrainfn = inputparamdefinitiontype &
446  ( &
447  'GWF', & ! component
448  'CSUB', & ! subcomponent
449  'OPTIONS', & ! block
450  'INTERBEDSTRAIN_FILENAME', & ! tag name
451  'INTERBEDSTRAINFN', & ! fortran variable
452  'STRING', & ! type
453  '', & ! shape
454  'file keyword', & ! longname
455  .true., & ! required
456  .false., & ! developmode
457  .true., & ! multi-record
458  .true., & ! preserve case
459  .false., & ! layered
460  .false. & ! timeseries
461  )
462 
463  type(inputparamdefinitiontype), parameter :: &
464  gwfcsub_straincgfr = inputparamdefinitiontype &
465  ( &
466  'GWF', & ! component
467  'CSUB', & ! subcomponent
468  'OPTIONS', & ! block
469  'STRAINCG_FILERECORD', & ! tag name
470  'STRAINCGFR', & ! fortran variable
471  'RECORD STRAIN_CSV_COARSE FILEOUT COARSESTRAIN_FILENAME', & ! type
472  '', & ! shape
473  '', & ! longname
474  .false., & ! required
475  .false., & ! developmode
476  .false., & ! multi-record
477  .false., & ! preserve case
478  .false., & ! layered
479  .false. & ! timeseries
480  )
481 
482  type(inputparamdefinitiontype), parameter :: &
483  gwfcsub_csvcoarse = inputparamdefinitiontype &
484  ( &
485  'GWF', & ! component
486  'CSUB', & ! subcomponent
487  'OPTIONS', & ! block
488  'STRAIN_CSV_COARSE', & ! tag name
489  'CSVCOARSE', & ! fortran variable
490  'KEYWORD', & ! type
491  '', & ! shape
492  'budget keyword', & ! longname
493  .true., & ! required
494  .false., & ! developmode
495  .true., & ! multi-record
496  .false., & ! preserve case
497  .false., & ! layered
498  .false. & ! timeseries
499  )
500 
501  type(inputparamdefinitiontype), parameter :: &
502  gwfcsub_coarsestrainfn = inputparamdefinitiontype &
503  ( &
504  'GWF', & ! component
505  'CSUB', & ! subcomponent
506  'OPTIONS', & ! block
507  'COARSESTRAIN_FILENAME', & ! tag name
508  'COARSESTRAINFN', & ! fortran variable
509  'STRING', & ! type
510  '', & ! shape
511  'file keyword', & ! longname
512  .true., & ! required
513  .false., & ! developmode
514  .true., & ! multi-record
515  .true., & ! preserve case
516  .false., & ! layered
517  .false. & ! timeseries
518  )
519 
520  type(inputparamdefinitiontype), parameter :: &
521  gwfcsub_cmpfr = inputparamdefinitiontype &
522  ( &
523  'GWF', & ! component
524  'CSUB', & ! subcomponent
525  'OPTIONS', & ! block
526  'COMPACTION_FILERECORD', & ! tag name
527  'CMPFR', & ! fortran variable
528  'RECORD COMPACTION FILEOUT COMPACTION_FILENAME', & ! type
529  '', & ! shape
530  '', & ! longname
531  .false., & ! required
532  .false., & ! developmode
533  .false., & ! multi-record
534  .false., & ! preserve case
535  .false., & ! layered
536  .false. & ! timeseries
537  )
538 
539  type(inputparamdefinitiontype), parameter :: &
540  gwfcsub_compaction = inputparamdefinitiontype &
541  ( &
542  'GWF', & ! component
543  'CSUB', & ! subcomponent
544  'OPTIONS', & ! block
545  'COMPACTION', & ! tag name
546  'COMPACTION', & ! fortran variable
547  'KEYWORD', & ! type
548  '', & ! shape
549  'compaction keyword', & ! longname
550  .true., & ! required
551  .false., & ! developmode
552  .true., & ! multi-record
553  .false., & ! preserve case
554  .false., & ! layered
555  .false. & ! timeseries
556  )
557 
558  type(inputparamdefinitiontype), parameter :: &
559  gwfcsub_cmpfn = inputparamdefinitiontype &
560  ( &
561  'GWF', & ! component
562  'CSUB', & ! subcomponent
563  'OPTIONS', & ! block
564  'COMPACTION_FILENAME', & ! tag name
565  'CMPFN', & ! fortran variable
566  'STRING', & ! type
567  '', & ! shape
568  'file keyword', & ! longname
569  .true., & ! required
570  .false., & ! developmode
571  .true., & ! multi-record
572  .true., & ! preserve case
573  .false., & ! layered
574  .false. & ! timeseries
575  )
576 
577  type(inputparamdefinitiontype), parameter :: &
578  gwfcsub_cmpelasticfr = inputparamdefinitiontype &
579  ( &
580  'GWF', & ! component
581  'CSUB', & ! subcomponent
582  'OPTIONS', & ! block
583  'COMPACTION_ELASTIC_FILERECORD', & ! tag name
584  'CMPELASTICFR', & ! fortran variable
585  'RECORD COMPACTION_ELASTIC FILEOUT '// &
586  'ELASTIC_COMPACTION_FILENAME', & ! type
587  '', & ! shape
588  '', & ! longname
589  .false., & ! required
590  .false., & ! developmode
591  .false., & ! multi-record
592  .false., & ! preserve case
593  .false., & ! layered
594  .false. & ! timeseries
595  )
596 
597  type(inputparamdefinitiontype), parameter :: &
598  gwfcsub_cmpelastic = inputparamdefinitiontype &
599  ( &
600  'GWF', & ! component
601  'CSUB', & ! subcomponent
602  'OPTIONS', & ! block
603  'COMPACTION_ELASTIC', & ! tag name
604  'CMPELASTIC', & ! fortran variable
605  'KEYWORD', & ! type
606  '', & ! shape
607  'elastic interbed compaction keyword', & ! longname
608  .true., & ! required
609  .false., & ! developmode
610  .true., & ! multi-record
611  .false., & ! preserve case
612  .false., & ! layered
613  .false. & ! timeseries
614  )
615 
616  type(inputparamdefinitiontype), parameter :: &
617  gwfcsub_elasticcmpfn = inputparamdefinitiontype &
618  ( &
619  'GWF', & ! component
620  'CSUB', & ! subcomponent
621  'OPTIONS', & ! block
622  'ELASTIC_COMPACTION_FILENAME', & ! tag name
623  'ELASTICCMPFN', & ! fortran variable
624  'STRING', & ! type
625  '', & ! shape
626  'file keyword', & ! longname
627  .true., & ! required
628  .false., & ! developmode
629  .true., & ! multi-record
630  .true., & ! preserve case
631  .false., & ! layered
632  .false. & ! timeseries
633  )
634 
635  type(inputparamdefinitiontype), parameter :: &
636  gwfcsub_cmpinelasticfr = inputparamdefinitiontype &
637  ( &
638  'GWF', & ! component
639  'CSUB', & ! subcomponent
640  'OPTIONS', & ! block
641  'COMPACTION_INELASTIC_FILERECORD', & ! tag name
642  'CMPINELASTICFR', & ! fortran variable
643  'RECORD COMPACTION_INELASTIC FILEOUT '// &
644  'INELASTIC_COMPACTION_FILENAME', & ! type
645  '', & ! shape
646  '', & ! longname
647  .false., & ! required
648  .false., & ! developmode
649  .false., & ! multi-record
650  .false., & ! preserve case
651  .false., & ! layered
652  .false. & ! timeseries
653  )
654 
655  type(inputparamdefinitiontype), parameter :: &
656  gwfcsub_cmpinelastic = inputparamdefinitiontype &
657  ( &
658  'GWF', & ! component
659  'CSUB', & ! subcomponent
660  'OPTIONS', & ! block
661  'COMPACTION_INELASTIC', & ! tag name
662  'CMPINELASTIC', & ! fortran variable
663  'KEYWORD', & ! type
664  '', & ! shape
665  'inelastic interbed compaction keyword', & ! 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  gwfcsub_inelasticcmpfn = inputparamdefinitiontype &
676  ( &
677  'GWF', & ! component
678  'CSUB', & ! subcomponent
679  'OPTIONS', & ! block
680  'INELASTIC_COMPACTION_FILENAME', & ! tag name
681  'INELASTICCMPFN', & ! fortran variable
682  'STRING', & ! type
683  '', & ! shape
684  'file keyword', & ! longname
685  .true., & ! required
686  .false., & ! developmode
687  .true., & ! multi-record
688  .true., & ! preserve case
689  .false., & ! layered
690  .false. & ! timeseries
691  )
692 
693  type(inputparamdefinitiontype), parameter :: &
694  gwfcsub_cmpinterbedfr = inputparamdefinitiontype &
695  ( &
696  'GWF', & ! component
697  'CSUB', & ! subcomponent
698  'OPTIONS', & ! block
699  'COMPACTION_INTERBED_FILERECORD', & ! tag name
700  'CMPINTERBEDFR', & ! fortran variable
701  'RECORD COMPACTION_INTERBED FILEOUT '// &
702  'INTERBED_COMPACTION_FILENAME', & ! type
703  '', & ! shape
704  '', & ! longname
705  .false., & ! required
706  .false., & ! developmode
707  .false., & ! multi-record
708  .false., & ! preserve case
709  .false., & ! layered
710  .false. & ! timeseries
711  )
712 
713  type(inputparamdefinitiontype), parameter :: &
714  gwfcsub_cmpinterbed = inputparamdefinitiontype &
715  ( &
716  'GWF', & ! component
717  'CSUB', & ! subcomponent
718  'OPTIONS', & ! block
719  'COMPACTION_INTERBED', & ! tag name
720  'CMPINTERBED', & ! fortran variable
721  'KEYWORD', & ! type
722  '', & ! shape
723  'interbed compaction keyword', & ! longname
724  .true., & ! required
725  .false., & ! developmode
726  .true., & ! multi-record
727  .false., & ! preserve case
728  .false., & ! layered
729  .false. & ! timeseries
730  )
731 
732  type(inputparamdefinitiontype), parameter :: &
733  gwfcsub_interbedcmpfn = inputparamdefinitiontype &
734  ( &
735  'GWF', & ! component
736  'CSUB', & ! subcomponent
737  'OPTIONS', & ! block
738  'INTERBED_COMPACTION_FILENAME', & ! tag name
739  'INTERBEDCMPFN', & ! fortran variable
740  'STRING', & ! type
741  '', & ! shape
742  'file keyword', & ! longname
743  .true., & ! required
744  .false., & ! developmode
745  .true., & ! multi-record
746  .true., & ! preserve case
747  .false., & ! layered
748  .false. & ! timeseries
749  )
750 
751  type(inputparamdefinitiontype), parameter :: &
752  gwfcsub_cmpcoarsefr = inputparamdefinitiontype &
753  ( &
754  'GWF', & ! component
755  'CSUB', & ! subcomponent
756  'OPTIONS', & ! block
757  'COMPACTION_COARSE_FILERECORD', & ! tag name
758  'CMPCOARSEFR', & ! fortran variable
759  'RECORD COMPACTION_COARSE FILEOUT COARSE_COMPACTION_FILENAME', & ! type
760  '', & ! shape
761  '', & ! longname
762  .false., & ! required
763  .false., & ! developmode
764  .false., & ! multi-record
765  .false., & ! preserve case
766  .false., & ! layered
767  .false. & ! timeseries
768  )
769 
770  type(inputparamdefinitiontype), parameter :: &
771  gwfcsub_cmpcoarse = inputparamdefinitiontype &
772  ( &
773  'GWF', & ! component
774  'CSUB', & ! subcomponent
775  'OPTIONS', & ! block
776  'COMPACTION_COARSE', & ! tag name
777  'CMPCOARSE', & ! fortran variable
778  'KEYWORD', & ! type
779  '', & ! shape
780  'coarse compaction keyword', & ! longname
781  .true., & ! required
782  .false., & ! developmode
783  .true., & ! multi-record
784  .false., & ! preserve case
785  .false., & ! layered
786  .false. & ! timeseries
787  )
788 
789  type(inputparamdefinitiontype), parameter :: &
790  gwfcsub_cmpcoarsefn = inputparamdefinitiontype &
791  ( &
792  'GWF', & ! component
793  'CSUB', & ! subcomponent
794  'OPTIONS', & ! block
795  'COARSE_COMPACTION_FILENAME', & ! tag name
796  'CMPCOARSEFN', & ! fortran variable
797  'STRING', & ! type
798  '', & ! shape
799  'file keyword', & ! longname
800  .true., & ! required
801  .false., & ! developmode
802  .true., & ! multi-record
803  .true., & ! preserve case
804  .false., & ! layered
805  .false. & ! timeseries
806  )
807 
808  type(inputparamdefinitiontype), parameter :: &
809  gwfcsub_zdispfr = inputparamdefinitiontype &
810  ( &
811  'GWF', & ! component
812  'CSUB', & ! subcomponent
813  'OPTIONS', & ! block
814  'ZDISPLACEMENT_FILERECORD', & ! tag name
815  'ZDISPFR', & ! fortran variable
816  'RECORD ZDISPLACEMENT FILEOUT ZDISPLACEMENT_FILENAME', & ! type
817  '', & ! shape
818  '', & ! longname
819  .false., & ! required
820  .false., & ! developmode
821  .false., & ! multi-record
822  .false., & ! preserve case
823  .false., & ! layered
824  .false. & ! timeseries
825  )
826 
827  type(inputparamdefinitiontype), parameter :: &
828  gwfcsub_zdisplacement = inputparamdefinitiontype &
829  ( &
830  'GWF', & ! component
831  'CSUB', & ! subcomponent
832  'OPTIONS', & ! block
833  'ZDISPLACEMENT', & ! tag name
834  'ZDISPLACEMENT', & ! fortran variable
835  'KEYWORD', & ! type
836  '', & ! shape
837  'budget keyword', & ! longname
838  .true., & ! required
839  .false., & ! developmode
840  .true., & ! multi-record
841  .false., & ! preserve case
842  .false., & ! layered
843  .false. & ! timeseries
844  )
845 
846  type(inputparamdefinitiontype), parameter :: &
847  gwfcsub_zdispfn = inputparamdefinitiontype &
848  ( &
849  'GWF', & ! component
850  'CSUB', & ! subcomponent
851  'OPTIONS', & ! block
852  'ZDISPLACEMENT_FILENAME', & ! tag name
853  'ZDISPFN', & ! fortran variable
854  'STRING', & ! type
855  '', & ! shape
856  'file keyword', & ! longname
857  .true., & ! required
858  .false., & ! developmode
859  .true., & ! multi-record
860  .true., & ! preserve case
861  .false., & ! layered
862  .false. & ! timeseries
863  )
864 
865  type(inputparamdefinitiontype), parameter :: &
866  gwfcsub_pkgconvergefr = inputparamdefinitiontype &
867  ( &
868  'GWF', & ! component
869  'CSUB', & ! subcomponent
870  'OPTIONS', & ! block
871  'PACKAGE_CONVERGENCE_FILERECORD', & ! tag name
872  'PKGCONVERGEFR', & ! fortran variable
873  'RECORD PACKAGE_CONVERGENCE FILEOUT '// &
874  'PACKAGE_CONVERGENCE_FILENAME', & ! type
875  '', & ! shape
876  '', & ! longname
877  .false., & ! required
878  .false., & ! developmode
879  .false., & ! multi-record
880  .false., & ! preserve case
881  .false., & ! layered
882  .false. & ! timeseries
883  )
884 
885  type(inputparamdefinitiontype), parameter :: &
886  gwfcsub_pkgconverge = inputparamdefinitiontype &
887  ( &
888  'GWF', & ! component
889  'CSUB', & ! subcomponent
890  'OPTIONS', & ! block
891  'PACKAGE_CONVERGENCE', & ! tag name
892  'PKGCONVERGE', & ! fortran variable
893  'KEYWORD', & ! type
894  '', & ! shape
895  'package_convergence keyword', & ! longname
896  .true., & ! required
897  .false., & ! developmode
898  .true., & ! multi-record
899  .false., & ! preserve case
900  .false., & ! layered
901  .false. & ! timeseries
902  )
903 
904  type(inputparamdefinitiontype), parameter :: &
905  gwfcsub_pkgconvergefn = inputparamdefinitiontype &
906  ( &
907  'GWF', & ! component
908  'CSUB', & ! subcomponent
909  'OPTIONS', & ! block
910  'PACKAGE_CONVERGENCE_FILENAME', & ! tag name
911  'PKGCONVERGEFN', & ! fortran variable
912  'STRING', & ! type
913  '', & ! shape
914  'file keyword', & ! longname
915  .true., & ! required
916  .false., & ! developmode
917  .true., & ! multi-record
918  .true., & ! preserve case
919  .false., & ! layered
920  .false. & ! timeseries
921  )
922 
923  type(inputparamdefinitiontype), parameter :: &
924  gwfcsub_ts_filerecord = inputparamdefinitiontype &
925  ( &
926  'GWF', & ! component
927  'CSUB', & ! subcomponent
928  'OPTIONS', & ! block
929  'TS_FILERECORD', & ! tag name
930  'TS_FILERECORD', & ! fortran variable
931  'RECORD TS6 FILEIN TS6_FILENAME', & ! type
932  '', & ! shape
933  '', & ! longname
934  .false., & ! required
935  .false., & ! developmode
936  .false., & ! multi-record
937  .false., & ! preserve case
938  .false., & ! layered
939  .false. & ! timeseries
940  )
941 
942  type(inputparamdefinitiontype), parameter :: &
943  gwfcsub_ts6 = inputparamdefinitiontype &
944  ( &
945  'GWF', & ! component
946  'CSUB', & ! subcomponent
947  'OPTIONS', & ! block
948  'TS6', & ! tag name
949  'TS6', & ! fortran variable
950  'KEYWORD', & ! type
951  '', & ! shape
952  'head keyword', & ! longname
953  .true., & ! required
954  .false., & ! developmode
955  .true., & ! multi-record
956  .false., & ! preserve case
957  .false., & ! layered
958  .false. & ! timeseries
959  )
960 
961  type(inputparamdefinitiontype), parameter :: &
962  gwfcsub_filein = inputparamdefinitiontype &
963  ( &
964  'GWF', & ! component
965  'CSUB', & ! subcomponent
966  'OPTIONS', & ! block
967  'FILEIN', & ! tag name
968  'FILEIN', & ! fortran variable
969  'KEYWORD', & ! type
970  '', & ! shape
971  'file keyword', & ! longname
972  .true., & ! required
973  .false., & ! developmode
974  .true., & ! multi-record
975  .false., & ! preserve case
976  .false., & ! layered
977  .false. & ! timeseries
978  )
979 
980  type(inputparamdefinitiontype), parameter :: &
981  gwfcsub_ts6_filename = inputparamdefinitiontype &
982  ( &
983  'GWF', & ! component
984  'CSUB', & ! subcomponent
985  'OPTIONS', & ! block
986  'TS6_FILENAME', & ! tag name
987  'TS6_FILENAME', & ! fortran variable
988  'STRING', & ! type
989  '', & ! shape
990  'file name of time series information', & ! longname
991  .true., & ! required
992  .false., & ! developmode
993  .true., & ! multi-record
994  .true., & ! preserve case
995  .false., & ! layered
996  .false. & ! timeseries
997  )
998 
999  type(inputparamdefinitiontype), parameter :: &
1000  gwfcsub_obs_filerecord = inputparamdefinitiontype &
1001  ( &
1002  'GWF', & ! component
1003  'CSUB', & ! subcomponent
1004  'OPTIONS', & ! block
1005  'OBS_FILERECORD', & ! tag name
1006  'OBS_FILERECORD', & ! fortran variable
1007  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
1008  '', & ! shape
1009  '', & ! longname
1010  .false., & ! required
1011  .false., & ! developmode
1012  .false., & ! multi-record
1013  .false., & ! preserve case
1014  .false., & ! layered
1015  .false. & ! timeseries
1016  )
1017 
1018  type(inputparamdefinitiontype), parameter :: &
1019  gwfcsub_obs6 = inputparamdefinitiontype &
1020  ( &
1021  'GWF', & ! component
1022  'CSUB', & ! subcomponent
1023  'OPTIONS', & ! block
1024  'OBS6', & ! tag name
1025  'OBS6', & ! fortran variable
1026  'KEYWORD', & ! type
1027  '', & ! shape
1028  'obs keyword', & ! longname
1029  .true., & ! required
1030  .false., & ! developmode
1031  .true., & ! multi-record
1032  .false., & ! preserve case
1033  .false., & ! layered
1034  .false. & ! timeseries
1035  )
1036 
1037  type(inputparamdefinitiontype), parameter :: &
1038  gwfcsub_obs6_filename = inputparamdefinitiontype &
1039  ( &
1040  'GWF', & ! component
1041  'CSUB', & ! subcomponent
1042  'OPTIONS', & ! block
1043  'OBS6_FILENAME', & ! tag name
1044  'OBS6_FILENAME', & ! fortran variable
1045  'STRING', & ! type
1046  '', & ! shape
1047  'obs6 input filename', & ! longname
1048  .true., & ! required
1049  .false., & ! developmode
1050  .true., & ! multi-record
1051  .true., & ! preserve case
1052  .false., & ! layered
1053  .false. & ! timeseries
1054  )
1055 
1056  type(inputparamdefinitiontype), parameter :: &
1057  gwfcsub_ninterbeds = inputparamdefinitiontype &
1058  ( &
1059  'GWF', & ! component
1060  'CSUB', & ! subcomponent
1061  'DIMENSIONS', & ! block
1062  'NINTERBEDS', & ! tag name
1063  'NINTERBEDS', & ! fortran variable
1064  'INTEGER', & ! type
1065  '', & ! shape
1066  'number of CSUB interbed systems', & ! longname
1067  .true., & ! required
1068  .false., & ! developmode
1069  .false., & ! multi-record
1070  .false., & ! preserve case
1071  .false., & ! layered
1072  .false. & ! timeseries
1073  )
1074 
1075  type(inputparamdefinitiontype), parameter :: &
1076  gwfcsub_maxbound = inputparamdefinitiontype &
1077  ( &
1078  'GWF', & ! component
1079  'CSUB', & ! subcomponent
1080  'DIMENSIONS', & ! block
1081  'MAXSIG0', & ! tag name
1082  'MAXBOUND', & ! fortran variable
1083  'INTEGER', & ! type
1084  '', & ! shape
1085  'maximum number of stress offset cells', & ! longname
1086  .false., & ! required
1087  .false., & ! developmode
1088  .false., & ! multi-record
1089  .false., & ! preserve case
1090  .false., & ! layered
1091  .false. & ! timeseries
1092  )
1093 
1094  type(inputparamdefinitiontype), parameter :: &
1095  gwfcsub_cg_ske_cr = inputparamdefinitiontype &
1096  ( &
1097  'GWF', & ! component
1098  'CSUB', & ! subcomponent
1099  'GRIDDATA', & ! block
1100  'CG_SKE_CR', & ! tag name
1101  'CG_SKE_CR', & ! fortran variable
1102  'DOUBLE1D', & ! type
1103  'NODES', & ! shape
1104  'elastic coarse specific storage', & ! longname
1105  .true., & ! required
1106  .false., & ! developmode
1107  .false., & ! multi-record
1108  .false., & ! preserve case
1109  .true., & ! layered
1110  .false. & ! timeseries
1111  )
1112 
1113  type(inputparamdefinitiontype), parameter :: &
1114  gwfcsub_cg_theta = inputparamdefinitiontype &
1115  ( &
1116  'GWF', & ! component
1117  'CSUB', & ! subcomponent
1118  'GRIDDATA', & ! block
1119  'CG_THETA', & ! tag name
1120  'CG_THETA', & ! fortran variable
1121  'DOUBLE1D', & ! type
1122  'NODES', & ! shape
1123  'initial coarse-grained material porosity', & ! longname
1124  .true., & ! required
1125  .false., & ! developmode
1126  .false., & ! multi-record
1127  .false., & ! preserve case
1128  .true., & ! layered
1129  .false. & ! timeseries
1130  )
1131 
1132  type(inputparamdefinitiontype), parameter :: &
1133  gwfcsub_sgm = inputparamdefinitiontype &
1134  ( &
1135  'GWF', & ! component
1136  'CSUB', & ! subcomponent
1137  'GRIDDATA', & ! block
1138  'SGM', & ! tag name
1139  'SGM', & ! fortran variable
1140  'DOUBLE1D', & ! type
1141  'NODES', & ! shape
1142  'specific gravity of moist sediments', & ! longname
1143  .false., & ! required
1144  .false., & ! developmode
1145  .false., & ! multi-record
1146  .false., & ! preserve case
1147  .true., & ! layered
1148  .false. & ! timeseries
1149  )
1150 
1151  type(inputparamdefinitiontype), parameter :: &
1152  gwfcsub_sgs = inputparamdefinitiontype &
1153  ( &
1154  'GWF', & ! component
1155  'CSUB', & ! subcomponent
1156  'GRIDDATA', & ! block
1157  'SGS', & ! tag name
1158  'SGS', & ! fortran variable
1159  'DOUBLE1D', & ! type
1160  'NODES', & ! shape
1161  'specific gravity of saturated sediments', & ! longname
1162  .false., & ! required
1163  .false., & ! developmode
1164  .false., & ! multi-record
1165  .false., & ! preserve case
1166  .true., & ! layered
1167  .false. & ! timeseries
1168  )
1169 
1170  type(inputparamdefinitiontype), parameter :: &
1171  gwfcsub_icsubno = inputparamdefinitiontype &
1172  ( &
1173  'GWF', & ! component
1174  'CSUB', & ! subcomponent
1175  'PACKAGEDATA', & ! block
1176  'ICSUBNO', & ! tag name
1177  'ICSUBNO', & ! fortran variable
1178  'INTEGER', & ! type
1179  '', & ! shape
1180  'CSUB id number for this entry', & ! longname
1181  .true., & ! required
1182  .false., & ! developmode
1183  .true., & ! multi-record
1184  .false., & ! preserve case
1185  .false., & ! layered
1186  .false. & ! timeseries
1187  )
1188 
1189  type(inputparamdefinitiontype), parameter :: &
1190  gwfcsub_cellid_pkgdata = inputparamdefinitiontype &
1191  ( &
1192  'GWF', & ! component
1193  'CSUB', & ! subcomponent
1194  'PACKAGEDATA', & ! block
1195  'CELLID', & ! tag name
1196  'CELLID_PKGDATA', & ! fortran variable
1197  'INTEGER1D', & ! type
1198  'NCELLDIM', & ! shape
1199  'cell identifier', & ! longname
1200  .true., & ! required
1201  .false., & ! developmode
1202  .true., & ! multi-record
1203  .false., & ! preserve case
1204  .false., & ! layered
1205  .false. & ! timeseries
1206  )
1207 
1208  type(inputparamdefinitiontype), parameter :: &
1209  gwfcsub_cdelay = inputparamdefinitiontype &
1210  ( &
1211  'GWF', & ! component
1212  'CSUB', & ! subcomponent
1213  'PACKAGEDATA', & ! block
1214  'CDELAY', & ! tag name
1215  'CDELAY', & ! fortran variable
1216  'STRING', & ! type
1217  '', & ! shape
1218  'delay type', & ! longname
1219  .true., & ! required
1220  .false., & ! developmode
1221  .true., & ! multi-record
1222  .false., & ! preserve case
1223  .false., & ! layered
1224  .false. & ! timeseries
1225  )
1226 
1227  type(inputparamdefinitiontype), parameter :: &
1228  gwfcsub_pcs0 = inputparamdefinitiontype &
1229  ( &
1230  'GWF', & ! component
1231  'CSUB', & ! subcomponent
1232  'PACKAGEDATA', & ! block
1233  'PCS0', & ! tag name
1234  'PCS0', & ! fortran variable
1235  'DOUBLE', & ! type
1236  '', & ! shape
1237  'initial stress', & ! longname
1238  .true., & ! required
1239  .false., & ! developmode
1240  .true., & ! multi-record
1241  .false., & ! preserve case
1242  .false., & ! layered
1243  .false. & ! timeseries
1244  )
1245 
1246  type(inputparamdefinitiontype), parameter :: &
1247  gwfcsub_thick_frac = inputparamdefinitiontype &
1248  ( &
1249  'GWF', & ! component
1250  'CSUB', & ! subcomponent
1251  'PACKAGEDATA', & ! block
1252  'THICK_FRAC', & ! tag name
1253  'THICK_FRAC', & ! fortran variable
1254  'DOUBLE', & ! type
1255  '', & ! shape
1256  'interbed thickness or cell fraction', & ! longname
1257  .true., & ! required
1258  .false., & ! developmode
1259  .true., & ! multi-record
1260  .false., & ! preserve case
1261  .false., & ! layered
1262  .false. & ! timeseries
1263  )
1264 
1265  type(inputparamdefinitiontype), parameter :: &
1266  gwfcsub_rnb = inputparamdefinitiontype &
1267  ( &
1268  'GWF', & ! component
1269  'CSUB', & ! subcomponent
1270  'PACKAGEDATA', & ! block
1271  'RNB', & ! tag name
1272  'RNB', & ! fortran variable
1273  'DOUBLE', & ! type
1274  '', & ! shape
1275  'delay interbed material factor', & ! longname
1276  .true., & ! required
1277  .false., & ! developmode
1278  .true., & ! multi-record
1279  .false., & ! preserve case
1280  .false., & ! layered
1281  .false. & ! timeseries
1282  )
1283 
1284  type(inputparamdefinitiontype), parameter :: &
1285  gwfcsub_ssv_cc = inputparamdefinitiontype &
1286  ( &
1287  'GWF', & ! component
1288  'CSUB', & ! subcomponent
1289  'PACKAGEDATA', & ! block
1290  'SSV_CC', & ! tag name
1291  'SSV_CC', & ! fortran variable
1292  'DOUBLE', & ! type
1293  '', & ! shape
1294  'initial interbed inelastic specific storage', & ! longname
1295  .true., & ! required
1296  .false., & ! developmode
1297  .true., & ! multi-record
1298  .false., & ! preserve case
1299  .false., & ! layered
1300  .false. & ! timeseries
1301  )
1302 
1303  type(inputparamdefinitiontype), parameter :: &
1304  gwfcsub_sse_cr = inputparamdefinitiontype &
1305  ( &
1306  'GWF', & ! component
1307  'CSUB', & ! subcomponent
1308  'PACKAGEDATA', & ! block
1309  'SSE_CR', & ! tag name
1310  'SSE_CR', & ! fortran variable
1311  'DOUBLE', & ! type
1312  '', & ! shape
1313  'initial interbed elastic specific storage', & ! longname
1314  .true., & ! required
1315  .false., & ! developmode
1316  .true., & ! multi-record
1317  .false., & ! preserve case
1318  .false., & ! layered
1319  .false. & ! timeseries
1320  )
1321 
1322  type(inputparamdefinitiontype), parameter :: &
1323  gwfcsub_theta = inputparamdefinitiontype &
1324  ( &
1325  'GWF', & ! component
1326  'CSUB', & ! subcomponent
1327  'PACKAGEDATA', & ! block
1328  'THETA', & ! tag name
1329  'THETA', & ! fortran variable
1330  'DOUBLE', & ! type
1331  '', & ! shape
1332  'initial interbed porosity', & ! longname
1333  .true., & ! required
1334  .false., & ! developmode
1335  .true., & ! multi-record
1336  .false., & ! preserve case
1337  .false., & ! layered
1338  .false. & ! timeseries
1339  )
1340 
1341  type(inputparamdefinitiontype), parameter :: &
1342  gwfcsub_kv = inputparamdefinitiontype &
1343  ( &
1344  'GWF', & ! component
1345  'CSUB', & ! subcomponent
1346  'PACKAGEDATA', & ! block
1347  'KV', & ! tag name
1348  'KV', & ! fortran variable
1349  'DOUBLE', & ! type
1350  '', & ! shape
1351  'delay interbed vertical hydraulic conductivity', & ! longname
1352  .true., & ! required
1353  .false., & ! developmode
1354  .true., & ! multi-record
1355  .false., & ! preserve case
1356  .false., & ! layered
1357  .false. & ! timeseries
1358  )
1359 
1360  type(inputparamdefinitiontype), parameter :: &
1361  gwfcsub_h0 = inputparamdefinitiontype &
1362  ( &
1363  'GWF', & ! component
1364  'CSUB', & ! subcomponent
1365  'PACKAGEDATA', & ! block
1366  'H0', & ! tag name
1367  'H0', & ! fortran variable
1368  'DOUBLE', & ! type
1369  '', & ! shape
1370  'initial delay interbed head', & ! longname
1371  .true., & ! required
1372  .false., & ! developmode
1373  .true., & ! multi-record
1374  .false., & ! preserve case
1375  .false., & ! layered
1376  .false. & ! timeseries
1377  )
1378 
1379  type(inputparamdefinitiontype), parameter :: &
1380  gwfcsub_boundname = inputparamdefinitiontype &
1381  ( &
1382  'GWF', & ! component
1383  'CSUB', & ! subcomponent
1384  'PACKAGEDATA', & ! block
1385  'BOUNDNAME', & ! tag name
1386  'BOUNDNAME', & ! fortran variable
1387  'STRING', & ! type
1388  '', & ! shape
1389  'well name', & ! longname
1390  .false., & ! required
1391  .false., & ! developmode
1392  .true., & ! multi-record
1393  .false., & ! preserve case
1394  .false., & ! layered
1395  .false. & ! timeseries
1396  )
1397 
1398  type(inputparamdefinitiontype), parameter :: &
1399  gwfcsub_cellid = inputparamdefinitiontype &
1400  ( &
1401  'GWF', & ! component
1402  'CSUB', & ! subcomponent
1403  'PERIOD', & ! block
1404  'CELLID', & ! tag name
1405  'CELLID', & ! fortran variable
1406  'INTEGER1D', & ! type
1407  'NCELLDIM', & ! shape
1408  'cell identifier', & ! longname
1409  .true., & ! required
1410  .false., & ! developmode
1411  .true., & ! multi-record
1412  .false., & ! preserve case
1413  .false., & ! layered
1414  .false. & ! timeseries
1415  )
1416 
1417  type(inputparamdefinitiontype), parameter :: &
1418  gwfcsub_sig0 = inputparamdefinitiontype &
1419  ( &
1420  'GWF', & ! component
1421  'CSUB', & ! subcomponent
1422  'PERIOD', & ! block
1423  'SIG0', & ! tag name
1424  'SIG0', & ! fortran variable
1425  'DOUBLE', & ! type
1426  '', & ! shape
1427  'well stress offset', & ! longname
1428  .true., & ! required
1429  .false., & ! developmode
1430  .true., & ! multi-record
1431  .false., & ! preserve case
1432  .false., & ! layered
1433  .true. & ! timeseries
1434  )
1435 
1436  type(inputparamdefinitiontype), parameter :: &
1437  gwf_csub_param_definitions(*) = &
1438  [ &
1439  gwfcsub_boundnames, &
1440  gwfcsub_print_input, &
1441  gwfcsub_save_flows, &
1442  gwfcsub_gammaw, &
1443  gwfcsub_beta, &
1444  gwfcsub_head_based, &
1445  gwfcsub_precon_head, &
1446  gwfcsub_ndelaycells, &
1447  gwfcsub_icompress, &
1448  gwfcsub_matprop, &
1449  gwfcsub_cell_fraction, &
1450  gwfcsub_interbed_state, &
1451  gwfcsub_precon_stress, &
1452  gwfcsub_delay_head, &
1453  gwfcsub_stress_lag, &
1454  gwfcsub_strainibfr, &
1455  gwfcsub_csvinterbed, &
1456  gwfcsub_fileout, &
1457  gwfcsub_interbedstrainfn, &
1458  gwfcsub_straincgfr, &
1459  gwfcsub_csvcoarse, &
1460  gwfcsub_coarsestrainfn, &
1461  gwfcsub_cmpfr, &
1462  gwfcsub_compaction, &
1463  gwfcsub_cmpfn, &
1464  gwfcsub_cmpelasticfr, &
1465  gwfcsub_cmpelastic, &
1466  gwfcsub_elasticcmpfn, &
1467  gwfcsub_cmpinelasticfr, &
1468  gwfcsub_cmpinelastic, &
1469  gwfcsub_inelasticcmpfn, &
1470  gwfcsub_cmpinterbedfr, &
1471  gwfcsub_cmpinterbed, &
1472  gwfcsub_interbedcmpfn, &
1473  gwfcsub_cmpcoarsefr, &
1474  gwfcsub_cmpcoarse, &
1475  gwfcsub_cmpcoarsefn, &
1476  gwfcsub_zdispfr, &
1477  gwfcsub_zdisplacement, &
1478  gwfcsub_zdispfn, &
1479  gwfcsub_pkgconvergefr, &
1480  gwfcsub_pkgconverge, &
1481  gwfcsub_pkgconvergefn, &
1482  gwfcsub_ts_filerecord, &
1483  gwfcsub_ts6, &
1484  gwfcsub_filein, &
1485  gwfcsub_ts6_filename, &
1486  gwfcsub_obs_filerecord, &
1487  gwfcsub_obs6, &
1488  gwfcsub_obs6_filename, &
1489  gwfcsub_ninterbeds, &
1490  gwfcsub_maxbound, &
1491  gwfcsub_cg_ske_cr, &
1492  gwfcsub_cg_theta, &
1493  gwfcsub_sgm, &
1494  gwfcsub_sgs, &
1495  gwfcsub_icsubno, &
1496  gwfcsub_cellid_pkgdata, &
1497  gwfcsub_cdelay, &
1498  gwfcsub_pcs0, &
1499  gwfcsub_thick_frac, &
1500  gwfcsub_rnb, &
1501  gwfcsub_ssv_cc, &
1502  gwfcsub_sse_cr, &
1503  gwfcsub_theta, &
1504  gwfcsub_kv, &
1505  gwfcsub_h0, &
1506  gwfcsub_boundname, &
1507  gwfcsub_cellid, &
1508  gwfcsub_sig0 &
1509  ]
1510 
1511  type(inputparamdefinitiontype), parameter :: &
1512  gwfcsub_packagedata = inputparamdefinitiontype &
1513  ( &
1514  'GWF', & ! component
1515  'CSUB', & ! subcomponent
1516  'PACKAGEDATA', & ! block
1517  'PACKAGEDATA', & ! tag name
1518  'PACKAGEDATA', & ! fortran variable
1519  'RECARRAY ICSUBNO CELLID CDELAY PCS0 THICK_FRAC RNB SSV_CC '// &
1520  'SSE_CR THETA KV H0 BOUNDNAME', & ! type
1521  'NINTERBEDS', & ! shape
1522  '', & ! longname
1523  .false., & ! required
1524  .false., & ! developmode
1525  .false., & ! multi-record
1526  .false., & ! preserve case
1527  .false., & ! layered
1528  .false. & ! timeseries
1529  )
1530 
1531  type(inputparamdefinitiontype), parameter :: &
1532  gwfcsub_spd = inputparamdefinitiontype &
1533  ( &
1534  'GWF', & ! component
1535  'CSUB', & ! subcomponent
1536  'PERIOD', & ! block
1537  'STRESS_PERIOD_DATA', & ! tag name
1538  'SPD', & ! fortran variable
1539  'RECARRAY CELLID SIG0', & ! type
1540  'MAXSIG0', & ! shape
1541  '', & ! longname
1542  .true., & ! required
1543  .false., & ! developmode
1544  .false., & ! multi-record
1545  .false., & ! preserve case
1546  .false., & ! layered
1547  .false. & ! timeseries
1548  )
1549 
1550  type(inputparamdefinitiontype), parameter :: &
1551  gwf_csub_aggregate_definitions(*) = &
1552  [ &
1553  gwfcsub_packagedata, &
1554  gwfcsub_spd &
1555  ]
1556 
1557  type(inputblockdefinitiontype), parameter :: &
1558  gwf_csub_block_definitions(*) = &
1559  [ &
1560  inputblockdefinitiontype( &
1561  'OPTIONS', & ! blockname
1562  .false., & ! required
1563  .false., & ! aggregate
1564  .false. & ! block_variable
1565  ), &
1566  inputblockdefinitiontype( &
1567  'DIMENSIONS', & ! blockname
1568  .true., & ! required
1569  .false., & ! aggregate
1570  .false. & ! block_variable
1571  ), &
1572  inputblockdefinitiontype( &
1573  'GRIDDATA', & ! blockname
1574  .true., & ! required
1575  .false., & ! aggregate
1576  .false. & ! block_variable
1577  ), &
1578  inputblockdefinitiontype( &
1579  'PACKAGEDATA', & ! blockname
1580  .false., & ! required
1581  .true., & ! aggregate
1582  .false. & ! block_variable
1583  ), &
1584  inputblockdefinitiontype( &
1585  'PERIOD', & ! blockname
1586  .true., & ! required
1587  .true., & ! aggregate
1588  .true. & ! block_variable
1589  ) &
1590  ]
1591 
1592 end module gwfcsubinputmodule
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
gwfcsubinputmodule::gwfcsub_filein
type(inputparamdefinitiontype), parameter gwfcsub_filein
Definition: gwf-csubidm.f90:961
gwfcsubinputmodule::gwfcsub_zdispfn
type(inputparamdefinitiontype), parameter gwfcsub_zdispfn
Definition: gwf-csubidm.f90:846
gwfcsubinputmodule::gwfcsub_pcs0
type(inputparamdefinitiontype), parameter gwfcsub_pcs0
Definition: gwf-csubidm.f90:1227
gwfcsubinputmodule::gwfcsub_straincgfr
type(inputparamdefinitiontype), parameter gwfcsub_straincgfr
Definition: gwf-csubidm.f90:463
gwfcsubinputmodule::gwfcsub_pkgconverge
type(inputparamdefinitiontype), parameter gwfcsub_pkgconverge
Definition: gwf-csubidm.f90:885
gwfcsubinputmodule::gwfcsub_icompress
type(inputparamdefinitiontype), parameter gwfcsub_icompress
Definition: gwf-csubidm.f90:248
gwfcsubinputmodule::gwfcsub_interbedstrainfn
type(inputparamdefinitiontype), parameter gwfcsub_interbedstrainfn
Definition: gwf-csubidm.f90:444
gwfcsubinputmodule::gwf_csub_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_csub_aggregate_definitions
Definition: gwf-csubidm.f90:1550
gwfcsubinputmodule::gwfcsub_stress_lag
type(inputparamdefinitiontype), parameter gwfcsub_stress_lag
Definition: gwf-csubidm.f90:367
gwfcsubinputmodule::gwfcsub_cg_theta
type(inputparamdefinitiontype), parameter gwfcsub_cg_theta
Definition: gwf-csubidm.f90:1113
gwfcsubinputmodule::gwfcsub_cmpelasticfr
type(inputparamdefinitiontype), parameter gwfcsub_cmpelasticfr
Definition: gwf-csubidm.f90:577
gwfcsubinputmodule::gwfcsub_h0
type(inputparamdefinitiontype), parameter gwfcsub_h0
Definition: gwf-csubidm.f90:1360
gwfcsubinputmodule::gwfcsub_cellid_pkgdata
type(inputparamdefinitiontype), parameter gwfcsub_cellid_pkgdata
Definition: gwf-csubidm.f90:1189
gwfcsubinputmodule::gwfcsub_pkgconvergefn
type(inputparamdefinitiontype), parameter gwfcsub_pkgconvergefn
Definition: gwf-csubidm.f90:904
gwfcsubinputmodule::gwfcsub_kv
type(inputparamdefinitiontype), parameter gwfcsub_kv
Definition: gwf-csubidm.f90:1341
gwfcsubinputmodule::gwf_csub_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_csub_param_definitions
Definition: gwf-csubidm.f90:1436
gwfcsubinputmodule::gwfcsub_cmpfr
type(inputparamdefinitiontype), parameter gwfcsub_cmpfr
Definition: gwf-csubidm.f90:520
gwfcsubinputmodule::gwfcsub_csvinterbed
type(inputparamdefinitiontype), parameter gwfcsub_csvinterbed
Definition: gwf-csubidm.f90:406
gwfcsubinputmodule::gwfcsub_cellid
type(inputparamdefinitiontype), parameter gwfcsub_cellid
Definition: gwf-csubidm.f90:1398
gwfcsubinputmodule::gwfcsub_elasticcmpfn
type(inputparamdefinitiontype), parameter gwfcsub_elasticcmpfn
Definition: gwf-csubidm.f90:616
gwfcsubinputmodule::gwfcsub_precon_head
type(inputparamdefinitiontype), parameter gwfcsub_precon_head
Definition: gwf-csubidm.f90:209
gwfcsubinputmodule::gwfcsub_cmpinterbedfr
type(inputparamdefinitiontype), parameter gwfcsub_cmpinterbedfr
Definition: gwf-csubidm.f90:693
gwfcsubinputmodule::gwfcsub_sgm
type(inputparamdefinitiontype), parameter gwfcsub_sgm
Definition: gwf-csubidm.f90:1132
gwfcsubinputmodule::gwfcsub_spd
type(inputparamdefinitiontype), parameter gwfcsub_spd
Definition: gwf-csubidm.f90:1531
gwfcsubinputmodule::gwfcsub_cmpinelasticfr
type(inputparamdefinitiontype), parameter gwfcsub_cmpinelasticfr
Definition: gwf-csubidm.f90:635
gwfcsubinputmodule::gwfcsub_cell_fraction
type(inputparamdefinitiontype), parameter gwfcsub_cell_fraction
Definition: gwf-csubidm.f90:288
gwfcsubinputmodule::gwfcsub_pkgconvergefr
type(inputparamdefinitiontype), parameter gwfcsub_pkgconvergefr
Definition: gwf-csubidm.f90:865
gwfcsubinputmodule::gwfcsub_ssv_cc
type(inputparamdefinitiontype), parameter gwfcsub_ssv_cc
Definition: gwf-csubidm.f90:1284
gwfcsubinputmodule::gwfcsub_cmpcoarsefn
type(inputparamdefinitiontype), parameter gwfcsub_cmpcoarsefn
Definition: gwf-csubidm.f90:789
gwfcsubinputmodule::gwf_csub_subpackages
character(len=16), dimension(*), parameter, public gwf_csub_subpackages
Definition: gwf-csubidm.f90:89
gwfcsubinputmodule::gwfcsub_precon_stress
type(inputparamdefinitiontype), parameter gwfcsub_precon_stress
Definition: gwf-csubidm.f90:327
gwfcsubinputmodule::gwfcsub_cmpfn
type(inputparamdefinitiontype), parameter gwfcsub_cmpfn
Definition: gwf-csubidm.f90:558
gwfcsubinputmodule::gwfcsub_ninterbeds
type(inputparamdefinitiontype), parameter gwfcsub_ninterbeds
Definition: gwf-csubidm.f90:1056
gwfcsubinputmodule::gwfcsub_rnb
type(inputparamdefinitiontype), parameter gwfcsub_rnb
Definition: gwf-csubidm.f90:1265
gwfcsubinputmodule::gwfcsub_save_flows
type(inputparamdefinitiontype), parameter gwfcsub_save_flows
Definition: gwf-csubidm.f90:133
gwfcsubinputmodule::gwfcsub_sig0
type(inputparamdefinitiontype), parameter gwfcsub_sig0
Definition: gwf-csubidm.f90:1417
gwfcsubinputmodule::gwfcsub_obs6
type(inputparamdefinitiontype), parameter gwfcsub_obs6
Definition: gwf-csubidm.f90:1018
gwfcsubinputmodule::gwfcsub_ts6_filename
type(inputparamdefinitiontype), parameter gwfcsub_ts6_filename
Definition: gwf-csubidm.f90:980
gwfcsubinputmodule::gwfcsub_compaction
type(inputparamdefinitiontype), parameter gwfcsub_compaction
Definition: gwf-csubidm.f90:539
gwfcsubinputmodule::gwfcsub_head_based
type(inputparamdefinitiontype), parameter gwfcsub_head_based
Definition: gwf-csubidm.f90:190
gwfcsubinputmodule::gwfcsub_beta
type(inputparamdefinitiontype), parameter gwfcsub_beta
Definition: gwf-csubidm.f90:171
gwfcsubinputmodule::gwfcsub_sse_cr
type(inputparamdefinitiontype), parameter gwfcsub_sse_cr
Definition: gwf-csubidm.f90:1303
gwfcsubinputmodule::gwfcsub_ts_filerecord
type(inputparamdefinitiontype), parameter gwfcsub_ts_filerecord
Definition: gwf-csubidm.f90:923
gwfcsubinputmodule::gwfcsub_cmpelastic
type(inputparamdefinitiontype), parameter gwfcsub_cmpelastic
Definition: gwf-csubidm.f90:597
gwfcsubinputmodule::gwfcsub_zdispfr
type(inputparamdefinitiontype), parameter gwfcsub_zdispfr
Definition: gwf-csubidm.f90:808
gwfcsubinputmodule::gwfcsub_strainibfr
type(inputparamdefinitiontype), parameter gwfcsub_strainibfr
Definition: gwf-csubidm.f90:387
gwfcsubinputmodule::gwfcsub_icsubno
type(inputparamdefinitiontype), parameter gwfcsub_icsubno
Definition: gwf-csubidm.f90:1170
gwfcsubinputmodule::gwf_csub_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public gwf_csub_block_definitions
Definition: gwf-csubidm.f90:1557
gwfcsubinputmodule::gwfcsub_ts6
type(inputparamdefinitiontype), parameter gwfcsub_ts6
Definition: gwf-csubidm.f90:942
gwfcsubinputmodule::gwfcsub_coarsestrainfn
type(inputparamdefinitiontype), parameter gwfcsub_coarsestrainfn
Definition: gwf-csubidm.f90:501
gwfcsubinputmodule::gwfcsub_cmpinelastic
type(inputparamdefinitiontype), parameter gwfcsub_cmpinelastic
Definition: gwf-csubidm.f90:655
gwfcsubinputmodule::gwfcsub_print_input
type(inputparamdefinitiontype), parameter gwfcsub_print_input
Definition: gwf-csubidm.f90:114
gwfcsubinputmodule::gwfcsub_gammaw
type(inputparamdefinitiontype), parameter gwfcsub_gammaw
Definition: gwf-csubidm.f90:152
gwfcsubinputmodule::gwf_csub_multi_package
logical, public gwf_csub_multi_package
Definition: gwf-csubidm.f90:87
gwfcsubinputmodule::gwfcsub_interbedcmpfn
type(inputparamdefinitiontype), parameter gwfcsub_interbedcmpfn
Definition: gwf-csubidm.f90:732
gwfcsubinputmodule::gwfcsub_matprop
type(inputparamdefinitiontype), parameter gwfcsub_matprop
Definition: gwf-csubidm.f90:268
gwfcsubinputmodule::gwfcsub_boundnames
type(inputparamdefinitiontype), parameter gwfcsub_boundnames
Definition: gwf-csubidm.f90:95
gwfcsubinputmodule::gwfcsub_obs6_filename
type(inputparamdefinitiontype), parameter gwfcsub_obs6_filename
Definition: gwf-csubidm.f90:1037
gwfcsubinputmodule::gwfcsub_boundname
type(inputparamdefinitiontype), parameter gwfcsub_boundname
Definition: gwf-csubidm.f90:1379
gwfcsubinputmodule::gwfcsub_zdisplacement
type(inputparamdefinitiontype), parameter gwfcsub_zdisplacement
Definition: gwf-csubidm.f90:827
gwfcsubinputmodule::gwfcsub_interbed_state
type(inputparamdefinitiontype), parameter gwfcsub_interbed_state
Definition: gwf-csubidm.f90:307
gwfcsubinputmodule::gwfcsub_obs_filerecord
type(inputparamdefinitiontype), parameter gwfcsub_obs_filerecord
Definition: gwf-csubidm.f90:999
gwfcsubinputmodule::gwfcsub_cmpcoarsefr
type(inputparamdefinitiontype), parameter gwfcsub_cmpcoarsefr
Definition: gwf-csubidm.f90:751
gwfcsubinputmodule::gwfcsub_fileout
type(inputparamdefinitiontype), parameter gwfcsub_fileout
Definition: gwf-csubidm.f90:425
gwfcsubinputmodule::gwfcsub_csvcoarse
type(inputparamdefinitiontype), parameter gwfcsub_csvcoarse
Definition: gwf-csubidm.f90:482
gwfcsubinputmodule::gwfcsub_sgs
type(inputparamdefinitiontype), parameter gwfcsub_sgs
Definition: gwf-csubidm.f90:1151
gwfcsubinputmodule::gwfcsub_cdelay
type(inputparamdefinitiontype), parameter gwfcsub_cdelay
Definition: gwf-csubidm.f90:1208
gwfcsubinputmodule::gwfcsub_theta
type(inputparamdefinitiontype), parameter gwfcsub_theta
Definition: gwf-csubidm.f90:1322
gwfcsubinputmodule::gwfcsub_cmpinterbed
type(inputparamdefinitiontype), parameter gwfcsub_cmpinterbed
Definition: gwf-csubidm.f90:713
gwfcsubinputmodule::gwfcsub_inelasticcmpfn
type(inputparamdefinitiontype), parameter gwfcsub_inelasticcmpfn
Definition: gwf-csubidm.f90:674
gwfcsubinputmodule::gwfcsub_maxbound
type(inputparamdefinitiontype), parameter gwfcsub_maxbound
Definition: gwf-csubidm.f90:1075
gwfcsubinputmodule::gwfcsub_ndelaycells
type(inputparamdefinitiontype), parameter gwfcsub_ndelaycells
Definition: gwf-csubidm.f90:229
gwfcsubinputmodule::gwfcsub_packagedata
type(inputparamdefinitiontype), parameter gwfcsub_packagedata
Definition: gwf-csubidm.f90:1511
gwfcsubinputmodule::gwfcsub_thick_frac
type(inputparamdefinitiontype), parameter gwfcsub_thick_frac
Definition: gwf-csubidm.f90:1246
gwfcsubinputmodule::gwfcsub_cg_ske_cr
type(inputparamdefinitiontype), parameter gwfcsub_cg_ske_cr
Definition: gwf-csubidm.f90:1094
gwfcsubinputmodule::gwfcsub_cmpcoarse
type(inputparamdefinitiontype), parameter gwfcsub_cmpcoarse
Definition: gwf-csubidm.f90:770
gwfcsubinputmodule::gwfcsub_delay_head
type(inputparamdefinitiontype), parameter gwfcsub_delay_head
Definition: gwf-csubidm.f90:347
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