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