MODFLOW 6  version 6.7.0.dev2
USGS Modular Hydrologic Model
gwt-mstidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module gwtmstinputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public gwt_mst_param_definitions
8  public gwt_mst_aggregate_definitions
9  public gwt_mst_block_definitions
10  public gwtmstparamfoundtype
11  public gwt_mst_multi_package
12  public gwt_mst_subpackages
13 
14  type gwtmstparamfoundtype
15  logical :: save_flows = .false.
16  logical :: order1_decay = .false.
17  logical :: order0_decay = .false.
18  logical :: sorption = .false.
19  logical :: sorbate_rec = .false.
20  logical :: sorbate = .false.
21  logical :: fileout = .false.
22  logical :: sorbatefile = .false.
23  logical :: export_ascii = .false.
24  logical :: export_nc = .false.
25  logical :: porosity = .false.
26  logical :: decay = .false.
27  logical :: decay_sorbed = .false.
28  logical :: bulk_density = .false.
29  logical :: distcoef = .false.
30  logical :: sp2 = .false.
31  end type gwtmstparamfoundtype
32 
33  logical :: gwt_mst_multi_package = .false.
34 
35  character(len=16), parameter :: &
36  gwt_mst_subpackages(*) = &
37  [ &
38  ' ' &
39  ]
40 
41  type(inputparamdefinitiontype), parameter :: &
42  gwtmst_save_flows = inputparamdefinitiontype &
43  ( &
44  'GWT', & ! component
45  'MST', & ! subcomponent
46  'OPTIONS', & ! block
47  'SAVE_FLOWS', & ! tag name
48  'SAVE_FLOWS', & ! fortran variable
49  'KEYWORD', & ! type
50  '', & ! shape
51  'save calculated flows to budget file', & ! longname
52  .false., & ! required
53  .false., & ! multi-record
54  .false., & ! preserve case
55  .false., & ! layered
56  .false. & ! timeseries
57  )
58 
59  type(inputparamdefinitiontype), parameter :: &
60  gwtmst_order1_decay = inputparamdefinitiontype &
61  ( &
62  'GWT', & ! component
63  'MST', & ! subcomponent
64  'OPTIONS', & ! block
65  'FIRST_ORDER_DECAY', & ! tag name
66  'ORDER1_DECAY', & ! fortran variable
67  'KEYWORD', & ! type
68  '', & ! shape
69  'activate first-order decay', & ! longname
70  .false., & ! required
71  .false., & ! multi-record
72  .false., & ! preserve case
73  .false., & ! layered
74  .false. & ! timeseries
75  )
76 
77  type(inputparamdefinitiontype), parameter :: &
78  gwtmst_order0_decay = inputparamdefinitiontype &
79  ( &
80  'GWT', & ! component
81  'MST', & ! subcomponent
82  'OPTIONS', & ! block
83  'ZERO_ORDER_DECAY', & ! tag name
84  'ORDER0_DECAY', & ! fortran variable
85  'KEYWORD', & ! type
86  '', & ! shape
87  'activate zero-order decay', & ! longname
88  .false., & ! required
89  .false., & ! multi-record
90  .false., & ! preserve case
91  .false., & ! layered
92  .false. & ! timeseries
93  )
94 
95  type(inputparamdefinitiontype), parameter :: &
96  gwtmst_sorption = inputparamdefinitiontype &
97  ( &
98  'GWT', & ! component
99  'MST', & ! subcomponent
100  'OPTIONS', & ! block
101  'SORPTION', & ! tag name
102  'SORPTION', & ! fortran variable
103  'STRING', & ! type
104  '', & ! shape
105  'activate sorption', & ! 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  gwtmst_sorbate_rec = inputparamdefinitiontype &
115  ( &
116  'GWT', & ! component
117  'MST', & ! subcomponent
118  'OPTIONS', & ! block
119  'SORBATE_FILERECORD', & ! tag name
120  'SORBATE_REC', & ! fortran variable
121  'RECORD SORBATE FILEOUT SORBATEFILE', & ! type
122  '', & ! shape
123  '', & ! 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  gwtmst_sorbate = inputparamdefinitiontype &
133  ( &
134  'GWT', & ! component
135  'MST', & ! subcomponent
136  'OPTIONS', & ! block
137  'SORBATE', & ! tag name
138  'SORBATE', & ! fortran variable
139  'KEYWORD', & ! type
140  '', & ! shape
141  'sorbate keyword', & ! longname
142  .true., & ! required
143  .true., & ! multi-record
144  .false., & ! preserve case
145  .false., & ! layered
146  .false. & ! timeseries
147  )
148 
149  type(inputparamdefinitiontype), parameter :: &
150  gwtmst_fileout = inputparamdefinitiontype &
151  ( &
152  'GWT', & ! component
153  'MST', & ! subcomponent
154  'OPTIONS', & ! block
155  'FILEOUT', & ! tag name
156  'FILEOUT', & ! fortran variable
157  'KEYWORD', & ! type
158  '', & ! shape
159  'file keyword', & ! longname
160  .true., & ! required
161  .true., & ! multi-record
162  .false., & ! preserve case
163  .false., & ! layered
164  .false. & ! timeseries
165  )
166 
167  type(inputparamdefinitiontype), parameter :: &
168  gwtmst_sorbatefile = inputparamdefinitiontype &
169  ( &
170  'GWT', & ! component
171  'MST', & ! subcomponent
172  'OPTIONS', & ! block
173  'SORBATEFILE', & ! tag name
174  'SORBATEFILE', & ! fortran variable
175  'STRING', & ! type
176  '', & ! shape
177  'file keyword', & ! longname
178  .true., & ! required
179  .true., & ! multi-record
180  .true., & ! preserve case
181  .false., & ! layered
182  .false. & ! timeseries
183  )
184 
185  type(inputparamdefinitiontype), parameter :: &
186  gwtmst_export_ascii = inputparamdefinitiontype &
187  ( &
188  'GWT', & ! component
189  'MST', & ! subcomponent
190  'OPTIONS', & ! block
191  'EXPORT_ARRAY_ASCII', & ! tag name
192  'EXPORT_ASCII', & ! fortran variable
193  'KEYWORD', & ! type
194  '', & ! shape
195  'export array variables to layered ascii files.', & ! 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  gwtmst_export_nc = inputparamdefinitiontype &
205  ( &
206  'GWT', & ! component
207  'MST', & ! subcomponent
208  'OPTIONS', & ! block
209  'EXPORT_ARRAY_NETCDF', & ! tag name
210  'EXPORT_NC', & ! fortran variable
211  'KEYWORD', & ! type
212  '', & ! shape
213  'export array variables to netcdf output files.', & ! 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  gwtmst_porosity = inputparamdefinitiontype &
223  ( &
224  'GWT', & ! component
225  'MST', & ! subcomponent
226  'GRIDDATA', & ! block
227  'POROSITY', & ! tag name
228  'POROSITY', & ! fortran variable
229  'DOUBLE1D', & ! type
230  'NODES', & ! shape
231  'porosity', & ! longname
232  .true., & ! required
233  .false., & ! multi-record
234  .false., & ! preserve case
235  .true., & ! layered
236  .false. & ! timeseries
237  )
238 
239  type(inputparamdefinitiontype), parameter :: &
240  gwtmst_decay = inputparamdefinitiontype &
241  ( &
242  'GWT', & ! component
243  'MST', & ! subcomponent
244  'GRIDDATA', & ! block
245  'DECAY', & ! tag name
246  'DECAY', & ! fortran variable
247  'DOUBLE1D', & ! type
248  'NODES', & ! shape
249  'aqueous phase decay rate coefficient', & ! longname
250  .false., & ! required
251  .false., & ! multi-record
252  .false., & ! preserve case
253  .true., & ! layered
254  .false. & ! timeseries
255  )
256 
257  type(inputparamdefinitiontype), parameter :: &
258  gwtmst_decay_sorbed = inputparamdefinitiontype &
259  ( &
260  'GWT', & ! component
261  'MST', & ! subcomponent
262  'GRIDDATA', & ! block
263  'DECAY_SORBED', & ! tag name
264  'DECAY_SORBED', & ! fortran variable
265  'DOUBLE1D', & ! type
266  'NODES', & ! shape
267  'sorbed phase decay rate coefficient', & ! longname
268  .false., & ! required
269  .false., & ! multi-record
270  .false., & ! preserve case
271  .true., & ! layered
272  .false. & ! timeseries
273  )
274 
275  type(inputparamdefinitiontype), parameter :: &
276  gwtmst_bulk_density = inputparamdefinitiontype &
277  ( &
278  'GWT', & ! component
279  'MST', & ! subcomponent
280  'GRIDDATA', & ! block
281  'BULK_DENSITY', & ! tag name
282  'BULK_DENSITY', & ! fortran variable
283  'DOUBLE1D', & ! type
284  'NODES', & ! shape
285  'bulk density', & ! longname
286  .false., & ! required
287  .false., & ! multi-record
288  .false., & ! preserve case
289  .true., & ! layered
290  .false. & ! timeseries
291  )
292 
293  type(inputparamdefinitiontype), parameter :: &
294  gwtmst_distcoef = inputparamdefinitiontype &
295  ( &
296  'GWT', & ! component
297  'MST', & ! subcomponent
298  'GRIDDATA', & ! block
299  'DISTCOEF', & ! tag name
300  'DISTCOEF', & ! fortran variable
301  'DOUBLE1D', & ! type
302  'NODES', & ! shape
303  'distribution coefficient', & ! longname
304  .false., & ! required
305  .false., & ! multi-record
306  .false., & ! preserve case
307  .true., & ! layered
308  .false. & ! timeseries
309  )
310 
311  type(inputparamdefinitiontype), parameter :: &
312  gwtmst_sp2 = inputparamdefinitiontype &
313  ( &
314  'GWT', & ! component
315  'MST', & ! subcomponent
316  'GRIDDATA', & ! block
317  'SP2', & ! tag name
318  'SP2', & ! fortran variable
319  'DOUBLE1D', & ! type
320  'NODES', & ! shape
321  'second sorption parameter', & ! longname
322  .false., & ! required
323  .false., & ! multi-record
324  .false., & ! preserve case
325  .true., & ! layered
326  .false. & ! timeseries
327  )
328 
329  type(inputparamdefinitiontype), parameter :: &
330  gwt_mst_param_definitions(*) = &
331  [ &
332  gwtmst_save_flows, &
333  gwtmst_order1_decay, &
334  gwtmst_order0_decay, &
335  gwtmst_sorption, &
336  gwtmst_sorbate_rec, &
337  gwtmst_sorbate, &
338  gwtmst_fileout, &
339  gwtmst_sorbatefile, &
340  gwtmst_export_ascii, &
341  gwtmst_export_nc, &
342  gwtmst_porosity, &
343  gwtmst_decay, &
344  gwtmst_decay_sorbed, &
345  gwtmst_bulk_density, &
346  gwtmst_distcoef, &
347  gwtmst_sp2 &
348  ]
349 
350  type(inputparamdefinitiontype), parameter :: &
351  gwt_mst_aggregate_definitions(*) = &
352  [ &
353  inputparamdefinitiontype &
354  ( &
355  '', & ! component
356  '', & ! subcomponent
357  '', & ! block
358  '', & ! tag name
359  '', & ! fortran variable
360  '', & ! type
361  '', & ! shape
362  '', & ! longname
363  .false., & ! required
364  .false., & ! multi-record
365  .false., & ! preserve case
366  .false., & ! layered
367  .false. & ! timeseries
368  ) &
369  ]
370 
371  type(inputblockdefinitiontype), parameter :: &
372  gwt_mst_block_definitions(*) = &
373  [ &
374  inputblockdefinitiontype( &
375  'OPTIONS', & ! blockname
376  .false., & ! required
377  .false., & ! aggregate
378  .false. & ! block_variable
379  ), &
380  inputblockdefinitiontype( &
381  'GRIDDATA', & ! blockname
382  .true., & ! required
383  .false., & ! aggregate
384  .false. & ! block_variable
385  ) &
386  ]
387 
388 end module gwtmstinputmodule
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
gwtmstinputmodule::gwtmst_sp2
type(inputparamdefinitiontype), parameter gwtmst_sp2
Definition: gwt-mstidm.f90:311
gwtmstinputmodule::gwt_mst_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwt_mst_param_definitions
Definition: gwt-mstidm.f90:329
gwtmstinputmodule::gwtmst_sorbatefile
type(inputparamdefinitiontype), parameter gwtmst_sorbatefile
Definition: gwt-mstidm.f90:167
gwtmstinputmodule::gwtmst_export_nc
type(inputparamdefinitiontype), parameter gwtmst_export_nc
Definition: gwt-mstidm.f90:203
gwtmstinputmodule::gwt_mst_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwt_mst_aggregate_definitions
Definition: gwt-mstidm.f90:350
gwtmstinputmodule::gwtmst_bulk_density
type(inputparamdefinitiontype), parameter gwtmst_bulk_density
Definition: gwt-mstidm.f90:275
gwtmstinputmodule::gwtmst_order1_decay
type(inputparamdefinitiontype), parameter gwtmst_order1_decay
Definition: gwt-mstidm.f90:59
gwtmstinputmodule::gwtmst_save_flows
type(inputparamdefinitiontype), parameter gwtmst_save_flows
Definition: gwt-mstidm.f90:41
gwtmstinputmodule::gwt_mst_subpackages
character(len=16), dimension(*), parameter, public gwt_mst_subpackages
Definition: gwt-mstidm.f90:35
gwtmstinputmodule::gwtmst_decay
type(inputparamdefinitiontype), parameter gwtmst_decay
Definition: gwt-mstidm.f90:239
gwtmstinputmodule::gwtmst_decay_sorbed
type(inputparamdefinitiontype), parameter gwtmst_decay_sorbed
Definition: gwt-mstidm.f90:257
gwtmstinputmodule::gwtmst_sorption
type(inputparamdefinitiontype), parameter gwtmst_sorption
Definition: gwt-mstidm.f90:95
gwtmstinputmodule::gwtmst_order0_decay
type(inputparamdefinitiontype), parameter gwtmst_order0_decay
Definition: gwt-mstidm.f90:77
gwtmstinputmodule::gwtmst_distcoef
type(inputparamdefinitiontype), parameter gwtmst_distcoef
Definition: gwt-mstidm.f90:293
gwtmstinputmodule::gwtmst_fileout
type(inputparamdefinitiontype), parameter gwtmst_fileout
Definition: gwt-mstidm.f90:149
gwtmstinputmodule::gwtmst_export_ascii
type(inputparamdefinitiontype), parameter gwtmst_export_ascii
Definition: gwt-mstidm.f90:185
gwtmstinputmodule::gwt_mst_multi_package
logical, public gwt_mst_multi_package
Definition: gwt-mstidm.f90:33
gwtmstinputmodule::gwtmst_sorbate_rec
type(inputparamdefinitiontype), parameter gwtmst_sorbate_rec
Definition: gwt-mstidm.f90:113
gwtmstinputmodule::gwtmst_porosity
type(inputparamdefinitiontype), parameter gwtmst_porosity
Definition: gwt-mstidm.f90:221
gwtmstinputmodule::gwtmst_sorbate
type(inputparamdefinitiontype), parameter gwtmst_sorbate
Definition: gwt-mstidm.f90:131
gwtmstinputmodule::gwt_mst_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public gwt_mst_block_definitions
Definition: gwt-mstidm.f90:371
inputdefinitionmodule
This module contains the InputDefinitionModule.
Definition: InputDefinition.f90:7