MODFLOW 6  version 6.9.0.dev0
USGS Modular Hydrologic Model
gwt-ssmidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module gwtssminputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public gwt_ssm_param_definitions
8  public gwt_ssm_aggregate_definitions
9  public gwt_ssm_block_definitions
10  public gwtssmparamfoundtype
11  public gwt_ssm_multi_package
12  public gwt_ssm_is_advanced
13  public gwt_ssm_subpackages
14 
15  type gwtssmparamfoundtype
16  logical :: print_flows = .false.
17  logical :: save_flows = .false.
18  logical :: pname_sources = .false.
19  logical :: srctype = .false.
20  logical :: auxname = .false.
21  logical :: pname = .false.
22  logical :: spc6 = .false.
23  logical :: filein = .false.
24  logical :: spc6_filename = .false.
25  logical :: mixed = .false.
26  end type gwtssmparamfoundtype
27 
28  logical :: gwt_ssm_multi_package = .false.
29  logical :: gwt_ssm_is_advanced = .false.
30 
31  character(len=16), parameter :: &
32  gwt_ssm_subpackages(*) = &
33  [ &
34  'UTL-SPC ' &
35  ]
36 
37  type(inputparamdefinitiontype), parameter :: &
38  gwtssm_print_flows = inputparamdefinitiontype &
39  ( &
40  'GWT', & ! component
41  'SSM', & ! subcomponent
42  'OPTIONS', & ! block
43  'PRINT_FLOWS', & ! tag name
44  'PRINT_FLOWS', & ! fortran variable
45  'KEYWORD', & ! type
46  '', & ! shape
47  'print calculated flows to listing file', & ! longname
48  .false., & ! required
49  .false., & ! developmode
50  .false., & ! multi-record
51  .false., & ! preserve case
52  .false., & ! layered
53  .false. & ! timeseries
54  )
55 
56  type(inputparamdefinitiontype), parameter :: &
57  gwtssm_save_flows = inputparamdefinitiontype &
58  ( &
59  'GWT', & ! component
60  'SSM', & ! subcomponent
61  'OPTIONS', & ! block
62  'SAVE_FLOWS', & ! tag name
63  'SAVE_FLOWS', & ! fortran variable
64  'KEYWORD', & ! type
65  '', & ! shape
66  'save calculated flows to budget file', & ! longname
67  .false., & ! required
68  .false., & ! developmode
69  .false., & ! multi-record
70  .false., & ! preserve case
71  .false., & ! layered
72  .false. & ! timeseries
73  )
74 
75  type(inputparamdefinitiontype), parameter :: &
76  gwtssm_pname_sources = inputparamdefinitiontype &
77  ( &
78  'GWT', & ! component
79  'SSM', & ! subcomponent
80  'SOURCES', & ! block
81  'PNAME', & ! tag name
82  'PNAME_SOURCES', & ! fortran variable
83  'STRING', & ! type
84  '', & ! shape
85  'package name', & ! longname
86  .true., & ! required
87  .false., & ! developmode
88  .true., & ! multi-record
89  .false., & ! preserve case
90  .false., & ! layered
91  .false. & ! timeseries
92  )
93 
94  type(inputparamdefinitiontype), parameter :: &
95  gwtssm_srctype = inputparamdefinitiontype &
96  ( &
97  'GWT', & ! component
98  'SSM', & ! subcomponent
99  'SOURCES', & ! block
100  'SRCTYPE', & ! tag name
101  'SRCTYPE', & ! fortran variable
102  'STRING', & ! type
103  '', & ! shape
104  'source type', & ! longname
105  .true., & ! required
106  .false., & ! developmode
107  .true., & ! multi-record
108  .false., & ! preserve case
109  .false., & ! layered
110  .false. & ! timeseries
111  )
112 
113  type(inputparamdefinitiontype), parameter :: &
114  gwtssm_auxname = inputparamdefinitiontype &
115  ( &
116  'GWT', & ! component
117  'SSM', & ! subcomponent
118  'SOURCES', & ! block
119  'AUXNAME', & ! tag name
120  'AUXNAME', & ! fortran variable
121  'STRING', & ! type
122  '', & ! shape
123  'auxiliary variable name', & ! longname
124  .true., & ! required
125  .false., & ! developmode
126  .true., & ! multi-record
127  .false., & ! preserve case
128  .false., & ! layered
129  .false. & ! timeseries
130  )
131 
132  type(inputparamdefinitiontype), parameter :: &
133  gwtssm_pname = inputparamdefinitiontype &
134  ( &
135  'GWT', & ! component
136  'SSM', & ! subcomponent
137  'FILEINPUT', & ! block
138  'PNAME', & ! tag name
139  'PNAME', & ! fortran variable
140  'STRING', & ! type
141  '', & ! shape
142  'package name', & ! longname
143  .true., & ! required
144  .false., & ! developmode
145  .true., & ! multi-record
146  .false., & ! preserve case
147  .false., & ! layered
148  .false. & ! timeseries
149  )
150 
151  type(inputparamdefinitiontype), parameter :: &
152  gwtssm_spc6 = inputparamdefinitiontype &
153  ( &
154  'GWT', & ! component
155  'SSM', & ! subcomponent
156  'FILEINPUT', & ! block
157  'SPC6', & ! tag name
158  'SPC6', & ! fortran variable
159  'KEYWORD', & ! type
160  '', & ! shape
161  'head keyword', & ! longname
162  .true., & ! required
163  .false., & ! developmode
164  .true., & ! multi-record
165  .false., & ! preserve case
166  .false., & ! layered
167  .false. & ! timeseries
168  )
169 
170  type(inputparamdefinitiontype), parameter :: &
171  gwtssm_filein = inputparamdefinitiontype &
172  ( &
173  'GWT', & ! component
174  'SSM', & ! subcomponent
175  'FILEINPUT', & ! block
176  'FILEIN', & ! tag name
177  'FILEIN', & ! fortran variable
178  'KEYWORD', & ! type
179  '', & ! shape
180  'file keyword', & ! longname
181  .true., & ! required
182  .false., & ! developmode
183  .true., & ! multi-record
184  .false., & ! preserve case
185  .false., & ! layered
186  .false. & ! timeseries
187  )
188 
189  type(inputparamdefinitiontype), parameter :: &
190  gwtssm_spc6_filename = inputparamdefinitiontype &
191  ( &
192  'GWT', & ! component
193  'SSM', & ! subcomponent
194  'FILEINPUT', & ! block
195  'SPC6_FILENAME', & ! tag name
196  'SPC6_FILENAME', & ! fortran variable
197  'STRING', & ! type
198  '', & ! shape
199  'spc file name', & ! longname
200  .true., & ! required
201  .false., & ! developmode
202  .true., & ! multi-record
203  .true., & ! preserve case
204  .false., & ! layered
205  .false. & ! timeseries
206  )
207 
208  type(inputparamdefinitiontype), parameter :: &
209  gwtssm_mixed = inputparamdefinitiontype &
210  ( &
211  'GWT', & ! component
212  'SSM', & ! subcomponent
213  'FILEINPUT', & ! block
214  'MIXED', & ! tag name
215  'MIXED', & ! fortran variable
216  'KEYWORD', & ! type
217  '', & ! shape
218  'mixed keyword', & ! longname
219  .false., & ! required
220  .false., & ! developmode
221  .true., & ! multi-record
222  .false., & ! preserve case
223  .false., & ! layered
224  .false. & ! timeseries
225  )
226 
227  type(inputparamdefinitiontype), parameter :: &
228  gwt_ssm_param_definitions(*) = &
229  [ &
230  gwtssm_print_flows, &
231  gwtssm_save_flows, &
232  gwtssm_pname_sources, &
233  gwtssm_srctype, &
234  gwtssm_auxname, &
235  gwtssm_pname, &
236  gwtssm_spc6, &
237  gwtssm_filein, &
238  gwtssm_spc6_filename, &
239  gwtssm_mixed &
240  ]
241 
242  type(inputparamdefinitiontype), parameter :: &
243  gwtssm_sources = inputparamdefinitiontype &
244  ( &
245  'GWT', & ! component
246  'SSM', & ! subcomponent
247  'SOURCES', & ! block
248  'SOURCES', & ! tag name
249  'SOURCES', & ! fortran variable
250  'RECARRAY PNAME SRCTYPE AUXNAME', & ! type
251  '', & ! shape
252  'package list', & ! longname
253  .true., & ! required
254  .false., & ! developmode
255  .false., & ! multi-record
256  .false., & ! preserve case
257  .false., & ! layered
258  .false. & ! timeseries
259  )
260 
261  type(inputparamdefinitiontype), parameter :: &
262  gwtssm_fileinput = inputparamdefinitiontype &
263  ( &
264  'GWT', & ! component
265  'SSM', & ! subcomponent
266  'FILEINPUT', & ! block
267  'FILEINPUT', & ! tag name
268  'FILEINPUT', & ! fortran variable
269  'RECARRAY PNAME SPC6 FILEIN SPC6_FILENAME MIXED', & ! type
270  '', & ! shape
271  '', & ! longname
272  .false., & ! required
273  .false., & ! developmode
274  .false., & ! multi-record
275  .false., & ! preserve case
276  .false., & ! layered
277  .false. & ! timeseries
278  )
279 
280  type(inputparamdefinitiontype), parameter :: &
281  gwt_ssm_aggregate_definitions(*) = &
282  [ &
283  gwtssm_sources, &
284  gwtssm_fileinput &
285  ]
286 
287  type(inputblockdefinitiontype), parameter :: &
288  gwt_ssm_block_definitions(*) = &
289  [ &
290  inputblockdefinitiontype( &
291  'OPTIONS', & ! blockname
292  .false., & ! required
293  .false., & ! aggregate
294  .false. & ! block_variable
295  ), &
296  inputblockdefinitiontype( &
297  'SOURCES', & ! blockname
298  .true., & ! required
299  .true., & ! aggregate
300  .false. & ! block_variable
301  ), &
302  inputblockdefinitiontype( &
303  'FILEINPUT', & ! blockname
304  .false., & ! required
305  .true., & ! aggregate
306  .false. & ! block_variable
307  ) &
308  ]
309 
310 end module gwtssminputmodule
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
gwtssminputmodule::gwt_ssm_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public gwt_ssm_block_definitions
Definition: gwt-ssmidm.f90:287
gwtssminputmodule::gwtssm_sources
type(inputparamdefinitiontype), parameter gwtssm_sources
Definition: gwt-ssmidm.f90:242
gwtssminputmodule::gwt_ssm_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwt_ssm_param_definitions
Definition: gwt-ssmidm.f90:227
gwtssminputmodule::gwtssm_print_flows
type(inputparamdefinitiontype), parameter gwtssm_print_flows
Definition: gwt-ssmidm.f90:37
gwtssminputmodule::gwt_ssm_subpackages
character(len=16), dimension(*), parameter, public gwt_ssm_subpackages
Definition: gwt-ssmidm.f90:31
gwtssminputmodule::gwtssm_srctype
type(inputparamdefinitiontype), parameter gwtssm_srctype
Definition: gwt-ssmidm.f90:94
gwtssminputmodule::gwtssm_fileinput
type(inputparamdefinitiontype), parameter gwtssm_fileinput
Definition: gwt-ssmidm.f90:261
gwtssminputmodule::gwtssm_spc6
type(inputparamdefinitiontype), parameter gwtssm_spc6
Definition: gwt-ssmidm.f90:151
gwtssminputmodule::gwtssm_mixed
type(inputparamdefinitiontype), parameter gwtssm_mixed
Definition: gwt-ssmidm.f90:208
gwtssminputmodule::gwt_ssm_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwt_ssm_aggregate_definitions
Definition: gwt-ssmidm.f90:280
gwtssminputmodule::gwtssm_pname
type(inputparamdefinitiontype), parameter gwtssm_pname
Definition: gwt-ssmidm.f90:132
gwtssminputmodule::gwt_ssm_multi_package
logical, public gwt_ssm_multi_package
Definition: gwt-ssmidm.f90:28
gwtssminputmodule::gwtssm_save_flows
type(inputparamdefinitiontype), parameter gwtssm_save_flows
Definition: gwt-ssmidm.f90:56
gwtssminputmodule::gwtssm_auxname
type(inputparamdefinitiontype), parameter gwtssm_auxname
Definition: gwt-ssmidm.f90:113
gwtssminputmodule::gwtssm_pname_sources
type(inputparamdefinitiontype), parameter gwtssm_pname_sources
Definition: gwt-ssmidm.f90:75
gwtssminputmodule::gwtssm_filein
type(inputparamdefinitiontype), parameter gwtssm_filein
Definition: gwt-ssmidm.f90:170
gwtssminputmodule::gwtssm_spc6_filename
type(inputparamdefinitiontype), parameter gwtssm_spc6_filename
Definition: gwt-ssmidm.f90:189
gwtssminputmodule::gwt_ssm_is_advanced
logical, public gwt_ssm_is_advanced
Definition: gwt-ssmidm.f90:29
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