MODFLOW 6  version 6.7.0.dev0
USGS Modular Hydrologic Model
swf-zdgidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module swfzdginputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public swf_zdg_param_definitions
8  public swf_zdg_aggregate_definitions
9  public swf_zdg_block_definitions
10  public swfzdgparamfoundtype
11  public swf_zdg_multi_package
12  public swf_zdg_subpackages
13 
14  type swfzdgparamfoundtype
15  logical :: auxiliary = .false.
16  logical :: boundnames = .false.
17  logical :: iprpak = .false.
18  logical :: iprflow = .false.
19  logical :: ipakcb = .false.
20  logical :: ts_filerecord = .false.
21  logical :: ts6 = .false.
22  logical :: filein = .false.
23  logical :: ts6_filename = .false.
24  logical :: obs_filerecord = .false.
25  logical :: obs6 = .false.
26  logical :: obs6_filename = .false.
27  logical :: maxbound = .false.
28  logical :: cellid = .false.
29  logical :: idcxs = .false.
30  logical :: width = .false.
31  logical :: slope = .false.
32  logical :: rough = .false.
33  logical :: auxvar = .false.
34  logical :: boundname = .false.
35  end type swfzdgparamfoundtype
36 
37  logical :: swf_zdg_multi_package = .true.
38 
39  character(len=16), parameter :: &
40  swf_zdg_subpackages(*) = &
41  [ &
42  ' ' &
43  ]
44 
45  type(inputparamdefinitiontype), parameter :: &
46  swfzdg_auxiliary = inputparamdefinitiontype &
47  ( &
48  'SWF', & ! component
49  'ZDG', & ! subcomponent
50  'OPTIONS', & ! block
51  'AUXILIARY', & ! tag name
52  'AUXILIARY', & ! fortran variable
53  'STRING', & ! type
54  'NAUX', & ! shape
55  'keyword to specify aux variables', & ! longname
56  .false., & ! required
57  .false., & ! multi-record
58  .false., & ! preserve case
59  .false., & ! layered
60  .false. & ! timeseries
61  )
62 
63  type(inputparamdefinitiontype), parameter :: &
64  swfzdg_boundnames = inputparamdefinitiontype &
65  ( &
66  'SWF', & ! component
67  'ZDG', & ! subcomponent
68  'OPTIONS', & ! block
69  'BOUNDNAMES', & ! tag name
70  'BOUNDNAMES', & ! fortran variable
71  'KEYWORD', & ! type
72  '', & ! shape
73  '', & ! longname
74  .false., & ! required
75  .false., & ! multi-record
76  .false., & ! preserve case
77  .false., & ! layered
78  .false. & ! timeseries
79  )
80 
81  type(inputparamdefinitiontype), parameter :: &
82  swfzdg_iprpak = inputparamdefinitiontype &
83  ( &
84  'SWF', & ! component
85  'ZDG', & ! subcomponent
86  'OPTIONS', & ! block
87  'PRINT_INPUT', & ! tag name
88  'IPRPAK', & ! fortran variable
89  'KEYWORD', & ! type
90  '', & ! shape
91  'print input to listing file', & ! longname
92  .false., & ! required
93  .false., & ! multi-record
94  .false., & ! preserve case
95  .false., & ! layered
96  .false. & ! timeseries
97  )
98 
99  type(inputparamdefinitiontype), parameter :: &
100  swfzdg_iprflow = inputparamdefinitiontype &
101  ( &
102  'SWF', & ! component
103  'ZDG', & ! subcomponent
104  'OPTIONS', & ! block
105  'PRINT_FLOWS', & ! tag name
106  'IPRFLOW', & ! fortran variable
107  'KEYWORD', & ! type
108  '', & ! shape
109  'print calculated flows to listing file', & ! longname
110  .false., & ! required
111  .false., & ! multi-record
112  .false., & ! preserve case
113  .false., & ! layered
114  .false. & ! timeseries
115  )
116 
117  type(inputparamdefinitiontype), parameter :: &
118  swfzdg_ipakcb = inputparamdefinitiontype &
119  ( &
120  'SWF', & ! component
121  'ZDG', & ! subcomponent
122  'OPTIONS', & ! block
123  'SAVE_FLOWS', & ! tag name
124  'IPAKCB', & ! fortran variable
125  'KEYWORD', & ! type
126  '', & ! shape
127  'save flows to budget file', & ! longname
128  .false., & ! required
129  .false., & ! multi-record
130  .false., & ! preserve case
131  .false., & ! layered
132  .false. & ! timeseries
133  )
134 
135  type(inputparamdefinitiontype), parameter :: &
136  swfzdg_ts_filerecord = inputparamdefinitiontype &
137  ( &
138  'SWF', & ! component
139  'ZDG', & ! subcomponent
140  'OPTIONS', & ! block
141  'TS_FILERECORD', & ! tag name
142  'TS_FILERECORD', & ! fortran variable
143  'RECORD TS6 FILEIN TS6_FILENAME', & ! type
144  '', & ! shape
145  '', & ! longname
146  .false., & ! required
147  .false., & ! multi-record
148  .false., & ! preserve case
149  .false., & ! layered
150  .false. & ! timeseries
151  )
152 
153  type(inputparamdefinitiontype), parameter :: &
154  swfzdg_ts6 = inputparamdefinitiontype &
155  ( &
156  'SWF', & ! component
157  'ZDG', & ! subcomponent
158  'OPTIONS', & ! block
159  'TS6', & ! tag name
160  'TS6', & ! fortran variable
161  'KEYWORD', & ! type
162  '', & ! shape
163  'head keyword', & ! longname
164  .true., & ! required
165  .true., & ! multi-record
166  .false., & ! preserve case
167  .false., & ! layered
168  .false. & ! timeseries
169  )
170 
171  type(inputparamdefinitiontype), parameter :: &
172  swfzdg_filein = inputparamdefinitiontype &
173  ( &
174  'SWF', & ! component
175  'ZDG', & ! subcomponent
176  'OPTIONS', & ! block
177  'FILEIN', & ! tag name
178  'FILEIN', & ! fortran variable
179  'KEYWORD', & ! type
180  '', & ! shape
181  'file keyword', & ! longname
182  .true., & ! required
183  .true., & ! multi-record
184  .false., & ! preserve case
185  .false., & ! layered
186  .false. & ! timeseries
187  )
188 
189  type(inputparamdefinitiontype), parameter :: &
190  swfzdg_ts6_filename = inputparamdefinitiontype &
191  ( &
192  'SWF', & ! component
193  'ZDG', & ! subcomponent
194  'OPTIONS', & ! block
195  'TS6_FILENAME', & ! tag name
196  'TS6_FILENAME', & ! fortran variable
197  'STRING', & ! type
198  '', & ! shape
199  'file name of time series information', & ! longname
200  .true., & ! required
201  .true., & ! multi-record
202  .true., & ! preserve case
203  .false., & ! layered
204  .false. & ! timeseries
205  )
206 
207  type(inputparamdefinitiontype), parameter :: &
208  swfzdg_obs_filerecord = inputparamdefinitiontype &
209  ( &
210  'SWF', & ! component
211  'ZDG', & ! subcomponent
212  'OPTIONS', & ! block
213  'OBS_FILERECORD', & ! tag name
214  'OBS_FILERECORD', & ! fortran variable
215  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
216  '', & ! shape
217  '', & ! longname
218  .false., & ! required
219  .false., & ! multi-record
220  .false., & ! preserve case
221  .false., & ! layered
222  .false. & ! timeseries
223  )
224 
225  type(inputparamdefinitiontype), parameter :: &
226  swfzdg_obs6 = inputparamdefinitiontype &
227  ( &
228  'SWF', & ! component
229  'ZDG', & ! subcomponent
230  'OPTIONS', & ! block
231  'OBS6', & ! tag name
232  'OBS6', & ! fortran variable
233  'KEYWORD', & ! type
234  '', & ! shape
235  'obs keyword', & ! longname
236  .true., & ! required
237  .true., & ! multi-record
238  .false., & ! preserve case
239  .false., & ! layered
240  .false. & ! timeseries
241  )
242 
243  type(inputparamdefinitiontype), parameter :: &
244  swfzdg_obs6_filename = inputparamdefinitiontype &
245  ( &
246  'SWF', & ! component
247  'ZDG', & ! subcomponent
248  'OPTIONS', & ! block
249  'OBS6_FILENAME', & ! tag name
250  'OBS6_FILENAME', & ! fortran variable
251  'STRING', & ! type
252  '', & ! shape
253  'obs6 input filename', & ! longname
254  .true., & ! required
255  .true., & ! multi-record
256  .true., & ! preserve case
257  .false., & ! layered
258  .false. & ! timeseries
259  )
260 
261  type(inputparamdefinitiontype), parameter :: &
262  swfzdg_maxbound = inputparamdefinitiontype &
263  ( &
264  'SWF', & ! component
265  'ZDG', & ! subcomponent
266  'DIMENSIONS', & ! block
267  'MAXBOUND', & ! tag name
268  'MAXBOUND', & ! fortran variable
269  'INTEGER', & ! type
270  '', & ! shape
271  'maximum number of zero-depth-gradient boundaries', & ! longname
272  .true., & ! required
273  .false., & ! multi-record
274  .false., & ! preserve case
275  .false., & ! layered
276  .false. & ! timeseries
277  )
278 
279  type(inputparamdefinitiontype), parameter :: &
280  swfzdg_cellid = inputparamdefinitiontype &
281  ( &
282  'SWF', & ! component
283  'ZDG', & ! subcomponent
284  'PERIOD', & ! block
285  'CELLID', & ! tag name
286  'CELLID', & ! fortran variable
287  'INTEGER1D', & ! type
288  'NCELLDIM', & ! shape
289  'cell identifier', & ! longname
290  .true., & ! required
291  .true., & ! multi-record
292  .false., & ! preserve case
293  .false., & ! layered
294  .false. & ! timeseries
295  )
296 
297  type(inputparamdefinitiontype), parameter :: &
298  swfzdg_idcxs = inputparamdefinitiontype &
299  ( &
300  'SWF', & ! component
301  'ZDG', & ! subcomponent
302  'PERIOD', & ! block
303  'IDCXS', & ! tag name
304  'IDCXS', & ! fortran variable
305  'INTEGER', & ! type
306  '', & ! shape
307  'cross section identifier', & ! longname
308  .true., & ! required
309  .true., & ! multi-record
310  .false., & ! preserve case
311  .false., & ! layered
312  .false. & ! timeseries
313  )
314 
315  type(inputparamdefinitiontype), parameter :: &
316  swfzdg_width = inputparamdefinitiontype &
317  ( &
318  'SWF', & ! component
319  'ZDG', & ! subcomponent
320  'PERIOD', & ! block
321  'WIDTH', & ! tag name
322  'WIDTH', & ! fortran variable
323  'DOUBLE', & ! type
324  '', & ! shape
325  'width of the zero-depth gradient boundary', & ! longname
326  .true., & ! required
327  .true., & ! multi-record
328  .false., & ! preserve case
329  .false., & ! layered
330  .true. & ! timeseries
331  )
332 
333  type(inputparamdefinitiontype), parameter :: &
334  swfzdg_slope = inputparamdefinitiontype &
335  ( &
336  'SWF', & ! component
337  'ZDG', & ! subcomponent
338  'PERIOD', & ! block
339  'SLOPE', & ! tag name
340  'SLOPE', & ! fortran variable
341  'DOUBLE', & ! type
342  '', & ! shape
343  'channel slope', & ! longname
344  .true., & ! required
345  .true., & ! multi-record
346  .false., & ! preserve case
347  .false., & ! layered
348  .true. & ! timeseries
349  )
350 
351  type(inputparamdefinitiontype), parameter :: &
352  swfzdg_rough = inputparamdefinitiontype &
353  ( &
354  'SWF', & ! component
355  'ZDG', & ! subcomponent
356  'PERIOD', & ! block
357  'ROUGH', & ! tag name
358  'ROUGH', & ! fortran variable
359  'DOUBLE', & ! type
360  '', & ! shape
361  'channel roughness', & ! longname
362  .true., & ! required
363  .true., & ! multi-record
364  .false., & ! preserve case
365  .false., & ! layered
366  .true. & ! timeseries
367  )
368 
369  type(inputparamdefinitiontype), parameter :: &
370  swfzdg_auxvar = inputparamdefinitiontype &
371  ( &
372  'SWF', & ! component
373  'ZDG', & ! subcomponent
374  'PERIOD', & ! block
375  'AUX', & ! tag name
376  'AUXVAR', & ! fortran variable
377  'DOUBLE1D', & ! type
378  'NAUX', & ! shape
379  'auxiliary variables', & ! longname
380  .false., & ! required
381  .true., & ! multi-record
382  .false., & ! preserve case
383  .false., & ! layered
384  .true. & ! timeseries
385  )
386 
387  type(inputparamdefinitiontype), parameter :: &
388  swfzdg_boundname = inputparamdefinitiontype &
389  ( &
390  'SWF', & ! component
391  'ZDG', & ! subcomponent
392  'PERIOD', & ! block
393  'BOUNDNAME', & ! tag name
394  'BOUNDNAME', & ! fortran variable
395  'STRING', & ! type
396  '', & ! shape
397  'zero-depth-gradient boundary name', & ! longname
398  .false., & ! required
399  .true., & ! multi-record
400  .false., & ! preserve case
401  .false., & ! layered
402  .false. & ! timeseries
403  )
404 
405  type(inputparamdefinitiontype), parameter :: &
406  swf_zdg_param_definitions(*) = &
407  [ &
408  swfzdg_auxiliary, &
409  swfzdg_boundnames, &
410  swfzdg_iprpak, &
411  swfzdg_iprflow, &
412  swfzdg_ipakcb, &
413  swfzdg_ts_filerecord, &
414  swfzdg_ts6, &
415  swfzdg_filein, &
416  swfzdg_ts6_filename, &
417  swfzdg_obs_filerecord, &
418  swfzdg_obs6, &
419  swfzdg_obs6_filename, &
420  swfzdg_maxbound, &
421  swfzdg_cellid, &
422  swfzdg_idcxs, &
423  swfzdg_width, &
424  swfzdg_slope, &
425  swfzdg_rough, &
426  swfzdg_auxvar, &
427  swfzdg_boundname &
428  ]
429 
430  type(inputparamdefinitiontype), parameter :: &
431  swfzdg_spd = inputparamdefinitiontype &
432  ( &
433  'SWF', & ! component
434  'ZDG', & ! subcomponent
435  'PERIOD', & ! block
436  'STRESS_PERIOD_DATA', & ! tag name
437  'SPD', & ! fortran variable
438  'RECARRAY CELLID IDCXS WIDTH SLOPE ROUGH AUX BOUNDNAME', & ! type
439  'MAXBOUND', & ! shape
440  '', & ! longname
441  .true., & ! required
442  .false., & ! multi-record
443  .false., & ! preserve case
444  .false., & ! layered
445  .false. & ! timeseries
446  )
447 
448  type(inputparamdefinitiontype), parameter :: &
449  swf_zdg_aggregate_definitions(*) = &
450  [ &
451  swfzdg_spd &
452  ]
453 
454  type(inputblockdefinitiontype), parameter :: &
455  swf_zdg_block_definitions(*) = &
456  [ &
457  inputblockdefinitiontype( &
458  'OPTIONS', & ! blockname
459  .false., & ! required
460  .false., & ! aggregate
461  .false. & ! block_variable
462  ), &
463  inputblockdefinitiontype( &
464  'DIMENSIONS', & ! blockname
465  .true., & ! required
466  .false., & ! aggregate
467  .false. & ! block_variable
468  ), &
469  inputblockdefinitiontype( &
470  'PERIOD', & ! blockname
471  .true., & ! required
472  .true., & ! aggregate
473  .true. & ! block_variable
474  ) &
475  ]
476 
477 end module swfzdginputmodule
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
inputdefinitionmodule
This module contains the InputDefinitionModule.
Definition: InputDefinition.f90:7
swfzdginputmodule::swfzdg_ts6
type(inputparamdefinitiontype), parameter swfzdg_ts6
Definition: swf-zdgidm.f90:153
swfzdginputmodule::swfzdg_slope
type(inputparamdefinitiontype), parameter swfzdg_slope
Definition: swf-zdgidm.f90:333
swfzdginputmodule::swf_zdg_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public swf_zdg_block_definitions
Definition: swf-zdgidm.f90:454
swfzdginputmodule::swfzdg_rough
type(inputparamdefinitiontype), parameter swfzdg_rough
Definition: swf-zdgidm.f90:351
swfzdginputmodule::swfzdg_ipakcb
type(inputparamdefinitiontype), parameter swfzdg_ipakcb
Definition: swf-zdgidm.f90:117
swfzdginputmodule::swfzdg_obs6
type(inputparamdefinitiontype), parameter swfzdg_obs6
Definition: swf-zdgidm.f90:225
swfzdginputmodule::swfzdg_auxiliary
type(inputparamdefinitiontype), parameter swfzdg_auxiliary
Definition: swf-zdgidm.f90:45
swfzdginputmodule::swf_zdg_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public swf_zdg_param_definitions
Definition: swf-zdgidm.f90:405
swfzdginputmodule::swfzdg_maxbound
type(inputparamdefinitiontype), parameter swfzdg_maxbound
Definition: swf-zdgidm.f90:261
swfzdginputmodule::swfzdg_obs6_filename
type(inputparamdefinitiontype), parameter swfzdg_obs6_filename
Definition: swf-zdgidm.f90:243
swfzdginputmodule::swfzdg_filein
type(inputparamdefinitiontype), parameter swfzdg_filein
Definition: swf-zdgidm.f90:171
swfzdginputmodule::swfzdg_idcxs
type(inputparamdefinitiontype), parameter swfzdg_idcxs
Definition: swf-zdgidm.f90:297
swfzdginputmodule::swfzdg_ts_filerecord
type(inputparamdefinitiontype), parameter swfzdg_ts_filerecord
Definition: swf-zdgidm.f90:135
swfzdginputmodule::swfzdg_iprpak
type(inputparamdefinitiontype), parameter swfzdg_iprpak
Definition: swf-zdgidm.f90:81
swfzdginputmodule::swfzdg_obs_filerecord
type(inputparamdefinitiontype), parameter swfzdg_obs_filerecord
Definition: swf-zdgidm.f90:207
swfzdginputmodule::swfzdg_width
type(inputparamdefinitiontype), parameter swfzdg_width
Definition: swf-zdgidm.f90:315
swfzdginputmodule::swfzdg_cellid
type(inputparamdefinitiontype), parameter swfzdg_cellid
Definition: swf-zdgidm.f90:279
swfzdginputmodule::swf_zdg_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public swf_zdg_aggregate_definitions
Definition: swf-zdgidm.f90:448
swfzdginputmodule::swfzdg_ts6_filename
type(inputparamdefinitiontype), parameter swfzdg_ts6_filename
Definition: swf-zdgidm.f90:189
swfzdginputmodule::swf_zdg_subpackages
character(len=16), dimension(*), parameter, public swf_zdg_subpackages
Definition: swf-zdgidm.f90:39
swfzdginputmodule::swfzdg_iprflow
type(inputparamdefinitiontype), parameter swfzdg_iprflow
Definition: swf-zdgidm.f90:99
swfzdginputmodule::swfzdg_boundname
type(inputparamdefinitiontype), parameter swfzdg_boundname
Definition: swf-zdgidm.f90:387
swfzdginputmodule::swf_zdg_multi_package
logical, public swf_zdg_multi_package
Definition: swf-zdgidm.f90:37
swfzdginputmodule::swfzdg_auxvar
type(inputparamdefinitiontype), parameter swfzdg_auxvar
Definition: swf-zdgidm.f90:369
swfzdginputmodule::swfzdg_spd
type(inputparamdefinitiontype), parameter swfzdg_spd
Definition: swf-zdgidm.f90:430
swfzdginputmodule::swfzdg_boundnames
type(inputparamdefinitiontype), parameter swfzdg_boundnames
Definition: swf-zdgidm.f90:63