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