MODFLOW 6  version 6.7.0.dev3
USGS Modular Hydrologic Model
gwf-welgidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module gwfwelginputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public gwf_welg_param_definitions
8  public gwf_welg_aggregate_definitions
9  public gwf_welg_block_definitions
10  public gwfwelgparamfoundtype
11  public gwf_welg_multi_package
12  public gwf_welg_subpackages
13 
14  type gwfwelgparamfoundtype
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 :: flowred = .false.
22  logical :: afrcsv_rec = .false.
23  logical :: afrcsv = .false.
24  logical :: fileout = .false.
25  logical :: afrcsvfile = .false.
26  logical :: iflowredlen = .false.
27  logical :: obs_filerecord = .false.
28  logical :: filein = .false.
29  logical :: obs6 = .false.
30  logical :: obs6_filename = .false.
31  logical :: mover = .false.
32  logical :: export_nc = .false.
33  logical :: maxbound = .false.
34  logical :: q = .false.
35  logical :: auxvar = .false.
36  end type gwfwelgparamfoundtype
37 
38  logical :: gwf_welg_multi_package = .true.
39 
40  character(len=16), parameter :: &
41  gwf_welg_subpackages(*) = &
42  [ &
43  ' ' &
44  ]
45 
46  type(inputparamdefinitiontype), parameter :: &
47  gwfwelg_readarraygrid = inputparamdefinitiontype &
48  ( &
49  'GWF', & ! component
50  'WELG', & ! subcomponent
51  'OPTIONS', & ! block
52  'READARRAYGRID', & ! tag name
53  'READARRAYGRID', & ! fortran variable
54  'KEYWORD', & ! type
55  '', & ! shape
56  'use array-based grid input', & ! longname
57  .true., & ! required
58  .true., & ! developmode
59  .false., & ! multi-record
60  .false., & ! preserve case
61  .false., & ! layered
62  .false. & ! timeseries
63  )
64 
65  type(inputparamdefinitiontype), parameter :: &
66  gwfwelg_auxiliary = inputparamdefinitiontype &
67  ( &
68  'GWF', & ! component
69  'WELG', & ! subcomponent
70  'OPTIONS', & ! block
71  'AUXILIARY', & ! tag name
72  'AUXILIARY', & ! fortran variable
73  'STRING', & ! type
74  'NAUX', & ! shape
75  'keyword to specify aux variables', & ! longname
76  .false., & ! required
77  .false., & ! developmode
78  .false., & ! multi-record
79  .false., & ! preserve case
80  .false., & ! layered
81  .false. & ! timeseries
82  )
83 
84  type(inputparamdefinitiontype), parameter :: &
85  gwfwelg_auxmultname = inputparamdefinitiontype &
86  ( &
87  'GWF', & ! component
88  'WELG', & ! subcomponent
89  'OPTIONS', & ! block
90  'AUXMULTNAME', & ! tag name
91  'AUXMULTNAME', & ! fortran variable
92  'STRING', & ! type
93  '', & ! shape
94  'name of auxiliary variable for multiplier', & ! longname
95  .false., & ! required
96  .false., & ! developmode
97  .false., & ! multi-record
98  .false., & ! preserve case
99  .false., & ! layered
100  .false. & ! timeseries
101  )
102 
103  type(inputparamdefinitiontype), parameter :: &
104  gwfwelg_iprpak = inputparamdefinitiontype &
105  ( &
106  'GWF', & ! component
107  'WELG', & ! subcomponent
108  'OPTIONS', & ! block
109  'PRINT_INPUT', & ! tag name
110  'IPRPAK', & ! fortran variable
111  'KEYWORD', & ! type
112  '', & ! shape
113  'print input to listing file', & ! longname
114  .false., & ! required
115  .false., & ! developmode
116  .false., & ! multi-record
117  .false., & ! preserve case
118  .false., & ! layered
119  .false. & ! timeseries
120  )
121 
122  type(inputparamdefinitiontype), parameter :: &
123  gwfwelg_iprflow = inputparamdefinitiontype &
124  ( &
125  'GWF', & ! component
126  'WELG', & ! subcomponent
127  'OPTIONS', & ! block
128  'PRINT_FLOWS', & ! tag name
129  'IPRFLOW', & ! fortran variable
130  'KEYWORD', & ! type
131  '', & ! shape
132  'print calculated flows to listing file', & ! longname
133  .false., & ! required
134  .false., & ! developmode
135  .false., & ! multi-record
136  .false., & ! preserve case
137  .false., & ! layered
138  .false. & ! timeseries
139  )
140 
141  type(inputparamdefinitiontype), parameter :: &
142  gwfwelg_ipakcb = inputparamdefinitiontype &
143  ( &
144  'GWF', & ! component
145  'WELG', & ! subcomponent
146  'OPTIONS', & ! block
147  'SAVE_FLOWS', & ! tag name
148  'IPAKCB', & ! fortran variable
149  'KEYWORD', & ! type
150  '', & ! shape
151  'save well flows to budget file', & ! longname
152  .false., & ! required
153  .false., & ! developmode
154  .false., & ! multi-record
155  .false., & ! preserve case
156  .false., & ! layered
157  .false. & ! timeseries
158  )
159 
160  type(inputparamdefinitiontype), parameter :: &
161  gwfwelg_flowred = inputparamdefinitiontype &
162  ( &
163  'GWF', & ! component
164  'WELG', & ! subcomponent
165  'OPTIONS', & ! block
166  'AUTO_FLOW_REDUCE', & ! tag name
167  'FLOWRED', & ! fortran variable
168  'DOUBLE', & ! type
169  '', & ! shape
170  'cell fractional thickness for reduced pumping', & ! longname
171  .false., & ! required
172  .false., & ! developmode
173  .false., & ! multi-record
174  .false., & ! preserve case
175  .false., & ! layered
176  .false. & ! timeseries
177  )
178 
179  type(inputparamdefinitiontype), parameter :: &
180  gwfwelg_afrcsv_rec = inputparamdefinitiontype &
181  ( &
182  'GWF', & ! component
183  'WELG', & ! subcomponent
184  'OPTIONS', & ! block
185  'AFRCSV_FILERECORD', & ! tag name
186  'AFRCSV_REC', & ! fortran variable
187  'RECORD AUTO_FLOW_REDUCE_CSV FILEOUT AFRCSVFILE', & ! type
188  '', & ! shape
189  '', & ! longname
190  .false., & ! required
191  .false., & ! developmode
192  .false., & ! multi-record
193  .false., & ! preserve case
194  .false., & ! layered
195  .false. & ! timeseries
196  )
197 
198  type(inputparamdefinitiontype), parameter :: &
199  gwfwelg_afrcsv = inputparamdefinitiontype &
200  ( &
201  'GWF', & ! component
202  'WELG', & ! subcomponent
203  'OPTIONS', & ! block
204  'AUTO_FLOW_REDUCE_CSV', & ! tag name
205  'AFRCSV', & ! fortran variable
206  'KEYWORD', & ! type
207  '', & ! shape
208  'budget keyword', & ! longname
209  .true., & ! required
210  .false., & ! developmode
211  .true., & ! multi-record
212  .false., & ! preserve case
213  .false., & ! layered
214  .false. & ! timeseries
215  )
216 
217  type(inputparamdefinitiontype), parameter :: &
218  gwfwelg_fileout = inputparamdefinitiontype &
219  ( &
220  'GWF', & ! component
221  'WELG', & ! subcomponent
222  'OPTIONS', & ! block
223  'FILEOUT', & ! tag name
224  'FILEOUT', & ! fortran variable
225  'KEYWORD', & ! type
226  '', & ! shape
227  'file keyword', & ! longname
228  .true., & ! required
229  .false., & ! developmode
230  .true., & ! multi-record
231  .false., & ! preserve case
232  .false., & ! layered
233  .false. & ! timeseries
234  )
235 
236  type(inputparamdefinitiontype), parameter :: &
237  gwfwelg_afrcsvfile = inputparamdefinitiontype &
238  ( &
239  'GWF', & ! component
240  'WELG', & ! subcomponent
241  'OPTIONS', & ! block
242  'AFRCSVFILE', & ! tag name
243  'AFRCSVFILE', & ! fortran variable
244  'STRING', & ! type
245  '', & ! shape
246  'file keyword', & ! longname
247  .true., & ! required
248  .false., & ! developmode
249  .true., & ! multi-record
250  .true., & ! preserve case
251  .false., & ! layered
252  .false. & ! timeseries
253  )
254 
255  type(inputparamdefinitiontype), parameter :: &
256  gwfwelg_iflowredlen = inputparamdefinitiontype &
257  ( &
258  'GWF', & ! component
259  'WELG', & ! subcomponent
260  'OPTIONS', & ! block
261  'FLOW_REDUCTION_LENGTH', & ! tag name
262  'IFLOWREDLEN', & ! fortran variable
263  'KEYWORD', & ! type
264  '', & ! shape
265  'flow reduction length keyword', & ! longname
266  .false., & ! required
267  .false., & ! developmode
268  .false., & ! multi-record
269  .false., & ! preserve case
270  .false., & ! layered
271  .false. & ! timeseries
272  )
273 
274  type(inputparamdefinitiontype), parameter :: &
275  gwfwelg_obs_filerecord = inputparamdefinitiontype &
276  ( &
277  'GWF', & ! component
278  'WELG', & ! subcomponent
279  'OPTIONS', & ! block
280  'OBS_FILERECORD', & ! tag name
281  'OBS_FILERECORD', & ! fortran variable
282  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
283  '', & ! shape
284  '', & ! longname
285  .false., & ! required
286  .false., & ! developmode
287  .false., & ! multi-record
288  .false., & ! preserve case
289  .false., & ! layered
290  .false. & ! timeseries
291  )
292 
293  type(inputparamdefinitiontype), parameter :: &
294  gwfwelg_filein = inputparamdefinitiontype &
295  ( &
296  'GWF', & ! component
297  'WELG', & ! subcomponent
298  'OPTIONS', & ! block
299  'FILEIN', & ! tag name
300  'FILEIN', & ! fortran variable
301  'KEYWORD', & ! type
302  '', & ! shape
303  'file keyword', & ! longname
304  .true., & ! required
305  .false., & ! developmode
306  .true., & ! multi-record
307  .false., & ! preserve case
308  .false., & ! layered
309  .false. & ! timeseries
310  )
311 
312  type(inputparamdefinitiontype), parameter :: &
313  gwfwelg_obs6 = inputparamdefinitiontype &
314  ( &
315  'GWF', & ! component
316  'WELG', & ! subcomponent
317  'OPTIONS', & ! block
318  'OBS6', & ! tag name
319  'OBS6', & ! fortran variable
320  'KEYWORD', & ! type
321  '', & ! shape
322  'obs keyword', & ! longname
323  .true., & ! required
324  .false., & ! developmode
325  .true., & ! multi-record
326  .false., & ! preserve case
327  .false., & ! layered
328  .false. & ! timeseries
329  )
330 
331  type(inputparamdefinitiontype), parameter :: &
332  gwfwelg_obs6_filename = inputparamdefinitiontype &
333  ( &
334  'GWF', & ! component
335  'WELG', & ! subcomponent
336  'OPTIONS', & ! block
337  'OBS6_FILENAME', & ! tag name
338  'OBS6_FILENAME', & ! fortran variable
339  'STRING', & ! type
340  '', & ! shape
341  'obs6 input filename', & ! longname
342  .true., & ! required
343  .false., & ! developmode
344  .true., & ! multi-record
345  .true., & ! preserve case
346  .false., & ! layered
347  .false. & ! timeseries
348  )
349 
350  type(inputparamdefinitiontype), parameter :: &
351  gwfwelg_mover = inputparamdefinitiontype &
352  ( &
353  'GWF', & ! component
354  'WELG', & ! subcomponent
355  'OPTIONS', & ! block
356  'MOVER', & ! tag name
357  'MOVER', & ! fortran variable
358  'KEYWORD', & ! type
359  '', & ! shape
360  '', & ! longname
361  .false., & ! required
362  .false., & ! developmode
363  .false., & ! multi-record
364  .false., & ! preserve case
365  .false., & ! layered
366  .false. & ! timeseries
367  )
368 
369  type(inputparamdefinitiontype), parameter :: &
370  gwfwelg_export_nc = inputparamdefinitiontype &
371  ( &
372  'GWF', & ! component
373  'WELG', & ! subcomponent
374  'OPTIONS', & ! block
375  'EXPORT_ARRAY_NETCDF', & ! tag name
376  'EXPORT_NC', & ! fortran variable
377  'KEYWORD', & ! type
378  '', & ! shape
379  'export array variables to netcdf output files.', & ! longname
380  .false., & ! required
381  .false., & ! developmode
382  .false., & ! multi-record
383  .false., & ! preserve case
384  .false., & ! layered
385  .false. & ! timeseries
386  )
387 
388  type(inputparamdefinitiontype), parameter :: &
389  gwfwelg_maxbound = inputparamdefinitiontype &
390  ( &
391  'GWF', & ! component
392  'WELG', & ! subcomponent
393  'DIMENSIONS', & ! block
394  'MAXBOUND', & ! tag name
395  'MAXBOUND', & ! fortran variable
396  'INTEGER', & ! type
397  '', & ! shape
398  'maximum number of wells in any stress period', & ! longname
399  .false., & ! required
400  .false., & ! developmode
401  .false., & ! multi-record
402  .false., & ! preserve case
403  .false., & ! layered
404  .false. & ! timeseries
405  )
406 
407  type(inputparamdefinitiontype), parameter :: &
408  gwfwelg_q = inputparamdefinitiontype &
409  ( &
410  'GWF', & ! component
411  'WELG', & ! subcomponent
412  'PERIOD', & ! block
413  'Q', & ! tag name
414  'Q', & ! fortran variable
415  'DOUBLE1D', & ! type
416  'NODES', & ! shape
417  'well rate', & ! longname
418  .true., & ! required
419  .false., & ! developmode
420  .false., & ! multi-record
421  .false., & ! preserve case
422  .true., & ! layered
423  .false. & ! timeseries
424  )
425 
426  type(inputparamdefinitiontype), parameter :: &
427  gwfwelg_auxvar = inputparamdefinitiontype &
428  ( &
429  'GWF', & ! component
430  'WELG', & ! subcomponent
431  'PERIOD', & ! block
432  'AUX', & ! tag name
433  'AUXVAR', & ! fortran variable
434  'DOUBLE2D', & ! type
435  'NAUX NODES', & ! shape
436  'well auxiliary variable iaux', & ! longname
437  .false., & ! required
438  .false., & ! developmode
439  .false., & ! multi-record
440  .false., & ! preserve case
441  .true., & ! layered
442  .false. & ! timeseries
443  )
444 
445  type(inputparamdefinitiontype), parameter :: &
446  gwf_welg_param_definitions(*) = &
447  [ &
448  gwfwelg_readarraygrid, &
449  gwfwelg_auxiliary, &
450  gwfwelg_auxmultname, &
451  gwfwelg_iprpak, &
452  gwfwelg_iprflow, &
453  gwfwelg_ipakcb, &
454  gwfwelg_flowred, &
455  gwfwelg_afrcsv_rec, &
456  gwfwelg_afrcsv, &
457  gwfwelg_fileout, &
458  gwfwelg_afrcsvfile, &
459  gwfwelg_iflowredlen, &
460  gwfwelg_obs_filerecord, &
461  gwfwelg_filein, &
462  gwfwelg_obs6, &
463  gwfwelg_obs6_filename, &
464  gwfwelg_mover, &
465  gwfwelg_export_nc, &
466  gwfwelg_maxbound, &
467  gwfwelg_q, &
468  gwfwelg_auxvar &
469  ]
470 
471  type(inputparamdefinitiontype), parameter :: &
472  gwf_welg_aggregate_definitions(*) = &
473  [ &
474  inputparamdefinitiontype &
475  ( &
476  '', & ! component
477  '', & ! subcomponent
478  '', & ! block
479  '', & ! tag name
480  '', & ! fortran variable
481  '', & ! type
482  '', & ! shape
483  '', & ! longname
484  .false., & ! required
485  .false., & ! developmode
486  .false., & ! multi-record
487  .false., & ! preserve case
488  .false., & ! layered
489  .false. & ! timeseries
490  ) &
491  ]
492 
493  type(inputblockdefinitiontype), parameter :: &
494  gwf_welg_block_definitions(*) = &
495  [ &
496  inputblockdefinitiontype( &
497  'OPTIONS', & ! blockname
498  .true., & ! required
499  .false., & ! aggregate
500  .false. & ! block_variable
501  ), &
502  inputblockdefinitiontype( &
503  'DIMENSIONS', & ! blockname
504  .false., & ! required
505  .false., & ! aggregate
506  .false. & ! block_variable
507  ), &
508  inputblockdefinitiontype( &
509  'PERIOD', & ! blockname
510  .true., & ! required
511  .false., & ! aggregate
512  .true. & ! block_variable
513  ) &
514  ]
515 
516 end module gwfwelginputmodule
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
gwfwelginputmodule::gwfwelg_obs6
type(inputparamdefinitiontype), parameter gwfwelg_obs6
Definition: gwf-welgidm.f90:312
gwfwelginputmodule::gwfwelg_auxiliary
type(inputparamdefinitiontype), parameter gwfwelg_auxiliary
Definition: gwf-welgidm.f90:65
gwfwelginputmodule::gwfwelg_fileout
type(inputparamdefinitiontype), parameter gwfwelg_fileout
Definition: gwf-welgidm.f90:217
gwfwelginputmodule::gwfwelg_afrcsv_rec
type(inputparamdefinitiontype), parameter gwfwelg_afrcsv_rec
Definition: gwf-welgidm.f90:179
gwfwelginputmodule::gwfwelg_maxbound
type(inputparamdefinitiontype), parameter gwfwelg_maxbound
Definition: gwf-welgidm.f90:388
gwfwelginputmodule::gwfwelg_mover
type(inputparamdefinitiontype), parameter gwfwelg_mover
Definition: gwf-welgidm.f90:350
gwfwelginputmodule::gwfwelg_auxvar
type(inputparamdefinitiontype), parameter gwfwelg_auxvar
Definition: gwf-welgidm.f90:426
gwfwelginputmodule::gwfwelg_readarraygrid
type(inputparamdefinitiontype), parameter gwfwelg_readarraygrid
Definition: gwf-welgidm.f90:46
gwfwelginputmodule::gwfwelg_filein
type(inputparamdefinitiontype), parameter gwfwelg_filein
Definition: gwf-welgidm.f90:293
gwfwelginputmodule::gwf_welg_multi_package
logical, public gwf_welg_multi_package
Definition: gwf-welgidm.f90:38
gwfwelginputmodule::gwfwelg_iprpak
type(inputparamdefinitiontype), parameter gwfwelg_iprpak
Definition: gwf-welgidm.f90:103
gwfwelginputmodule::gwf_welg_subpackages
character(len=16), dimension(*), parameter, public gwf_welg_subpackages
Definition: gwf-welgidm.f90:40
gwfwelginputmodule::gwfwelg_auxmultname
type(inputparamdefinitiontype), parameter gwfwelg_auxmultname
Definition: gwf-welgidm.f90:84
gwfwelginputmodule::gwfwelg_flowred
type(inputparamdefinitiontype), parameter gwfwelg_flowred
Definition: gwf-welgidm.f90:160
gwfwelginputmodule::gwfwelg_afrcsv
type(inputparamdefinitiontype), parameter gwfwelg_afrcsv
Definition: gwf-welgidm.f90:198
gwfwelginputmodule::gwfwelg_obs_filerecord
type(inputparamdefinitiontype), parameter gwfwelg_obs_filerecord
Definition: gwf-welgidm.f90:274
gwfwelginputmodule::gwfwelg_obs6_filename
type(inputparamdefinitiontype), parameter gwfwelg_obs6_filename
Definition: gwf-welgidm.f90:331
gwfwelginputmodule::gwfwelg_q
type(inputparamdefinitiontype), parameter gwfwelg_q
Definition: gwf-welgidm.f90:407
gwfwelginputmodule::gwfwelg_iflowredlen
type(inputparamdefinitiontype), parameter gwfwelg_iflowredlen
Definition: gwf-welgidm.f90:255
gwfwelginputmodule::gwfwelg_iprflow
type(inputparamdefinitiontype), parameter gwfwelg_iprflow
Definition: gwf-welgidm.f90:122
gwfwelginputmodule::gwf_welg_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public gwf_welg_block_definitions
Definition: gwf-welgidm.f90:493
gwfwelginputmodule::gwfwelg_export_nc
type(inputparamdefinitiontype), parameter gwfwelg_export_nc
Definition: gwf-welgidm.f90:369
gwfwelginputmodule::gwfwelg_afrcsvfile
type(inputparamdefinitiontype), parameter gwfwelg_afrcsvfile
Definition: gwf-welgidm.f90:236
gwfwelginputmodule::gwf_welg_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_welg_aggregate_definitions
Definition: gwf-welgidm.f90:471
gwfwelginputmodule::gwfwelg_ipakcb
type(inputparamdefinitiontype), parameter gwfwelg_ipakcb
Definition: gwf-welgidm.f90:141
gwfwelginputmodule::gwf_welg_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_welg_param_definitions
Definition: gwf-welgidm.f90:445
inputdefinitionmodule
This module contains the InputDefinitionModule.
Definition: InputDefinition.f90:7