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