MODFLOW 6  version 6.7.0.dev2
USGS Modular Hydrologic Model
gwf-chdgidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module gwfchdginputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public gwf_chdg_param_definitions
8  public gwf_chdg_aggregate_definitions
9  public gwf_chdg_block_definitions
10  public gwfchdgparamfoundtype
11  public gwf_chdg_multi_package
12  public gwf_chdg_subpackages
13 
14  type gwfchdgparamfoundtype
15  logical :: readarraygrid = .false.
16  logical :: auxiliary = .false.
17  logical :: auxmultname = .false.
18  logical :: iprpak = .false.
19  logical :: iprflow = .false.
20  logical :: ipakcb = .false.
21  logical :: obs_filerecord = .false.
22  logical :: obs6 = .false.
23  logical :: filein = .false.
24  logical :: obs6_filename = .false.
25  logical :: export_nc = .false.
26  logical :: inewton = .false.
27  logical :: maxbound = .false.
28  logical :: head = .false.
29  logical :: auxvar = .false.
30  end type gwfchdgparamfoundtype
31 
32  logical :: gwf_chdg_multi_package = .true.
33 
34  character(len=16), parameter :: &
35  gwf_chdg_subpackages(*) = &
36  [ &
37  ' ' &
38  ]
39 
40  type(inputparamdefinitiontype), parameter :: &
41  gwfchdg_readarraygrid = inputparamdefinitiontype &
42  ( &
43  'GWF', & ! component
44  'CHDG', & ! subcomponent
45  'OPTIONS', & ! block
46  'READARRAYGRID', & ! tag name
47  'READARRAYGRID', & ! fortran variable
48  'KEYWORD', & ! type
49  '', & ! shape
50  'use array-based grid input', & ! longname
51  .true., & ! required
52  .false., & ! multi-record
53  .false., & ! preserve case
54  .false., & ! layered
55  .false. & ! timeseries
56  )
57 
58  type(inputparamdefinitiontype), parameter :: &
59  gwfchdg_auxiliary = inputparamdefinitiontype &
60  ( &
61  'GWF', & ! component
62  'CHDG', & ! subcomponent
63  'OPTIONS', & ! block
64  'AUXILIARY', & ! tag name
65  'AUXILIARY', & ! fortran variable
66  'STRING', & ! type
67  'NAUX', & ! shape
68  'keyword to specify aux variables', & ! longname
69  .false., & ! required
70  .false., & ! multi-record
71  .false., & ! preserve case
72  .false., & ! layered
73  .false. & ! timeseries
74  )
75 
76  type(inputparamdefinitiontype), parameter :: &
77  gwfchdg_auxmultname = inputparamdefinitiontype &
78  ( &
79  'GWF', & ! component
80  'CHDG', & ! subcomponent
81  'OPTIONS', & ! block
82  'AUXMULTNAME', & ! tag name
83  'AUXMULTNAME', & ! fortran variable
84  'STRING', & ! type
85  '', & ! shape
86  'name of auxiliary variable for multiplier', & ! longname
87  .false., & ! required
88  .false., & ! multi-record
89  .false., & ! preserve case
90  .false., & ! layered
91  .false. & ! timeseries
92  )
93 
94  type(inputparamdefinitiontype), parameter :: &
95  gwfchdg_iprpak = inputparamdefinitiontype &
96  ( &
97  'GWF', & ! component
98  'CHDG', & ! subcomponent
99  'OPTIONS', & ! block
100  'PRINT_INPUT', & ! tag name
101  'IPRPAK', & ! fortran variable
102  'KEYWORD', & ! type
103  '', & ! shape
104  'print input to listing file', & ! longname
105  .false., & ! required
106  .false., & ! multi-record
107  .false., & ! preserve case
108  .false., & ! layered
109  .false. & ! timeseries
110  )
111 
112  type(inputparamdefinitiontype), parameter :: &
113  gwfchdg_iprflow = inputparamdefinitiontype &
114  ( &
115  'GWF', & ! component
116  'CHDG', & ! subcomponent
117  'OPTIONS', & ! block
118  'PRINT_FLOWS', & ! tag name
119  'IPRFLOW', & ! fortran variable
120  'KEYWORD', & ! type
121  '', & ! shape
122  'print CHD flows to listing file', & ! longname
123  .false., & ! required
124  .false., & ! multi-record
125  .false., & ! preserve case
126  .false., & ! layered
127  .false. & ! timeseries
128  )
129 
130  type(inputparamdefinitiontype), parameter :: &
131  gwfchdg_ipakcb = inputparamdefinitiontype &
132  ( &
133  'GWF', & ! component
134  'CHDG', & ! subcomponent
135  'OPTIONS', & ! block
136  'SAVE_FLOWS', & ! tag name
137  'IPAKCB', & ! fortran variable
138  'KEYWORD', & ! type
139  '', & ! shape
140  'save CHD flows to budget file', & ! longname
141  .false., & ! required
142  .false., & ! multi-record
143  .false., & ! preserve case
144  .false., & ! layered
145  .false. & ! timeseries
146  )
147 
148  type(inputparamdefinitiontype), parameter :: &
149  gwfchdg_obs_filerecord = inputparamdefinitiontype &
150  ( &
151  'GWF', & ! component
152  'CHDG', & ! subcomponent
153  'OPTIONS', & ! block
154  'OBS_FILERECORD', & ! tag name
155  'OBS_FILERECORD', & ! fortran variable
156  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
157  '', & ! shape
158  '', & ! longname
159  .false., & ! required
160  .false., & ! multi-record
161  .false., & ! preserve case
162  .false., & ! layered
163  .false. & ! timeseries
164  )
165 
166  type(inputparamdefinitiontype), parameter :: &
167  gwfchdg_obs6 = inputparamdefinitiontype &
168  ( &
169  'GWF', & ! component
170  'CHDG', & ! subcomponent
171  'OPTIONS', & ! block
172  'OBS6', & ! tag name
173  'OBS6', & ! fortran variable
174  'KEYWORD', & ! type
175  '', & ! shape
176  'obs keyword', & ! longname
177  .true., & ! required
178  .true., & ! multi-record
179  .false., & ! preserve case
180  .false., & ! layered
181  .false. & ! timeseries
182  )
183 
184  type(inputparamdefinitiontype), parameter :: &
185  gwfchdg_filein = inputparamdefinitiontype &
186  ( &
187  'GWF', & ! component
188  'CHDG', & ! subcomponent
189  'OPTIONS', & ! block
190  'FILEIN', & ! tag name
191  'FILEIN', & ! fortran variable
192  'KEYWORD', & ! type
193  '', & ! shape
194  'file keyword', & ! longname
195  .true., & ! required
196  .true., & ! multi-record
197  .false., & ! preserve case
198  .false., & ! layered
199  .false. & ! timeseries
200  )
201 
202  type(inputparamdefinitiontype), parameter :: &
203  gwfchdg_obs6_filename = inputparamdefinitiontype &
204  ( &
205  'GWF', & ! component
206  'CHDG', & ! subcomponent
207  'OPTIONS', & ! block
208  'OBS6_FILENAME', & ! tag name
209  'OBS6_FILENAME', & ! fortran variable
210  'STRING', & ! type
211  '', & ! shape
212  'obs6 input filename', & ! longname
213  .true., & ! required
214  .true., & ! multi-record
215  .true., & ! preserve case
216  .false., & ! layered
217  .false. & ! timeseries
218  )
219 
220  type(inputparamdefinitiontype), parameter :: &
221  gwfchdg_export_nc = inputparamdefinitiontype &
222  ( &
223  'GWF', & ! component
224  'CHDG', & ! subcomponent
225  'OPTIONS', & ! block
226  'EXPORT_ARRAY_NETCDF', & ! tag name
227  'EXPORT_NC', & ! fortran variable
228  'KEYWORD', & ! type
229  '', & ! shape
230  'export array variables to netcdf output files.', & ! longname
231  .false., & ! required
232  .false., & ! multi-record
233  .false., & ! preserve case
234  .false., & ! layered
235  .false. & ! timeseries
236  )
237 
238  type(inputparamdefinitiontype), parameter :: &
239  gwfchdg_inewton = inputparamdefinitiontype &
240  ( &
241  'GWF', & ! component
242  'CHDG', & ! subcomponent
243  'OPTIONS', & ! block
244  'DEV_NO_NEWTON', & ! tag name
245  'INEWTON', & ! fortran variable
246  'KEYWORD', & ! type
247  '', & ! shape
248  'turn off Newton for unconfined cells', & ! longname
249  .false., & ! required
250  .false., & ! multi-record
251  .false., & ! preserve case
252  .false., & ! layered
253  .false. & ! timeseries
254  )
255 
256  type(inputparamdefinitiontype), parameter :: &
257  gwfchdg_maxbound = inputparamdefinitiontype &
258  ( &
259  'GWF', & ! component
260  'CHDG', & ! subcomponent
261  'DIMENSIONS', & ! block
262  'MAXBOUND', & ! tag name
263  'MAXBOUND', & ! fortran variable
264  'INTEGER', & ! type
265  '', & ! shape
266  'maximum number of constant head cells in any stress period', & ! longname
267  .false., & ! required
268  .false., & ! multi-record
269  .false., & ! preserve case
270  .false., & ! layered
271  .false. & ! timeseries
272  )
273 
274  type(inputparamdefinitiontype), parameter :: &
275  gwfchdg_head = inputparamdefinitiontype &
276  ( &
277  'GWF', & ! component
278  'CHDG', & ! subcomponent
279  'PERIOD', & ! block
280  'HEAD', & ! tag name
281  'HEAD', & ! fortran variable
282  'DOUBLE1D', & ! type
283  'NODES', & ! shape
284  'head value assigned to constant head', & ! longname
285  .true., & ! required
286  .false., & ! multi-record
287  .false., & ! preserve case
288  .true., & ! layered
289  .false. & ! timeseries
290  )
291 
292  type(inputparamdefinitiontype), parameter :: &
293  gwfchdg_auxvar = inputparamdefinitiontype &
294  ( &
295  'GWF', & ! component
296  'CHDG', & ! subcomponent
297  'PERIOD', & ! block
298  'AUX', & ! tag name
299  'AUXVAR', & ! fortran variable
300  'DOUBLE2D', & ! type
301  'NAUX NODES', & ! shape
302  'constant head auxiliary variable iaux', & ! longname
303  .false., & ! required
304  .false., & ! multi-record
305  .false., & ! preserve case
306  .true., & ! layered
307  .false. & ! timeseries
308  )
309 
310  type(inputparamdefinitiontype), parameter :: &
311  gwf_chdg_param_definitions(*) = &
312  [ &
313  gwfchdg_readarraygrid, &
314  gwfchdg_auxiliary, &
315  gwfchdg_auxmultname, &
316  gwfchdg_iprpak, &
317  gwfchdg_iprflow, &
318  gwfchdg_ipakcb, &
319  gwfchdg_obs_filerecord, &
320  gwfchdg_obs6, &
321  gwfchdg_filein, &
322  gwfchdg_obs6_filename, &
323  gwfchdg_export_nc, &
324  gwfchdg_inewton, &
325  gwfchdg_maxbound, &
326  gwfchdg_head, &
327  gwfchdg_auxvar &
328  ]
329 
330  type(inputparamdefinitiontype), parameter :: &
331  gwf_chdg_aggregate_definitions(*) = &
332  [ &
333  inputparamdefinitiontype &
334  ( &
335  '', & ! component
336  '', & ! subcomponent
337  '', & ! block
338  '', & ! tag name
339  '', & ! fortran variable
340  '', & ! type
341  '', & ! shape
342  '', & ! longname
343  .false., & ! required
344  .false., & ! multi-record
345  .false., & ! preserve case
346  .false., & ! layered
347  .false. & ! timeseries
348  ) &
349  ]
350 
351  type(inputblockdefinitiontype), parameter :: &
352  gwf_chdg_block_definitions(*) = &
353  [ &
354  inputblockdefinitiontype( &
355  'OPTIONS', & ! blockname
356  .true., & ! required
357  .false., & ! aggregate
358  .false. & ! block_variable
359  ), &
360  inputblockdefinitiontype( &
361  'DIMENSIONS', & ! blockname
362  .false., & ! required
363  .false., & ! aggregate
364  .false. & ! block_variable
365  ), &
366  inputblockdefinitiontype( &
367  'PERIOD', & ! blockname
368  .true., & ! required
369  .false., & ! aggregate
370  .true. & ! block_variable
371  ) &
372  ]
373 
374 end module gwfchdginputmodule
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
gwfchdginputmodule::gwfchdg_filein
type(inputparamdefinitiontype), parameter gwfchdg_filein
Definition: gwf-chdgidm.f90:184
gwfchdginputmodule::gwfchdg_iprflow
type(inputparamdefinitiontype), parameter gwfchdg_iprflow
Definition: gwf-chdgidm.f90:112
gwfchdginputmodule::gwf_chdg_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public gwf_chdg_block_definitions
Definition: gwf-chdgidm.f90:351
gwfchdginputmodule::gwfchdg_ipakcb
type(inputparamdefinitiontype), parameter gwfchdg_ipakcb
Definition: gwf-chdgidm.f90:130
gwfchdginputmodule::gwfchdg_auxiliary
type(inputparamdefinitiontype), parameter gwfchdg_auxiliary
Definition: gwf-chdgidm.f90:58
gwfchdginputmodule::gwfchdg_readarraygrid
type(inputparamdefinitiontype), parameter gwfchdg_readarraygrid
Definition: gwf-chdgidm.f90:40
gwfchdginputmodule::gwfchdg_export_nc
type(inputparamdefinitiontype), parameter gwfchdg_export_nc
Definition: gwf-chdgidm.f90:220
gwfchdginputmodule::gwfchdg_obs6
type(inputparamdefinitiontype), parameter gwfchdg_obs6
Definition: gwf-chdgidm.f90:166
gwfchdginputmodule::gwfchdg_maxbound
type(inputparamdefinitiontype), parameter gwfchdg_maxbound
Definition: gwf-chdgidm.f90:256
gwfchdginputmodule::gwfchdg_head
type(inputparamdefinitiontype), parameter gwfchdg_head
Definition: gwf-chdgidm.f90:274
gwfchdginputmodule::gwfchdg_iprpak
type(inputparamdefinitiontype), parameter gwfchdg_iprpak
Definition: gwf-chdgidm.f90:94
gwfchdginputmodule::gwfchdg_auxvar
type(inputparamdefinitiontype), parameter gwfchdg_auxvar
Definition: gwf-chdgidm.f90:292
gwfchdginputmodule::gwfchdg_obs_filerecord
type(inputparamdefinitiontype), parameter gwfchdg_obs_filerecord
Definition: gwf-chdgidm.f90:148
gwfchdginputmodule::gwfchdg_inewton
type(inputparamdefinitiontype), parameter gwfchdg_inewton
Definition: gwf-chdgidm.f90:238
gwfchdginputmodule::gwfchdg_obs6_filename
type(inputparamdefinitiontype), parameter gwfchdg_obs6_filename
Definition: gwf-chdgidm.f90:202
gwfchdginputmodule::gwf_chdg_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_chdg_aggregate_definitions
Definition: gwf-chdgidm.f90:330
gwfchdginputmodule::gwf_chdg_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_chdg_param_definitions
Definition: gwf-chdgidm.f90:310
gwfchdginputmodule::gwf_chdg_subpackages
character(len=16), dimension(*), parameter, public gwf_chdg_subpackages
Definition: gwf-chdgidm.f90:34
gwfchdginputmodule::gwf_chdg_multi_package
logical, public gwf_chdg_multi_package
Definition: gwf-chdgidm.f90:32
gwfchdginputmodule::gwfchdg_auxmultname
type(inputparamdefinitiontype), parameter gwfchdg_auxmultname
Definition: gwf-chdgidm.f90:76
inputdefinitionmodule
This module contains the InputDefinitionModule.
Definition: InputDefinition.f90:7