MODFLOW 6  version 6.7.0.dev3
USGS Modular Hydrologic Model
olf-disv2didm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
3  use constantsmodule, only: lenvarname
6  private
13 
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 :: crs = .false.
26  logical :: nodes = .false.
27  logical :: nvert = .false.
28  logical :: bottom = .false.
29  logical :: idomain = .false.
30  logical :: iv = .false.
31  logical :: xv = .false.
32  logical :: yv = .false.
33  logical :: icell2d = .false.
34  logical :: xc = .false.
35  logical :: yc = .false.
36  logical :: ncvert = .false.
37  logical :: icvert = .false.
39 
40  logical :: olf_disv2d_multi_package = .false.
41 
42  character(len=16), parameter :: &
44  [ &
45  ' ' &
46  ]
47 
48  type(inputparamdefinitiontype), parameter :: &
50  ( &
51  'OLF', & ! component
52  'DISV2D', & ! subcomponent
53  'OPTIONS', & ! block
54  'LENGTH_UNITS', & ! tag name
55  'LENGTH_UNITS', & ! fortran variable
56  'STRING', & ! type
57  '', & ! shape
58  'model length units', & ! longname
59  .false., & ! required
60  .false., & ! prerelease
61  .false., & ! multi-record
62  .false., & ! preserve case
63  .false., & ! layered
64  .false. & ! timeseries
65  )
66 
67  type(inputparamdefinitiontype), parameter :: &
69  ( &
70  'OLF', & ! component
71  'DISV2D', & ! subcomponent
72  'OPTIONS', & ! block
73  'NOGRB', & ! tag name
74  'NOGRB', & ! fortran variable
75  'KEYWORD', & ! type
76  '', & ! shape
77  'do not write binary grid file', & ! longname
78  .false., & ! required
79  .false., & ! prerelease
80  .false., & ! multi-record
81  .false., & ! preserve case
82  .false., & ! layered
83  .false. & ! timeseries
84  )
85 
86  type(inputparamdefinitiontype), parameter :: &
88  ( &
89  'OLF', & ! component
90  'DISV2D', & ! subcomponent
91  'OPTIONS', & ! block
92  'GRB_FILERECORD', & ! tag name
93  'GRB_FILERECORD', & ! fortran variable
94  'RECORD GRB6 FILEOUT GRB6_FILENAME', & ! type
95  '', & ! shape
96  '', & ! longname
97  .false., & ! required
98  .false., & ! prerelease
99  .false., & ! multi-record
100  .false., & ! preserve case
101  .false., & ! layered
102  .false. & ! timeseries
103  )
104 
105  type(inputparamdefinitiontype), parameter :: &
107  ( &
108  'OLF', & ! component
109  'DISV2D', & ! subcomponent
110  'OPTIONS', & ! block
111  'GRB6', & ! tag name
112  'GRB6', & ! fortran variable
113  'KEYWORD', & ! type
114  '', & ! shape
115  'grb keyword', & ! longname
116  .true., & ! required
117  .false., & ! prerelease
118  .true., & ! multi-record
119  .false., & ! preserve case
120  .false., & ! layered
121  .false. & ! timeseries
122  )
123 
124  type(inputparamdefinitiontype), parameter :: &
126  ( &
127  'OLF', & ! component
128  'DISV2D', & ! subcomponent
129  'OPTIONS', & ! block
130  'FILEOUT', & ! tag name
131  'FILEOUT', & ! fortran variable
132  'KEYWORD', & ! type
133  '', & ! shape
134  'file keyword', & ! longname
135  .true., & ! required
136  .false., & ! prerelease
137  .true., & ! multi-record
138  .false., & ! preserve case
139  .false., & ! layered
140  .false. & ! timeseries
141  )
142 
143  type(inputparamdefinitiontype), parameter :: &
145  ( &
146  'OLF', & ! component
147  'DISV2D', & ! subcomponent
148  'OPTIONS', & ! block
149  'GRB6_FILENAME', & ! tag name
150  'GRB6_FILENAME', & ! fortran variable
151  'STRING', & ! type
152  '', & ! shape
153  'file name of GRB information', & ! longname
154  .true., & ! required
155  .false., & ! prerelease
156  .true., & ! multi-record
157  .true., & ! preserve case
158  .false., & ! layered
159  .false. & ! timeseries
160  )
161 
162  type(inputparamdefinitiontype), parameter :: &
164  ( &
165  'OLF', & ! component
166  'DISV2D', & ! subcomponent
167  'OPTIONS', & ! block
168  'XORIGIN', & ! tag name
169  'XORIGIN', & ! fortran variable
170  'DOUBLE', & ! type
171  '', & ! shape
172  'x-position of the model grid origin', & ! longname
173  .false., & ! required
174  .false., & ! prerelease
175  .false., & ! multi-record
176  .false., & ! preserve case
177  .false., & ! layered
178  .false. & ! timeseries
179  )
180 
181  type(inputparamdefinitiontype), parameter :: &
183  ( &
184  'OLF', & ! component
185  'DISV2D', & ! subcomponent
186  'OPTIONS', & ! block
187  'YORIGIN', & ! tag name
188  'YORIGIN', & ! fortran variable
189  'DOUBLE', & ! type
190  '', & ! shape
191  'y-position of the model grid origin', & ! longname
192  .false., & ! required
193  .false., & ! prerelease
194  .false., & ! multi-record
195  .false., & ! preserve case
196  .false., & ! layered
197  .false. & ! timeseries
198  )
199 
200  type(inputparamdefinitiontype), parameter :: &
202  ( &
203  'OLF', & ! component
204  'DISV2D', & ! subcomponent
205  'OPTIONS', & ! block
206  'ANGROT', & ! tag name
207  'ANGROT', & ! fortran variable
208  'DOUBLE', & ! type
209  '', & ! shape
210  'rotation angle', & ! longname
211  .false., & ! required
212  .false., & ! prerelease
213  .false., & ! multi-record
214  .false., & ! preserve case
215  .false., & ! layered
216  .false. & ! timeseries
217  )
218 
219  type(inputparamdefinitiontype), parameter :: &
221  ( &
222  'OLF', & ! component
223  'DISV2D', & ! subcomponent
224  'OPTIONS', & ! block
225  'EXPORT_ARRAY_ASCII', & ! tag name
226  'EXPORT_ASCII', & ! fortran variable
227  'KEYWORD', & ! type
228  '', & ! shape
229  'export array variables to layered ascii files.', & ! longname
230  .false., & ! required
231  .false., & ! prerelease
232  .false., & ! multi-record
233  .false., & ! preserve case
234  .false., & ! layered
235  .false. & ! timeseries
236  )
237 
238  type(inputparamdefinitiontype), parameter :: &
240  ( &
241  'OLF', & ! component
242  'DISV2D', & ! subcomponent
243  'OPTIONS', & ! block
244  'CRS', & ! tag name
245  'CRS', & ! fortran variable
246  'STRING', & ! type
247  'LENBIGLINE', & ! shape
248  'CRS user input string', & ! longname
249  .false., & ! required
250  .true., & ! prerelease
251  .false., & ! multi-record
252  .true., & ! preserve case
253  .false., & ! layered
254  .false. & ! timeseries
255  )
256 
257  type(inputparamdefinitiontype), parameter :: &
259  ( &
260  'OLF', & ! component
261  'DISV2D', & ! subcomponent
262  'DIMENSIONS', & ! block
263  'NODES', & ! tag name
264  'NODES', & ! fortran variable
265  'INTEGER', & ! type
266  '', & ! shape
267  'number of cells per layer', & ! longname
268  .true., & ! required
269  .false., & ! prerelease
270  .false., & ! multi-record
271  .false., & ! preserve case
272  .false., & ! layered
273  .false. & ! timeseries
274  )
275 
276  type(inputparamdefinitiontype), parameter :: &
278  ( &
279  'OLF', & ! component
280  'DISV2D', & ! subcomponent
281  'DIMENSIONS', & ! block
282  'NVERT', & ! tag name
283  'NVERT', & ! fortran variable
284  'INTEGER', & ! type
285  '', & ! shape
286  'number of columns', & ! longname
287  .true., & ! required
288  .false., & ! prerelease
289  .false., & ! multi-record
290  .false., & ! preserve case
291  .false., & ! layered
292  .false. & ! timeseries
293  )
294 
295  type(inputparamdefinitiontype), parameter :: &
297  ( &
298  'OLF', & ! component
299  'DISV2D', & ! subcomponent
300  'GRIDDATA', & ! block
301  'BOTTOM', & ! tag name
302  'BOTTOM', & ! fortran variable
303  'DOUBLE1D', & ! type
304  'NODES', & ! shape
305  'model bottom elevation', & ! longname
306  .true., & ! required
307  .false., & ! prerelease
308  .false., & ! multi-record
309  .false., & ! preserve case
310  .false., & ! layered
311  .false. & ! timeseries
312  )
313 
314  type(inputparamdefinitiontype), parameter :: &
316  ( &
317  'OLF', & ! component
318  'DISV2D', & ! subcomponent
319  'GRIDDATA', & ! block
320  'IDOMAIN', & ! tag name
321  'IDOMAIN', & ! fortran variable
322  'INTEGER1D', & ! type
323  'NODES', & ! shape
324  'idomain existence array', & ! longname
325  .false., & ! required
326  .false., & ! prerelease
327  .false., & ! multi-record
328  .false., & ! preserve case
329  .false., & ! layered
330  .false. & ! timeseries
331  )
332 
333  type(inputparamdefinitiontype), parameter :: &
335  ( &
336  'OLF', & ! component
337  'DISV2D', & ! subcomponent
338  'VERTICES', & ! block
339  'IV', & ! tag name
340  'IV', & ! fortran variable
341  'INTEGER', & ! type
342  '', & ! shape
343  'vertex number', & ! longname
344  .true., & ! required
345  .false., & ! prerelease
346  .true., & ! multi-record
347  .false., & ! preserve case
348  .false., & ! layered
349  .false. & ! timeseries
350  )
351 
352  type(inputparamdefinitiontype), parameter :: &
354  ( &
355  'OLF', & ! component
356  'DISV2D', & ! subcomponent
357  'VERTICES', & ! block
358  'XV', & ! tag name
359  'XV', & ! fortran variable
360  'DOUBLE', & ! type
361  '', & ! shape
362  'x-coordinate for vertex', & ! longname
363  .true., & ! required
364  .false., & ! prerelease
365  .true., & ! multi-record
366  .false., & ! preserve case
367  .false., & ! layered
368  .false. & ! timeseries
369  )
370 
371  type(inputparamdefinitiontype), parameter :: &
373  ( &
374  'OLF', & ! component
375  'DISV2D', & ! subcomponent
376  'VERTICES', & ! block
377  'YV', & ! tag name
378  'YV', & ! fortran variable
379  'DOUBLE', & ! type
380  '', & ! shape
381  'y-coordinate for vertex', & ! longname
382  .true., & ! required
383  .false., & ! prerelease
384  .true., & ! multi-record
385  .false., & ! preserve case
386  .false., & ! layered
387  .false. & ! timeseries
388  )
389 
390  type(inputparamdefinitiontype), parameter :: &
392  ( &
393  'OLF', & ! component
394  'DISV2D', & ! subcomponent
395  'CELL2D', & ! block
396  'ICELL2D', & ! tag name
397  'ICELL2D', & ! fortran variable
398  'INTEGER', & ! type
399  '', & ! shape
400  'cell2d number', & ! longname
401  .true., & ! required
402  .false., & ! prerelease
403  .true., & ! multi-record
404  .false., & ! preserve case
405  .false., & ! layered
406  .false. & ! timeseries
407  )
408 
409  type(inputparamdefinitiontype), parameter :: &
411  ( &
412  'OLF', & ! component
413  'DISV2D', & ! subcomponent
414  'CELL2D', & ! block
415  'XC', & ! tag name
416  'XC', & ! fortran variable
417  'DOUBLE', & ! type
418  '', & ! shape
419  'x-coordinate for cell center', & ! longname
420  .true., & ! required
421  .false., & ! prerelease
422  .true., & ! multi-record
423  .false., & ! preserve case
424  .false., & ! layered
425  .false. & ! timeseries
426  )
427 
428  type(inputparamdefinitiontype), parameter :: &
430  ( &
431  'OLF', & ! component
432  'DISV2D', & ! subcomponent
433  'CELL2D', & ! block
434  'YC', & ! tag name
435  'YC', & ! fortran variable
436  'DOUBLE', & ! type
437  '', & ! shape
438  'y-coordinate for cell center', & ! longname
439  .true., & ! required
440  .false., & ! prerelease
441  .true., & ! multi-record
442  .false., & ! preserve case
443  .false., & ! layered
444  .false. & ! timeseries
445  )
446 
447  type(inputparamdefinitiontype), parameter :: &
449  ( &
450  'OLF', & ! component
451  'DISV2D', & ! subcomponent
452  'CELL2D', & ! block
453  'NCVERT', & ! tag name
454  'NCVERT', & ! fortran variable
455  'INTEGER', & ! type
456  '', & ! shape
457  'number of cell vertices', & ! longname
458  .true., & ! required
459  .false., & ! prerelease
460  .true., & ! multi-record
461  .false., & ! preserve case
462  .false., & ! layered
463  .false. & ! timeseries
464  )
465 
466  type(inputparamdefinitiontype), parameter :: &
468  ( &
469  'OLF', & ! component
470  'DISV2D', & ! subcomponent
471  'CELL2D', & ! block
472  'ICVERT', & ! tag name
473  'ICVERT', & ! fortran variable
474  'INTEGER1D', & ! type
475  'NCVERT', & ! shape
476  'array of vertex numbers', & ! longname
477  .true., & ! required
478  .false., & ! prerelease
479  .true., & ! multi-record
480  .false., & ! preserve case
481  .false., & ! layered
482  .false. & ! timeseries
483  )
484 
485  type(inputparamdefinitiontype), parameter :: &
487  [ &
489  olfdisv2d_nogrb, &
491  olfdisv2d_grb6, &
498  olfdisv2d_crs, &
499  olfdisv2d_nodes, &
500  olfdisv2d_nvert, &
503  olfdisv2d_iv, &
504  olfdisv2d_xv, &
505  olfdisv2d_yv, &
507  olfdisv2d_xc, &
508  olfdisv2d_yc, &
511  ]
512 
513  type(inputparamdefinitiontype), parameter :: &
515  ( &
516  'OLF', & ! component
517  'DISV2D', & ! subcomponent
518  'VERTICES', & ! block
519  'VERTICES', & ! tag name
520  'VERTICES', & ! fortran variable
521  'RECARRAY IV XV YV', & ! type
522  'NVERT', & ! shape
523  'vertices data', & ! longname
524  .true., & ! required
525  .false., & ! prerelease
526  .false., & ! multi-record
527  .false., & ! preserve case
528  .false., & ! layered
529  .false. & ! timeseries
530  )
531 
532  type(inputparamdefinitiontype), parameter :: &
534  ( &
535  'OLF', & ! component
536  'DISV2D', & ! subcomponent
537  'CELL2D', & ! block
538  'CELL2D', & ! tag name
539  'CELL2D', & ! fortran variable
540  'RECARRAY ICELL2D XC YC NCVERT ICVERT', & ! type
541  'NODES', & ! shape
542  'cell2d data', & ! longname
543  .true., & ! required
544  .false., & ! prerelease
545  .false., & ! multi-record
546  .false., & ! preserve case
547  .false., & ! layered
548  .false. & ! timeseries
549  )
550 
551  type(inputparamdefinitiontype), parameter :: &
553  [ &
556  ]
557 
558  type(inputblockdefinitiontype), parameter :: &
560  [ &
562  'OPTIONS', & ! blockname
563  .false., & ! required
564  .false., & ! aggregate
565  .false. & ! block_variable
566  ), &
568  'DIMENSIONS', & ! blockname
569  .true., & ! required
570  .false., & ! aggregate
571  .false. & ! block_variable
572  ), &
574  'GRIDDATA', & ! blockname
575  .true., & ! required
576  .false., & ! aggregate
577  .false. & ! block_variable
578  ), &
580  'VERTICES', & ! blockname
581  .true., & ! required
582  .true., & ! aggregate
583  .false. & ! block_variable
584  ), &
586  'CELL2D', & ! blockname
587  .true., & ! required
588  .true., & ! aggregate
589  .false. & ! block_variable
590  ) &
591  ]
592 
593 end module olfdisv2dinputmodule
This module contains simulation constants.
Definition: Constants.f90:9
integer(i4b), parameter lenvarname
maximum length of a variable name
Definition: Constants.f90:17
This module contains the InputDefinitionModule.
type(inputparamdefinitiontype), parameter olfdisv2d_angrot
type(inputparamdefinitiontype), parameter olfdisv2d_ncvert
type(inputparamdefinitiontype), dimension(*), parameter, public olf_disv2d_param_definitions
type(inputparamdefinitiontype), parameter olfdisv2d_length_units
type(inputparamdefinitiontype), parameter olfdisv2d_yc
type(inputparamdefinitiontype), parameter olfdisv2d_grb6_filename
logical, public olf_disv2d_multi_package
type(inputparamdefinitiontype), parameter olfdisv2d_nodes
type(inputparamdefinitiontype), parameter olfdisv2d_grb_filerecord
type(inputblockdefinitiontype), dimension(*), parameter, public olf_disv2d_block_definitions
type(inputparamdefinitiontype), parameter olfdisv2d_xv
type(inputparamdefinitiontype), parameter olfdisv2d_nogrb
character(len=16), dimension(*), parameter, public olf_disv2d_subpackages
type(inputparamdefinitiontype), parameter olfdisv2d_icell2d
type(inputparamdefinitiontype), parameter olfdisv2d_nvert
type(inputparamdefinitiontype), parameter olfdisv2d_xc
type(inputparamdefinitiontype), parameter olfdisv2d_yorigin
type(inputparamdefinitiontype), parameter olfdisv2d_idomain
type(inputparamdefinitiontype), parameter olfdisv2d_grb6
type(inputparamdefinitiontype), dimension(*), parameter, public olf_disv2d_aggregate_definitions
type(inputparamdefinitiontype), parameter olfdisv2d_iv
type(inputparamdefinitiontype), parameter olfdisv2d_crs
type(inputparamdefinitiontype), parameter olfdisv2d_vertices
type(inputparamdefinitiontype), parameter olfdisv2d_yv
type(inputparamdefinitiontype), parameter olfdisv2d_cell2d
type(inputparamdefinitiontype), parameter olfdisv2d_bottom
type(inputparamdefinitiontype), parameter olfdisv2d_fileout
type(inputparamdefinitiontype), parameter olfdisv2d_icvert
type(inputparamdefinitiontype), parameter olfdisv2d_export_ascii
type(inputparamdefinitiontype), parameter olfdisv2d_xorigin