MODFLOW 6  version 6.7.0.dev3
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., & ! prerelease
54  .false., & ! multi-record
55  .false., & ! preserve case
56  .false., & ! layered
57  .false. & ! timeseries
58  )
59 
60  type(inputparamdefinitiontype), parameter :: &
61  gwtmst_order1_decay = inputparamdefinitiontype &
62  ( &
63  'GWT', & ! component
64  'MST', & ! subcomponent
65  'OPTIONS', & ! block
66  'FIRST_ORDER_DECAY', & ! tag name
67  'ORDER1_DECAY', & ! fortran variable
68  'KEYWORD', & ! type
69  '', & ! shape
70  'activate first-order decay', & ! longname
71  .false., & ! required
72  .false., & ! prerelease
73  .false., & ! multi-record
74  .false., & ! preserve case
75  .false., & ! layered
76  .false. & ! timeseries
77  )
78 
79  type(inputparamdefinitiontype), parameter :: &
80  gwtmst_order0_decay = inputparamdefinitiontype &
81  ( &
82  'GWT', & ! component
83  'MST', & ! subcomponent
84  'OPTIONS', & ! block
85  'ZERO_ORDER_DECAY', & ! tag name
86  'ORDER0_DECAY', & ! fortran variable
87  'KEYWORD', & ! type
88  '', & ! shape
89  'activate zero-order decay', & ! longname
90  .false., & ! required
91  .false., & ! prerelease
92  .false., & ! multi-record
93  .false., & ! preserve case
94  .false., & ! layered
95  .false. & ! timeseries
96  )
97 
98  type(inputparamdefinitiontype), parameter :: &
99  gwtmst_sorption = inputparamdefinitiontype &
100  ( &
101  'GWT', & ! component
102  'MST', & ! subcomponent
103  'OPTIONS', & ! block
104  'SORPTION', & ! tag name
105  'SORPTION', & ! fortran variable
106  'STRING', & ! type
107  '', & ! shape
108  'activate sorption', & ! longname
109  .false., & ! required
110  .false., & ! prerelease
111  .false., & ! multi-record
112  .false., & ! preserve case
113  .false., & ! layered
114  .false. & ! timeseries
115  )
116 
117  type(inputparamdefinitiontype), parameter :: &
118  gwtmst_sorbate_rec = inputparamdefinitiontype &
119  ( &
120  'GWT', & ! component
121  'MST', & ! subcomponent
122  'OPTIONS', & ! block
123  'SORBATE_FILERECORD', & ! tag name
124  'SORBATE_REC', & ! fortran variable
125  'RECORD SORBATE FILEOUT SORBATEFILE', & ! type
126  '', & ! shape
127  '', & ! longname
128  .false., & ! required
129  .false., & ! prerelease
130  .false., & ! multi-record
131  .false., & ! preserve case
132  .false., & ! layered
133  .false. & ! timeseries
134  )
135 
136  type(inputparamdefinitiontype), parameter :: &
137  gwtmst_sorbate = inputparamdefinitiontype &
138  ( &
139  'GWT', & ! component
140  'MST', & ! subcomponent
141  'OPTIONS', & ! block
142  'SORBATE', & ! tag name
143  'SORBATE', & ! fortran variable
144  'KEYWORD', & ! type
145  '', & ! shape
146  'sorbate keyword', & ! longname
147  .true., & ! required
148  .false., & ! prerelease
149  .true., & ! multi-record
150  .false., & ! preserve case
151  .false., & ! layered
152  .false. & ! timeseries
153  )
154 
155  type(inputparamdefinitiontype), parameter :: &
156  gwtmst_fileout = inputparamdefinitiontype &
157  ( &
158  'GWT', & ! component
159  'MST', & ! subcomponent
160  'OPTIONS', & ! block
161  'FILEOUT', & ! tag name
162  'FILEOUT', & ! fortran variable
163  'KEYWORD', & ! type
164  '', & ! shape
165  'file keyword', & ! longname
166  .true., & ! required
167  .false., & ! prerelease
168  .true., & ! multi-record
169  .false., & ! preserve case
170  .false., & ! layered
171  .false. & ! timeseries
172  )
173 
174  type(inputparamdefinitiontype), parameter :: &
175  gwtmst_sorbatefile = inputparamdefinitiontype &
176  ( &
177  'GWT', & ! component
178  'MST', & ! subcomponent
179  'OPTIONS', & ! block
180  'SORBATEFILE', & ! tag name
181  'SORBATEFILE', & ! fortran variable
182  'STRING', & ! type
183  '', & ! shape
184  'file keyword', & ! longname
185  .true., & ! required
186  .false., & ! prerelease
187  .true., & ! multi-record
188  .true., & ! preserve case
189  .false., & ! layered
190  .false. & ! timeseries
191  )
192 
193  type(inputparamdefinitiontype), parameter :: &
194  gwtmst_export_ascii = inputparamdefinitiontype &
195  ( &
196  'GWT', & ! component
197  'MST', & ! subcomponent
198  'OPTIONS', & ! block
199  'EXPORT_ARRAY_ASCII', & ! tag name
200  'EXPORT_ASCII', & ! fortran variable
201  'KEYWORD', & ! type
202  '', & ! shape
203  'export array variables to layered ascii files.', & ! longname
204  .false., & ! required
205  .false., & ! prerelease
206  .false., & ! multi-record
207  .false., & ! preserve case
208  .false., & ! layered
209  .false. & ! timeseries
210  )
211 
212  type(inputparamdefinitiontype), parameter :: &
213  gwtmst_export_nc = inputparamdefinitiontype &
214  ( &
215  'GWT', & ! component
216  'MST', & ! subcomponent
217  'OPTIONS', & ! block
218  'EXPORT_ARRAY_NETCDF', & ! tag name
219  'EXPORT_NC', & ! fortran variable
220  'KEYWORD', & ! type
221  '', & ! shape
222  'export array variables to netcdf output files.', & ! longname
223  .false., & ! required
224  .false., & ! prerelease
225  .false., & ! multi-record
226  .false., & ! preserve case
227  .false., & ! layered
228  .false. & ! timeseries
229  )
230 
231  type(inputparamdefinitiontype), parameter :: &
232  gwtmst_porosity = inputparamdefinitiontype &
233  ( &
234  'GWT', & ! component
235  'MST', & ! subcomponent
236  'GRIDDATA', & ! block
237  'POROSITY', & ! tag name
238  'POROSITY', & ! fortran variable
239  'DOUBLE1D', & ! type
240  'NODES', & ! shape
241  'porosity', & ! longname
242  .true., & ! required
243  .false., & ! prerelease
244  .false., & ! multi-record
245  .false., & ! preserve case
246  .true., & ! layered
247  .false. & ! timeseries
248  )
249 
250  type(inputparamdefinitiontype), parameter :: &
251  gwtmst_decay = inputparamdefinitiontype &
252  ( &
253  'GWT', & ! component
254  'MST', & ! subcomponent
255  'GRIDDATA', & ! block
256  'DECAY', & ! tag name
257  'DECAY', & ! fortran variable
258  'DOUBLE1D', & ! type
259  'NODES', & ! shape
260  'aqueous phase decay rate coefficient', & ! longname
261  .false., & ! required
262  .false., & ! prerelease
263  .false., & ! multi-record
264  .false., & ! preserve case
265  .true., & ! layered
266  .false. & ! timeseries
267  )
268 
269  type(inputparamdefinitiontype), parameter :: &
270  gwtmst_decay_sorbed = inputparamdefinitiontype &
271  ( &
272  'GWT', & ! component
273  'MST', & ! subcomponent
274  'GRIDDATA', & ! block
275  'DECAY_SORBED', & ! tag name
276  'DECAY_SORBED', & ! fortran variable
277  'DOUBLE1D', & ! type
278  'NODES', & ! shape
279  'sorbed phase decay rate coefficient', & ! longname
280  .false., & ! required
281  .false., & ! prerelease
282  .false., & ! multi-record
283  .false., & ! preserve case
284  .true., & ! layered
285  .false. & ! timeseries
286  )
287 
288  type(inputparamdefinitiontype), parameter :: &
289  gwtmst_bulk_density = inputparamdefinitiontype &
290  ( &
291  'GWT', & ! component
292  'MST', & ! subcomponent
293  'GRIDDATA', & ! block
294  'BULK_DENSITY', & ! tag name
295  'BULK_DENSITY', & ! fortran variable
296  'DOUBLE1D', & ! type
297  'NODES', & ! shape
298  'bulk density', & ! longname
299  .false., & ! required
300  .false., & ! prerelease
301  .false., & ! multi-record
302  .false., & ! preserve case
303  .true., & ! layered
304  .false. & ! timeseries
305  )
306 
307  type(inputparamdefinitiontype), parameter :: &
308  gwtmst_distcoef = inputparamdefinitiontype &
309  ( &
310  'GWT', & ! component
311  'MST', & ! subcomponent
312  'GRIDDATA', & ! block
313  'DISTCOEF', & ! tag name
314  'DISTCOEF', & ! fortran variable
315  'DOUBLE1D', & ! type
316  'NODES', & ! shape
317  'distribution coefficient', & ! longname
318  .false., & ! required
319  .false., & ! prerelease
320  .false., & ! multi-record
321  .false., & ! preserve case
322  .true., & ! layered
323  .false. & ! timeseries
324  )
325 
326  type(inputparamdefinitiontype), parameter :: &
327  gwtmst_sp2 = inputparamdefinitiontype &
328  ( &
329  'GWT', & ! component
330  'MST', & ! subcomponent
331  'GRIDDATA', & ! block
332  'SP2', & ! tag name
333  'SP2', & ! fortran variable
334  'DOUBLE1D', & ! type
335  'NODES', & ! shape
336  'second sorption parameter', & ! longname
337  .false., & ! required
338  .false., & ! prerelease
339  .false., & ! multi-record
340  .false., & ! preserve case
341  .true., & ! layered
342  .false. & ! timeseries
343  )
344 
345  type(inputparamdefinitiontype), parameter :: &
346  gwt_mst_param_definitions(*) = &
347  [ &
348  gwtmst_save_flows, &
349  gwtmst_order1_decay, &
350  gwtmst_order0_decay, &
351  gwtmst_sorption, &
352  gwtmst_sorbate_rec, &
353  gwtmst_sorbate, &
354  gwtmst_fileout, &
355  gwtmst_sorbatefile, &
356  gwtmst_export_ascii, &
357  gwtmst_export_nc, &
358  gwtmst_porosity, &
359  gwtmst_decay, &
360  gwtmst_decay_sorbed, &
361  gwtmst_bulk_density, &
362  gwtmst_distcoef, &
363  gwtmst_sp2 &
364  ]
365 
366  type(inputparamdefinitiontype), parameter :: &
367  gwt_mst_aggregate_definitions(*) = &
368  [ &
369  inputparamdefinitiontype &
370  ( &
371  '', & ! component
372  '', & ! subcomponent
373  '', & ! block
374  '', & ! tag name
375  '', & ! fortran variable
376  '', & ! type
377  '', & ! shape
378  '', & ! longname
379  .false., & ! required
380  .false., & ! prerelease
381  .false., & ! multi-record
382  .false., & ! preserve case
383  .false., & ! layered
384  .false. & ! timeseries
385  ) &
386  ]
387 
388  type(inputblockdefinitiontype), parameter :: &
389  gwt_mst_block_definitions(*) = &
390  [ &
391  inputblockdefinitiontype( &
392  'OPTIONS', & ! blockname
393  .false., & ! required
394  .false., & ! aggregate
395  .false. & ! block_variable
396  ), &
397  inputblockdefinitiontype( &
398  'GRIDDATA', & ! blockname
399  .true., & ! required
400  .false., & ! aggregate
401  .false. & ! block_variable
402  ) &
403  ]
404 
405 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:326
gwtmstinputmodule::gwt_mst_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwt_mst_param_definitions
Definition: gwt-mstidm.f90:345
gwtmstinputmodule::gwtmst_sorbatefile
type(inputparamdefinitiontype), parameter gwtmst_sorbatefile
Definition: gwt-mstidm.f90:174
gwtmstinputmodule::gwtmst_export_nc
type(inputparamdefinitiontype), parameter gwtmst_export_nc
Definition: gwt-mstidm.f90:212
gwtmstinputmodule::gwt_mst_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwt_mst_aggregate_definitions
Definition: gwt-mstidm.f90:366
gwtmstinputmodule::gwtmst_bulk_density
type(inputparamdefinitiontype), parameter gwtmst_bulk_density
Definition: gwt-mstidm.f90:288
gwtmstinputmodule::gwtmst_order1_decay
type(inputparamdefinitiontype), parameter gwtmst_order1_decay
Definition: gwt-mstidm.f90:60
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:250
gwtmstinputmodule::gwtmst_decay_sorbed
type(inputparamdefinitiontype), parameter gwtmst_decay_sorbed
Definition: gwt-mstidm.f90:269
gwtmstinputmodule::gwtmst_sorption
type(inputparamdefinitiontype), parameter gwtmst_sorption
Definition: gwt-mstidm.f90:98
gwtmstinputmodule::gwtmst_order0_decay
type(inputparamdefinitiontype), parameter gwtmst_order0_decay
Definition: gwt-mstidm.f90:79
gwtmstinputmodule::gwtmst_distcoef
type(inputparamdefinitiontype), parameter gwtmst_distcoef
Definition: gwt-mstidm.f90:307
gwtmstinputmodule::gwtmst_fileout
type(inputparamdefinitiontype), parameter gwtmst_fileout
Definition: gwt-mstidm.f90:155
gwtmstinputmodule::gwtmst_export_ascii
type(inputparamdefinitiontype), parameter gwtmst_export_ascii
Definition: gwt-mstidm.f90:193
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:117
gwtmstinputmodule::gwtmst_porosity
type(inputparamdefinitiontype), parameter gwtmst_porosity
Definition: gwt-mstidm.f90:231
gwtmstinputmodule::gwtmst_sorbate
type(inputparamdefinitiontype), parameter gwtmst_sorbate
Definition: gwt-mstidm.f90:136
gwtmstinputmodule::gwt_mst_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public gwt_mst_block_definitions
Definition: gwt-mstidm.f90:388
inputdefinitionmodule
This module contains the InputDefinitionModule.
Definition: InputDefinition.f90:7