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