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