MODFLOW 6  version 6.9.0.dev0
USGS Modular Hydrologic Model
gwf-drngidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module gwfdrnginputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public gwf_drng_param_definitions
8  public gwf_drng_aggregate_definitions
9  public gwf_drng_block_definitions
10  public gwfdrngparamfoundtype
11  public gwf_drng_multi_package
12  public gwf_drng_is_advanced
13  public gwf_drng_subpackages
14 
15  type gwfdrngparamfoundtype
16  logical :: readarraygrid = .false.
17  logical :: auxiliary = .false.
18  logical :: auxmultname = .false.
19  logical :: auxdepthname = .false.
20  logical :: iprpak = .false.
21  logical :: iprflow = .false.
22  logical :: ipakcb = .false.
23  logical :: obs_filerecord = .false.
24  logical :: obs6 = .false.
25  logical :: filein = .false.
26  logical :: obs6_filename = .false.
27  logical :: mover = .false.
28  logical :: export_nc = .false.
29  logical :: icubicsfac = .false.
30  logical :: maxbound = .false.
31  logical :: elev = .false.
32  logical :: cond = .false.
33  logical :: auxvar = .false.
34  end type gwfdrngparamfoundtype
35 
36  logical :: gwf_drng_multi_package = .true.
37  logical :: gwf_drng_is_advanced = .false.
38 
39  character(len=16), parameter :: &
40  gwf_drng_subpackages(*) = &
41  [ &
42  ' ' &
43  ]
44 
45  type(inputparamdefinitiontype), parameter :: &
46  gwfdrng_readarraygrid = inputparamdefinitiontype &
47  ( &
48  'GWF', & ! component
49  'DRNG', & ! subcomponent
50  'OPTIONS', & ! block
51  'READARRAYGRID', & ! tag name
52  'READARRAYGRID', & ! fortran variable
53  'KEYWORD', & ! type
54  '', & ! shape
55  'use array-based grid input', & ! longname
56  .true., & ! required
57  .false., & ! developmode
58  .false., & ! multi-record
59  .false., & ! preserve case
60  .false., & ! layered
61  .false. & ! timeseries
62  )
63 
64  type(inputparamdefinitiontype), parameter :: &
65  gwfdrng_auxiliary = inputparamdefinitiontype &
66  ( &
67  'GWF', & ! component
68  'DRNG', & ! subcomponent
69  'OPTIONS', & ! block
70  'AUXILIARY', & ! tag name
71  'AUXILIARY', & ! fortran variable
72  'STRING', & ! type
73  'NAUX', & ! shape
74  'keyword to specify aux variables', & ! longname
75  .false., & ! required
76  .false., & ! developmode
77  .false., & ! multi-record
78  .false., & ! preserve case
79  .false., & ! layered
80  .false. & ! timeseries
81  )
82 
83  type(inputparamdefinitiontype), parameter :: &
84  gwfdrng_auxmultname = inputparamdefinitiontype &
85  ( &
86  'GWF', & ! component
87  'DRNG', & ! subcomponent
88  'OPTIONS', & ! block
89  'AUXMULTNAME', & ! tag name
90  'AUXMULTNAME', & ! fortran variable
91  'STRING', & ! type
92  '', & ! shape
93  'name of auxiliary variable for multiplier', & ! longname
94  .false., & ! required
95  .false., & ! developmode
96  .false., & ! multi-record
97  .false., & ! preserve case
98  .false., & ! layered
99  .false. & ! timeseries
100  )
101 
102  type(inputparamdefinitiontype), parameter :: &
103  gwfdrng_auxdepthname = inputparamdefinitiontype &
104  ( &
105  'GWF', & ! component
106  'DRNG', & ! subcomponent
107  'OPTIONS', & ! block
108  'AUXDEPTHNAME', & ! tag name
109  'AUXDEPTHNAME', & ! fortran variable
110  'STRING', & ! type
111  '', & ! shape
112  'name of auxiliary variable for drainage depth', & ! longname
113  .false., & ! required
114  .false., & ! developmode
115  .false., & ! multi-record
116  .false., & ! preserve case
117  .false., & ! layered
118  .false. & ! timeseries
119  )
120 
121  type(inputparamdefinitiontype), parameter :: &
122  gwfdrng_iprpak = inputparamdefinitiontype &
123  ( &
124  'GWF', & ! component
125  'DRNG', & ! subcomponent
126  'OPTIONS', & ! block
127  'PRINT_INPUT', & ! tag name
128  'IPRPAK', & ! fortran variable
129  'KEYWORD', & ! type
130  '', & ! shape
131  'print input to listing file', & ! longname
132  .false., & ! required
133  .false., & ! developmode
134  .false., & ! multi-record
135  .false., & ! preserve case
136  .false., & ! layered
137  .false. & ! timeseries
138  )
139 
140  type(inputparamdefinitiontype), parameter :: &
141  gwfdrng_iprflow = inputparamdefinitiontype &
142  ( &
143  'GWF', & ! component
144  'DRNG', & ! subcomponent
145  'OPTIONS', & ! block
146  'PRINT_FLOWS', & ! tag name
147  'IPRFLOW', & ! fortran variable
148  'KEYWORD', & ! type
149  '', & ! shape
150  'print calculated flows to listing file', & ! longname
151  .false., & ! required
152  .false., & ! developmode
153  .false., & ! multi-record
154  .false., & ! preserve case
155  .false., & ! layered
156  .false. & ! timeseries
157  )
158 
159  type(inputparamdefinitiontype), parameter :: &
160  gwfdrng_ipakcb = inputparamdefinitiontype &
161  ( &
162  'GWF', & ! component
163  'DRNG', & ! subcomponent
164  'OPTIONS', & ! block
165  'SAVE_FLOWS', & ! tag name
166  'IPAKCB', & ! fortran variable
167  'KEYWORD', & ! type
168  '', & ! shape
169  'save DRNG flows to budget file', & ! longname
170  .false., & ! required
171  .false., & ! developmode
172  .false., & ! multi-record
173  .false., & ! preserve case
174  .false., & ! layered
175  .false. & ! timeseries
176  )
177 
178  type(inputparamdefinitiontype), parameter :: &
179  gwfdrng_obs_filerecord = inputparamdefinitiontype &
180  ( &
181  'GWF', & ! component
182  'DRNG', & ! subcomponent
183  'OPTIONS', & ! block
184  'OBS_FILERECORD', & ! tag name
185  'OBS_FILERECORD', & ! fortran variable
186  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
187  '', & ! shape
188  '', & ! longname
189  .false., & ! required
190  .false., & ! developmode
191  .false., & ! multi-record
192  .false., & ! preserve case
193  .false., & ! layered
194  .false. & ! timeseries
195  )
196 
197  type(inputparamdefinitiontype), parameter :: &
198  gwfdrng_obs6 = inputparamdefinitiontype &
199  ( &
200  'GWF', & ! component
201  'DRNG', & ! subcomponent
202  'OPTIONS', & ! block
203  'OBS6', & ! tag name
204  'OBS6', & ! fortran variable
205  'KEYWORD', & ! type
206  '', & ! shape
207  'obs keyword', & ! longname
208  .true., & ! required
209  .false., & ! developmode
210  .true., & ! multi-record
211  .false., & ! preserve case
212  .false., & ! layered
213  .false. & ! timeseries
214  )
215 
216  type(inputparamdefinitiontype), parameter :: &
217  gwfdrng_filein = inputparamdefinitiontype &
218  ( &
219  'GWF', & ! component
220  'DRNG', & ! subcomponent
221  'OPTIONS', & ! block
222  'FILEIN', & ! tag name
223  'FILEIN', & ! fortran variable
224  'KEYWORD', & ! type
225  '', & ! shape
226  'file keyword', & ! longname
227  .true., & ! required
228  .false., & ! developmode
229  .true., & ! multi-record
230  .false., & ! preserve case
231  .false., & ! layered
232  .false. & ! timeseries
233  )
234 
235  type(inputparamdefinitiontype), parameter :: &
236  gwfdrng_obs6_filename = inputparamdefinitiontype &
237  ( &
238  'GWF', & ! component
239  'DRNG', & ! subcomponent
240  'OPTIONS', & ! block
241  'OBS6_FILENAME', & ! tag name
242  'OBS6_FILENAME', & ! fortran variable
243  'STRING', & ! type
244  '', & ! shape
245  'obs6 input filename', & ! longname
246  .true., & ! required
247  .false., & ! developmode
248  .true., & ! multi-record
249  .true., & ! preserve case
250  .false., & ! layered
251  .false. & ! timeseries
252  )
253 
254  type(inputparamdefinitiontype), parameter :: &
255  gwfdrng_mover = inputparamdefinitiontype &
256  ( &
257  'GWF', & ! component
258  'DRNG', & ! subcomponent
259  'OPTIONS', & ! block
260  'MOVER', & ! tag name
261  'MOVER', & ! fortran variable
262  'KEYWORD', & ! type
263  '', & ! shape
264  '', & ! longname
265  .false., & ! required
266  .false., & ! developmode
267  .false., & ! multi-record
268  .false., & ! preserve case
269  .false., & ! layered
270  .false. & ! timeseries
271  )
272 
273  type(inputparamdefinitiontype), parameter :: &
274  gwfdrng_export_nc = inputparamdefinitiontype &
275  ( &
276  'GWF', & ! component
277  'DRNG', & ! subcomponent
278  'OPTIONS', & ! block
279  'EXPORT_ARRAY_NETCDF', & ! tag name
280  'EXPORT_NC', & ! fortran variable
281  'KEYWORD', & ! type
282  '', & ! shape
283  'export array variables to netcdf output files.', & ! longname
284  .false., & ! required
285  .false., & ! developmode
286  .false., & ! multi-record
287  .false., & ! preserve case
288  .false., & ! layered
289  .false. & ! timeseries
290  )
291 
292  type(inputparamdefinitiontype), parameter :: &
293  gwfdrng_icubicsfac = inputparamdefinitiontype &
294  ( &
295  'GWF', & ! component
296  'DRNG', & ! subcomponent
297  'OPTIONS', & ! block
298  'DEV_CUBIC_SCALING', & ! tag name
299  'ICUBICSFAC', & ! fortran variable
300  'KEYWORD', & ! type
301  '', & ! shape
302  'cubic-scaling', & ! longname
303  .false., & ! required
304  .false., & ! developmode
305  .false., & ! multi-record
306  .false., & ! preserve case
307  .false., & ! layered
308  .false. & ! timeseries
309  )
310 
311  type(inputparamdefinitiontype), parameter :: &
312  gwfdrng_maxbound = inputparamdefinitiontype &
313  ( &
314  'GWF', & ! component
315  'DRNG', & ! subcomponent
316  'DIMENSIONS', & ! block
317  'MAXBOUND', & ! tag name
318  'MAXBOUND', & ! fortran variable
319  'INTEGER', & ! type
320  '', & ! shape
321  'maximum number of drain cells in any stress period', & ! longname
322  .false., & ! required
323  .false., & ! developmode
324  .false., & ! multi-record
325  .false., & ! preserve case
326  .false., & ! layered
327  .false. & ! timeseries
328  )
329 
330  type(inputparamdefinitiontype), parameter :: &
331  gwfdrng_elev = inputparamdefinitiontype &
332  ( &
333  'GWF', & ! component
334  'DRNG', & ! subcomponent
335  'PERIOD', & ! block
336  'ELEV', & ! tag name
337  'ELEV', & ! fortran variable
338  'DOUBLE1D', & ! type
339  'NODES', & ! shape
340  'drain elevation', & ! longname
341  .true., & ! required
342  .false., & ! developmode
343  .false., & ! multi-record
344  .false., & ! preserve case
345  .true., & ! layered
346  .false. & ! timeseries
347  )
348 
349  type(inputparamdefinitiontype), parameter :: &
350  gwfdrng_cond = inputparamdefinitiontype &
351  ( &
352  'GWF', & ! component
353  'DRNG', & ! subcomponent
354  'PERIOD', & ! block
355  'COND', & ! tag name
356  'COND', & ! fortran variable
357  'DOUBLE1D', & ! type
358  'NODES', & ! shape
359  'drain conductance', & ! longname
360  .true., & ! required
361  .false., & ! developmode
362  .false., & ! multi-record
363  .false., & ! preserve case
364  .true., & ! layered
365  .false. & ! timeseries
366  )
367 
368  type(inputparamdefinitiontype), parameter :: &
369  gwfdrng_auxvar = inputparamdefinitiontype &
370  ( &
371  'GWF', & ! component
372  'DRNG', & ! subcomponent
373  'PERIOD', & ! block
374  'AUX', & ! tag name
375  'AUXVAR', & ! fortran variable
376  'DOUBLE2D', & ! type
377  'NAUX NODES', & ! shape
378  'drain auxiliary variable iaux', & ! longname
379  .false., & ! required
380  .false., & ! developmode
381  .false., & ! multi-record
382  .false., & ! preserve case
383  .true., & ! layered
384  .false. & ! timeseries
385  )
386 
387  type(inputparamdefinitiontype), parameter :: &
388  gwf_drng_param_definitions(*) = &
389  [ &
390  gwfdrng_readarraygrid, &
391  gwfdrng_auxiliary, &
392  gwfdrng_auxmultname, &
393  gwfdrng_auxdepthname, &
394  gwfdrng_iprpak, &
395  gwfdrng_iprflow, &
396  gwfdrng_ipakcb, &
397  gwfdrng_obs_filerecord, &
398  gwfdrng_obs6, &
399  gwfdrng_filein, &
400  gwfdrng_obs6_filename, &
401  gwfdrng_mover, &
402  gwfdrng_export_nc, &
403  gwfdrng_icubicsfac, &
404  gwfdrng_maxbound, &
405  gwfdrng_elev, &
406  gwfdrng_cond, &
407  gwfdrng_auxvar &
408  ]
409 
410  type(inputparamdefinitiontype), parameter :: &
411  gwf_drng_aggregate_definitions(*) = &
412  [ &
413  inputparamdefinitiontype &
414  ( &
415  '', & ! component
416  '', & ! subcomponent
417  '', & ! block
418  '', & ! tag name
419  '', & ! fortran variable
420  '', & ! type
421  '', & ! shape
422  '', & ! longname
423  .false., & ! required
424  .false., & ! developmode
425  .false., & ! multi-record
426  .false., & ! preserve case
427  .false., & ! layered
428  .false. & ! timeseries
429  ) &
430  ]
431 
432  type(inputblockdefinitiontype), parameter :: &
433  gwf_drng_block_definitions(*) = &
434  [ &
435  inputblockdefinitiontype( &
436  'OPTIONS', & ! blockname
437  .true., & ! required
438  .false., & ! aggregate
439  .false. & ! block_variable
440  ), &
441  inputblockdefinitiontype( &
442  'DIMENSIONS', & ! blockname
443  .false., & ! required
444  .false., & ! aggregate
445  .false. & ! block_variable
446  ), &
447  inputblockdefinitiontype( &
448  'PERIOD', & ! blockname
449  .true., & ! required
450  .false., & ! aggregate
451  .true. & ! block_variable
452  ) &
453  ]
454 
455 end module gwfdrnginputmodule
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
gwfdrnginputmodule::gwf_drng_multi_package
logical, public gwf_drng_multi_package
Definition: gwf-drngidm.f90:36
gwfdrnginputmodule::gwfdrng_auxvar
type(inputparamdefinitiontype), parameter gwfdrng_auxvar
Definition: gwf-drngidm.f90:368
gwfdrnginputmodule::gwf_drng_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public gwf_drng_block_definitions
Definition: gwf-drngidm.f90:432
gwfdrnginputmodule::gwfdrng_icubicsfac
type(inputparamdefinitiontype), parameter gwfdrng_icubicsfac
Definition: gwf-drngidm.f90:292
gwfdrnginputmodule::gwf_drng_is_advanced
logical, public gwf_drng_is_advanced
Definition: gwf-drngidm.f90:37
gwfdrnginputmodule::gwfdrng_mover
type(inputparamdefinitiontype), parameter gwfdrng_mover
Definition: gwf-drngidm.f90:254
gwfdrnginputmodule::gwfdrng_ipakcb
type(inputparamdefinitiontype), parameter gwfdrng_ipakcb
Definition: gwf-drngidm.f90:159
gwfdrnginputmodule::gwfdrng_export_nc
type(inputparamdefinitiontype), parameter gwfdrng_export_nc
Definition: gwf-drngidm.f90:273
gwfdrnginputmodule::gwfdrng_iprflow
type(inputparamdefinitiontype), parameter gwfdrng_iprflow
Definition: gwf-drngidm.f90:140
gwfdrnginputmodule::gwfdrng_auxdepthname
type(inputparamdefinitiontype), parameter gwfdrng_auxdepthname
Definition: gwf-drngidm.f90:102
gwfdrnginputmodule::gwfdrng_auxmultname
type(inputparamdefinitiontype), parameter gwfdrng_auxmultname
Definition: gwf-drngidm.f90:83
gwfdrnginputmodule::gwfdrng_elev
type(inputparamdefinitiontype), parameter gwfdrng_elev
Definition: gwf-drngidm.f90:330
gwfdrnginputmodule::gwfdrng_obs_filerecord
type(inputparamdefinitiontype), parameter gwfdrng_obs_filerecord
Definition: gwf-drngidm.f90:178
gwfdrnginputmodule::gwfdrng_obs6
type(inputparamdefinitiontype), parameter gwfdrng_obs6
Definition: gwf-drngidm.f90:197
gwfdrnginputmodule::gwfdrng_auxiliary
type(inputparamdefinitiontype), parameter gwfdrng_auxiliary
Definition: gwf-drngidm.f90:64
gwfdrnginputmodule::gwf_drng_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_drng_param_definitions
Definition: gwf-drngidm.f90:387
gwfdrnginputmodule::gwfdrng_filein
type(inputparamdefinitiontype), parameter gwfdrng_filein
Definition: gwf-drngidm.f90:216
gwfdrnginputmodule::gwfdrng_iprpak
type(inputparamdefinitiontype), parameter gwfdrng_iprpak
Definition: gwf-drngidm.f90:121
gwfdrnginputmodule::gwf_drng_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_drng_aggregate_definitions
Definition: gwf-drngidm.f90:410
gwfdrnginputmodule::gwfdrng_cond
type(inputparamdefinitiontype), parameter gwfdrng_cond
Definition: gwf-drngidm.f90:349
gwfdrnginputmodule::gwfdrng_obs6_filename
type(inputparamdefinitiontype), parameter gwfdrng_obs6_filename
Definition: gwf-drngidm.f90:235
gwfdrnginputmodule::gwf_drng_subpackages
character(len=16), dimension(*), parameter, public gwf_drng_subpackages
Definition: gwf-drngidm.f90:39
gwfdrnginputmodule::gwfdrng_readarraygrid
type(inputparamdefinitiontype), parameter gwfdrng_readarraygrid
Definition: gwf-drngidm.f90:45
gwfdrnginputmodule::gwfdrng_maxbound
type(inputparamdefinitiontype), parameter gwfdrng_maxbound
Definition: gwf-drngidm.f90:311
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