MODFLOW 6  version 6.7.0.dev3
USGS Modular Hydrologic Model
gwf-disidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module gwfdisinputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public gwf_dis_param_definitions
8  public gwf_dis_aggregate_definitions
9  public gwf_dis_block_definitions
10  public gwfdisparamfoundtype
11  public gwf_dis_multi_package
12  public gwf_dis_subpackages
13 
14  type gwfdisparamfoundtype
15  logical :: length_units = .false.
16  logical :: nogrb = .false.
17  logical :: grb_filerecord = .false.
18  logical :: grb6 = .false.
19  logical :: fileout = .false.
20  logical :: grb6_filename = .false.
21  logical :: xorigin = .false.
22  logical :: yorigin = .false.
23  logical :: angrot = .false.
24  logical :: export_ascii = .false.
25  logical :: export_nc = .false.
26  logical :: crs = .false.
27  logical :: ncf_filerecord = .false.
28  logical :: ncf6 = .false.
29  logical :: filein = .false.
30  logical :: ncf6_filename = .false.
31  logical :: nlay = .false.
32  logical :: nrow = .false.
33  logical :: ncol = .false.
34  logical :: delr = .false.
35  logical :: delc = .false.
36  logical :: top = .false.
37  logical :: botm = .false.
38  logical :: idomain = .false.
39  end type gwfdisparamfoundtype
40 
41  logical :: gwf_dis_multi_package = .false.
42 
43  character(len=16), parameter :: &
44  gwf_dis_subpackages(*) = &
45  [ &
46  'UTL-NCF ' &
47  ]
48 
49  type(inputparamdefinitiontype), parameter :: &
50  gwfdis_length_units = inputparamdefinitiontype &
51  ( &
52  'GWF', & ! component
53  'DIS', & ! subcomponent
54  'OPTIONS', & ! block
55  'LENGTH_UNITS', & ! tag name
56  'LENGTH_UNITS', & ! fortran variable
57  'STRING', & ! type
58  '', & ! shape
59  'model length units', & ! longname
60  .false., & ! required
61  .false., & ! developmode
62  .false., & ! multi-record
63  .false., & ! preserve case
64  .false., & ! layered
65  .false. & ! timeseries
66  )
67 
68  type(inputparamdefinitiontype), parameter :: &
69  gwfdis_nogrb = inputparamdefinitiontype &
70  ( &
71  'GWF', & ! component
72  'DIS', & ! subcomponent
73  'OPTIONS', & ! block
74  'NOGRB', & ! tag name
75  'NOGRB', & ! fortran variable
76  'KEYWORD', & ! type
77  '', & ! shape
78  'do not write binary grid file', & ! longname
79  .false., & ! required
80  .false., & ! developmode
81  .false., & ! multi-record
82  .false., & ! preserve case
83  .false., & ! layered
84  .false. & ! timeseries
85  )
86 
87  type(inputparamdefinitiontype), parameter :: &
88  gwfdis_grb_filerecord = inputparamdefinitiontype &
89  ( &
90  'GWF', & ! component
91  'DIS', & ! subcomponent
92  'OPTIONS', & ! block
93  'GRB_FILERECORD', & ! tag name
94  'GRB_FILERECORD', & ! fortran variable
95  'RECORD GRB6 FILEOUT GRB6_FILENAME', & ! type
96  '', & ! shape
97  '', & ! longname
98  .false., & ! required
99  .false., & ! developmode
100  .false., & ! multi-record
101  .false., & ! preserve case
102  .false., & ! layered
103  .false. & ! timeseries
104  )
105 
106  type(inputparamdefinitiontype), parameter :: &
107  gwfdis_grb6 = inputparamdefinitiontype &
108  ( &
109  'GWF', & ! component
110  'DIS', & ! subcomponent
111  'OPTIONS', & ! block
112  'GRB6', & ! tag name
113  'GRB6', & ! fortran variable
114  'KEYWORD', & ! type
115  '', & ! shape
116  'grb keyword', & ! longname
117  .true., & ! required
118  .false., & ! developmode
119  .true., & ! multi-record
120  .false., & ! preserve case
121  .false., & ! layered
122  .false. & ! timeseries
123  )
124 
125  type(inputparamdefinitiontype), parameter :: &
126  gwfdis_fileout = inputparamdefinitiontype &
127  ( &
128  'GWF', & ! component
129  'DIS', & ! subcomponent
130  'OPTIONS', & ! block
131  'FILEOUT', & ! tag name
132  'FILEOUT', & ! fortran variable
133  'KEYWORD', & ! type
134  '', & ! shape
135  'file keyword', & ! longname
136  .true., & ! required
137  .false., & ! developmode
138  .true., & ! multi-record
139  .false., & ! preserve case
140  .false., & ! layered
141  .false. & ! timeseries
142  )
143 
144  type(inputparamdefinitiontype), parameter :: &
145  gwfdis_grb6_filename = inputparamdefinitiontype &
146  ( &
147  'GWF', & ! component
148  'DIS', & ! subcomponent
149  'OPTIONS', & ! block
150  'GRB6_FILENAME', & ! tag name
151  'GRB6_FILENAME', & ! fortran variable
152  'STRING', & ! type
153  '', & ! shape
154  'file name of GRB information', & ! longname
155  .true., & ! required
156  .false., & ! developmode
157  .true., & ! multi-record
158  .true., & ! preserve case
159  .false., & ! layered
160  .false. & ! timeseries
161  )
162 
163  type(inputparamdefinitiontype), parameter :: &
164  gwfdis_xorigin = inputparamdefinitiontype &
165  ( &
166  'GWF', & ! component
167  'DIS', & ! subcomponent
168  'OPTIONS', & ! block
169  'XORIGIN', & ! tag name
170  'XORIGIN', & ! fortran variable
171  'DOUBLE', & ! type
172  '', & ! shape
173  'x-position of the model grid origin', & ! longname
174  .false., & ! required
175  .false., & ! developmode
176  .false., & ! multi-record
177  .false., & ! preserve case
178  .false., & ! layered
179  .false. & ! timeseries
180  )
181 
182  type(inputparamdefinitiontype), parameter :: &
183  gwfdis_yorigin = inputparamdefinitiontype &
184  ( &
185  'GWF', & ! component
186  'DIS', & ! subcomponent
187  'OPTIONS', & ! block
188  'YORIGIN', & ! tag name
189  'YORIGIN', & ! fortran variable
190  'DOUBLE', & ! type
191  '', & ! shape
192  'y-position of the model grid origin', & ! longname
193  .false., & ! required
194  .false., & ! developmode
195  .false., & ! multi-record
196  .false., & ! preserve case
197  .false., & ! layered
198  .false. & ! timeseries
199  )
200 
201  type(inputparamdefinitiontype), parameter :: &
202  gwfdis_angrot = inputparamdefinitiontype &
203  ( &
204  'GWF', & ! component
205  'DIS', & ! subcomponent
206  'OPTIONS', & ! block
207  'ANGROT', & ! tag name
208  'ANGROT', & ! fortran variable
209  'DOUBLE', & ! type
210  '', & ! shape
211  'rotation angle', & ! longname
212  .false., & ! required
213  .false., & ! developmode
214  .false., & ! multi-record
215  .false., & ! preserve case
216  .false., & ! layered
217  .false. & ! timeseries
218  )
219 
220  type(inputparamdefinitiontype), parameter :: &
221  gwfdis_export_ascii = inputparamdefinitiontype &
222  ( &
223  'GWF', & ! component
224  'DIS', & ! subcomponent
225  'OPTIONS', & ! block
226  'EXPORT_ARRAY_ASCII', & ! tag name
227  'EXPORT_ASCII', & ! fortran variable
228  'KEYWORD', & ! type
229  '', & ! shape
230  'export array variables to layered ascii files.', & ! longname
231  .false., & ! required
232  .false., & ! developmode
233  .false., & ! multi-record
234  .false., & ! preserve case
235  .false., & ! layered
236  .false. & ! timeseries
237  )
238 
239  type(inputparamdefinitiontype), parameter :: &
240  gwfdis_export_nc = inputparamdefinitiontype &
241  ( &
242  'GWF', & ! component
243  'DIS', & ! subcomponent
244  'OPTIONS', & ! block
245  'EXPORT_ARRAY_NETCDF', & ! tag name
246  'EXPORT_NC', & ! fortran variable
247  'KEYWORD', & ! type
248  '', & ! shape
249  'export array variables to netcdf output files.', & ! longname
250  .false., & ! required
251  .false., & ! developmode
252  .false., & ! multi-record
253  .false., & ! preserve case
254  .false., & ! layered
255  .false. & ! timeseries
256  )
257 
258  type(inputparamdefinitiontype), parameter :: &
259  gwfdis_crs = inputparamdefinitiontype &
260  ( &
261  'GWF', & ! component
262  'DIS', & ! subcomponent
263  'OPTIONS', & ! block
264  'CRS', & ! tag name
265  'CRS', & ! fortran variable
266  'STRING', & ! type
267  'LENBIGLINE', & ! shape
268  'CRS user input string', & ! longname
269  .false., & ! required
270  .true., & ! developmode
271  .false., & ! multi-record
272  .true., & ! preserve case
273  .false., & ! layered
274  .false. & ! timeseries
275  )
276 
277  type(inputparamdefinitiontype), parameter :: &
278  gwfdis_ncf_filerecord = inputparamdefinitiontype &
279  ( &
280  'GWF', & ! component
281  'DIS', & ! subcomponent
282  'OPTIONS', & ! block
283  'NCF_FILERECORD', & ! tag name
284  'NCF_FILERECORD', & ! fortran variable
285  'RECORD NCF6 FILEIN NCF6_FILENAME', & ! type
286  '', & ! shape
287  '', & ! longname
288  .false., & ! required
289  .false., & ! developmode
290  .false., & ! multi-record
291  .false., & ! preserve case
292  .false., & ! layered
293  .false. & ! timeseries
294  )
295 
296  type(inputparamdefinitiontype), parameter :: &
297  gwfdis_ncf6 = inputparamdefinitiontype &
298  ( &
299  'GWF', & ! component
300  'DIS', & ! subcomponent
301  'OPTIONS', & ! block
302  'NCF6', & ! tag name
303  'NCF6', & ! fortran variable
304  'KEYWORD', & ! type
305  '', & ! shape
306  'ncf keyword', & ! longname
307  .true., & ! required
308  .false., & ! developmode
309  .true., & ! multi-record
310  .false., & ! preserve case
311  .false., & ! layered
312  .false. & ! timeseries
313  )
314 
315  type(inputparamdefinitiontype), parameter :: &
316  gwfdis_filein = inputparamdefinitiontype &
317  ( &
318  'GWF', & ! component
319  'DIS', & ! subcomponent
320  'OPTIONS', & ! block
321  'FILEIN', & ! tag name
322  'FILEIN', & ! fortran variable
323  'KEYWORD', & ! type
324  '', & ! shape
325  'file keyword', & ! longname
326  .true., & ! required
327  .false., & ! developmode
328  .true., & ! multi-record
329  .false., & ! preserve case
330  .false., & ! layered
331  .false. & ! timeseries
332  )
333 
334  type(inputparamdefinitiontype), parameter :: &
335  gwfdis_ncf6_filename = inputparamdefinitiontype &
336  ( &
337  'GWF', & ! component
338  'DIS', & ! subcomponent
339  'OPTIONS', & ! block
340  'NCF6_FILENAME', & ! tag name
341  'NCF6_FILENAME', & ! fortran variable
342  'STRING', & ! type
343  '', & ! shape
344  'file name of NCF information', & ! longname
345  .true., & ! required
346  .false., & ! developmode
347  .true., & ! multi-record
348  .true., & ! preserve case
349  .false., & ! layered
350  .false. & ! timeseries
351  )
352 
353  type(inputparamdefinitiontype), parameter :: &
354  gwfdis_nlay = inputparamdefinitiontype &
355  ( &
356  'GWF', & ! component
357  'DIS', & ! subcomponent
358  'DIMENSIONS', & ! block
359  'NLAY', & ! tag name
360  'NLAY', & ! fortran variable
361  'INTEGER', & ! type
362  '', & ! shape
363  'number of layers', & ! longname
364  .true., & ! required
365  .false., & ! developmode
366  .false., & ! multi-record
367  .false., & ! preserve case
368  .false., & ! layered
369  .false. & ! timeseries
370  )
371 
372  type(inputparamdefinitiontype), parameter :: &
373  gwfdis_nrow = inputparamdefinitiontype &
374  ( &
375  'GWF', & ! component
376  'DIS', & ! subcomponent
377  'DIMENSIONS', & ! block
378  'NROW', & ! tag name
379  'NROW', & ! fortran variable
380  'INTEGER', & ! type
381  '', & ! shape
382  'number of rows', & ! longname
383  .true., & ! required
384  .false., & ! developmode
385  .false., & ! multi-record
386  .false., & ! preserve case
387  .false., & ! layered
388  .false. & ! timeseries
389  )
390 
391  type(inputparamdefinitiontype), parameter :: &
392  gwfdis_ncol = inputparamdefinitiontype &
393  ( &
394  'GWF', & ! component
395  'DIS', & ! subcomponent
396  'DIMENSIONS', & ! block
397  'NCOL', & ! tag name
398  'NCOL', & ! fortran variable
399  'INTEGER', & ! type
400  '', & ! shape
401  'number of columns', & ! longname
402  .true., & ! required
403  .false., & ! developmode
404  .false., & ! multi-record
405  .false., & ! preserve case
406  .false., & ! layered
407  .false. & ! timeseries
408  )
409 
410  type(inputparamdefinitiontype), parameter :: &
411  gwfdis_delr = inputparamdefinitiontype &
412  ( &
413  'GWF', & ! component
414  'DIS', & ! subcomponent
415  'GRIDDATA', & ! block
416  'DELR', & ! tag name
417  'DELR', & ! fortran variable
418  'DOUBLE1D', & ! type
419  'NCOL', & ! shape
420  'spacing along a row', & ! longname
421  .true., & ! required
422  .false., & ! developmode
423  .false., & ! multi-record
424  .false., & ! preserve case
425  .false., & ! layered
426  .false. & ! timeseries
427  )
428 
429  type(inputparamdefinitiontype), parameter :: &
430  gwfdis_delc = inputparamdefinitiontype &
431  ( &
432  'GWF', & ! component
433  'DIS', & ! subcomponent
434  'GRIDDATA', & ! block
435  'DELC', & ! tag name
436  'DELC', & ! fortran variable
437  'DOUBLE1D', & ! type
438  'NROW', & ! shape
439  'spacing along a column', & ! longname
440  .true., & ! required
441  .false., & ! developmode
442  .false., & ! multi-record
443  .false., & ! preserve case
444  .false., & ! layered
445  .false. & ! timeseries
446  )
447 
448  type(inputparamdefinitiontype), parameter :: &
449  gwfdis_top = inputparamdefinitiontype &
450  ( &
451  'GWF', & ! component
452  'DIS', & ! subcomponent
453  'GRIDDATA', & ! block
454  'TOP', & ! tag name
455  'TOP', & ! fortran variable
456  'DOUBLE2D', & ! type
457  'NCOL NROW', & ! shape
458  'cell top elevation', & ! longname
459  .true., & ! required
460  .false., & ! developmode
461  .false., & ! multi-record
462  .false., & ! preserve case
463  .false., & ! layered
464  .false. & ! timeseries
465  )
466 
467  type(inputparamdefinitiontype), parameter :: &
468  gwfdis_botm = inputparamdefinitiontype &
469  ( &
470  'GWF', & ! component
471  'DIS', & ! subcomponent
472  'GRIDDATA', & ! block
473  'BOTM', & ! tag name
474  'BOTM', & ! fortran variable
475  'DOUBLE3D', & ! type
476  'NCOL NROW NLAY', & ! shape
477  'cell bottom elevation', & ! longname
478  .true., & ! required
479  .false., & ! developmode
480  .false., & ! multi-record
481  .false., & ! preserve case
482  .true., & ! layered
483  .false. & ! timeseries
484  )
485 
486  type(inputparamdefinitiontype), parameter :: &
487  gwfdis_idomain = inputparamdefinitiontype &
488  ( &
489  'GWF', & ! component
490  'DIS', & ! subcomponent
491  'GRIDDATA', & ! block
492  'IDOMAIN', & ! tag name
493  'IDOMAIN', & ! fortran variable
494  'INTEGER3D', & ! type
495  'NCOL NROW NLAY', & ! shape
496  'idomain existence array', & ! longname
497  .false., & ! required
498  .false., & ! developmode
499  .false., & ! multi-record
500  .false., & ! preserve case
501  .true., & ! layered
502  .false. & ! timeseries
503  )
504 
505  type(inputparamdefinitiontype), parameter :: &
506  gwf_dis_param_definitions(*) = &
507  [ &
508  gwfdis_length_units, &
509  gwfdis_nogrb, &
510  gwfdis_grb_filerecord, &
511  gwfdis_grb6, &
512  gwfdis_fileout, &
513  gwfdis_grb6_filename, &
514  gwfdis_xorigin, &
515  gwfdis_yorigin, &
516  gwfdis_angrot, &
517  gwfdis_export_ascii, &
518  gwfdis_export_nc, &
519  gwfdis_crs, &
520  gwfdis_ncf_filerecord, &
521  gwfdis_ncf6, &
522  gwfdis_filein, &
523  gwfdis_ncf6_filename, &
524  gwfdis_nlay, &
525  gwfdis_nrow, &
526  gwfdis_ncol, &
527  gwfdis_delr, &
528  gwfdis_delc, &
529  gwfdis_top, &
530  gwfdis_botm, &
531  gwfdis_idomain &
532  ]
533 
534  type(inputparamdefinitiontype), parameter :: &
535  gwf_dis_aggregate_definitions(*) = &
536  [ &
537  inputparamdefinitiontype &
538  ( &
539  '', & ! component
540  '', & ! subcomponent
541  '', & ! block
542  '', & ! tag name
543  '', & ! fortran variable
544  '', & ! type
545  '', & ! shape
546  '', & ! longname
547  .false., & ! required
548  .false., & ! developmode
549  .false., & ! multi-record
550  .false., & ! preserve case
551  .false., & ! layered
552  .false. & ! timeseries
553  ) &
554  ]
555 
556  type(inputblockdefinitiontype), parameter :: &
557  gwf_dis_block_definitions(*) = &
558  [ &
559  inputblockdefinitiontype( &
560  'OPTIONS', & ! blockname
561  .false., & ! required
562  .false., & ! aggregate
563  .false. & ! block_variable
564  ), &
565  inputblockdefinitiontype( &
566  'DIMENSIONS', & ! blockname
567  .true., & ! required
568  .false., & ! aggregate
569  .false. & ! block_variable
570  ), &
571  inputblockdefinitiontype( &
572  'GRIDDATA', & ! blockname
573  .true., & ! required
574  .false., & ! aggregate
575  .false. & ! block_variable
576  ) &
577  ]
578 
579 end module gwfdisinputmodule
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
gwfdisinputmodule::gwf_dis_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_dis_param_definitions
Definition: gwf-disidm.f90:505
gwfdisinputmodule::gwfdis_botm
type(inputparamdefinitiontype), parameter gwfdis_botm
Definition: gwf-disidm.f90:467
gwfdisinputmodule::gwfdis_top
type(inputparamdefinitiontype), parameter gwfdis_top
Definition: gwf-disidm.f90:448
gwfdisinputmodule::gwf_dis_multi_package
logical, public gwf_dis_multi_package
Definition: gwf-disidm.f90:41
gwfdisinputmodule::gwfdis_grb6
type(inputparamdefinitiontype), parameter gwfdis_grb6
Definition: gwf-disidm.f90:106
gwfdisinputmodule::gwfdis_filein
type(inputparamdefinitiontype), parameter gwfdis_filein
Definition: gwf-disidm.f90:315
gwfdisinputmodule::gwfdis_export_nc
type(inputparamdefinitiontype), parameter gwfdis_export_nc
Definition: gwf-disidm.f90:239
gwfdisinputmodule::gwf_dis_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public gwf_dis_block_definitions
Definition: gwf-disidm.f90:556
gwfdisinputmodule::gwfdis_fileout
type(inputparamdefinitiontype), parameter gwfdis_fileout
Definition: gwf-disidm.f90:125
gwfdisinputmodule::gwfdis_yorigin
type(inputparamdefinitiontype), parameter gwfdis_yorigin
Definition: gwf-disidm.f90:182
gwfdisinputmodule::gwfdis_nrow
type(inputparamdefinitiontype), parameter gwfdis_nrow
Definition: gwf-disidm.f90:372
gwfdisinputmodule::gwfdis_delc
type(inputparamdefinitiontype), parameter gwfdis_delc
Definition: gwf-disidm.f90:429
gwfdisinputmodule::gwfdis_delr
type(inputparamdefinitiontype), parameter gwfdis_delr
Definition: gwf-disidm.f90:410
gwfdisinputmodule::gwfdis_ncf_filerecord
type(inputparamdefinitiontype), parameter gwfdis_ncf_filerecord
Definition: gwf-disidm.f90:277
gwfdisinputmodule::gwf_dis_subpackages
character(len=16), dimension(*), parameter, public gwf_dis_subpackages
Definition: gwf-disidm.f90:43
gwfdisinputmodule::gwfdis_angrot
type(inputparamdefinitiontype), parameter gwfdis_angrot
Definition: gwf-disidm.f90:201
gwfdisinputmodule::gwfdis_length_units
type(inputparamdefinitiontype), parameter gwfdis_length_units
Definition: gwf-disidm.f90:49
gwfdisinputmodule::gwfdis_nogrb
type(inputparamdefinitiontype), parameter gwfdis_nogrb
Definition: gwf-disidm.f90:68
gwfdisinputmodule::gwfdis_ncf6_filename
type(inputparamdefinitiontype), parameter gwfdis_ncf6_filename
Definition: gwf-disidm.f90:334
gwfdisinputmodule::gwfdis_nlay
type(inputparamdefinitiontype), parameter gwfdis_nlay
Definition: gwf-disidm.f90:353
gwfdisinputmodule::gwfdis_export_ascii
type(inputparamdefinitiontype), parameter gwfdis_export_ascii
Definition: gwf-disidm.f90:220
gwfdisinputmodule::gwfdis_xorigin
type(inputparamdefinitiontype), parameter gwfdis_xorigin
Definition: gwf-disidm.f90:163
gwfdisinputmodule::gwfdis_grb_filerecord
type(inputparamdefinitiontype), parameter gwfdis_grb_filerecord
Definition: gwf-disidm.f90:87
gwfdisinputmodule::gwfdis_crs
type(inputparamdefinitiontype), parameter gwfdis_crs
Definition: gwf-disidm.f90:258
gwfdisinputmodule::gwfdis_ncf6
type(inputparamdefinitiontype), parameter gwfdis_ncf6
Definition: gwf-disidm.f90:296
gwfdisinputmodule::gwfdis_idomain
type(inputparamdefinitiontype), parameter gwfdis_idomain
Definition: gwf-disidm.f90:486
gwfdisinputmodule::gwf_dis_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_dis_aggregate_definitions
Definition: gwf-disidm.f90:534
gwfdisinputmodule::gwfdis_ncol
type(inputparamdefinitiontype), parameter gwfdis_ncol
Definition: gwf-disidm.f90:391
gwfdisinputmodule::gwfdis_grb6_filename
type(inputparamdefinitiontype), parameter gwfdis_grb6_filename
Definition: gwf-disidm.f90:144
inputdefinitionmodule
This module contains the InputDefinitionModule.
Definition: InputDefinition.f90:7