MODFLOW 6  version 6.9.0.dev0
USGS Modular Hydrologic Model
prt-disvidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
3  use constantsmodule, only: lenvarname
6  private
14 
16  logical :: length_units = .false.
17  logical :: nogrb = .false.
18  logical :: grb_filerecord = .false.
19  logical :: grb6 = .false.
20  logical :: fileout = .false.
21  logical :: grb6_filename = .false.
22  logical :: xorigin = .false.
23  logical :: yorigin = .false.
24  logical :: angrot = .false.
25  logical :: export_ascii = .false.
26  logical :: export_nc = .false.
27  logical :: crs = .false.
28  logical :: ncf_filerecord = .false.
29  logical :: ncf6 = .false.
30  logical :: filein = .false.
31  logical :: ncf6_filename = .false.
32  logical :: nlay = .false.
33  logical :: ncpl = .false.
34  logical :: nvert = .false.
35  logical :: top = .false.
36  logical :: botm = .false.
37  logical :: idomain = .false.
38  logical :: iv = .false.
39  logical :: xv = .false.
40  logical :: yv = .false.
41  logical :: icell2d = .false.
42  logical :: xc = .false.
43  logical :: yc = .false.
44  logical :: ncvert = .false.
45  logical :: icvert = .false.
46  end type prtdisvparamfoundtype
47 
48  logical :: prt_disv_multi_package = .false.
49  logical :: prt_disv_is_advanced = .false.
50 
51  character(len=16), parameter :: &
53  [ &
54  ' ' &
55  ]
56 
57  type(inputparamdefinitiontype), parameter :: &
59  ( &
60  'PRT', & ! component
61  'DISV', & ! subcomponent
62  'OPTIONS', & ! block
63  'LENGTH_UNITS', & ! tag name
64  'LENGTH_UNITS', & ! fortran variable
65  'STRING', & ! type
66  '', & ! shape
67  'model length units', & ! longname
68  .false., & ! required
69  .false., & ! developmode
70  .false., & ! multi-record
71  .false., & ! preserve case
72  .false., & ! layered
73  .false. & ! timeseries
74  )
75 
76  type(inputparamdefinitiontype), parameter :: &
78  ( &
79  'PRT', & ! component
80  'DISV', & ! subcomponent
81  'OPTIONS', & ! block
82  'NOGRB', & ! tag name
83  'NOGRB', & ! fortran variable
84  'KEYWORD', & ! type
85  '', & ! shape
86  'do not write binary grid file', & ! longname
87  .false., & ! required
88  .false., & ! developmode
89  .false., & ! multi-record
90  .false., & ! preserve case
91  .false., & ! layered
92  .false. & ! timeseries
93  )
94 
95  type(inputparamdefinitiontype), parameter :: &
97  ( &
98  'PRT', & ! component
99  'DISV', & ! subcomponent
100  'OPTIONS', & ! block
101  'GRB_FILERECORD', & ! tag name
102  'GRB_FILERECORD', & ! fortran variable
103  'RECORD GRB6 FILEOUT GRB6_FILENAME', & ! type
104  '', & ! shape
105  '', & ! longname
106  .false., & ! required
107  .false., & ! developmode
108  .false., & ! multi-record
109  .false., & ! preserve case
110  .false., & ! layered
111  .false. & ! timeseries
112  )
113 
114  type(inputparamdefinitiontype), parameter :: &
116  ( &
117  'PRT', & ! component
118  'DISV', & ! subcomponent
119  'OPTIONS', & ! block
120  'GRB6', & ! tag name
121  'GRB6', & ! fortran variable
122  'KEYWORD', & ! type
123  '', & ! shape
124  'grb keyword', & ! longname
125  .true., & ! required
126  .false., & ! developmode
127  .true., & ! multi-record
128  .false., & ! preserve case
129  .false., & ! layered
130  .false. & ! timeseries
131  )
132 
133  type(inputparamdefinitiontype), parameter :: &
135  ( &
136  'PRT', & ! component
137  'DISV', & ! subcomponent
138  'OPTIONS', & ! block
139  'FILEOUT', & ! tag name
140  'FILEOUT', & ! fortran variable
141  'KEYWORD', & ! type
142  '', & ! shape
143  'file keyword', & ! longname
144  .true., & ! required
145  .false., & ! developmode
146  .true., & ! multi-record
147  .false., & ! preserve case
148  .false., & ! layered
149  .false. & ! timeseries
150  )
151 
152  type(inputparamdefinitiontype), parameter :: &
154  ( &
155  'PRT', & ! component
156  'DISV', & ! subcomponent
157  'OPTIONS', & ! block
158  'GRB6_FILENAME', & ! tag name
159  'GRB6_FILENAME', & ! fortran variable
160  'STRING', & ! type
161  '', & ! shape
162  'file name of GRB information', & ! longname
163  .true., & ! required
164  .false., & ! developmode
165  .true., & ! multi-record
166  .true., & ! preserve case
167  .false., & ! layered
168  .false. & ! timeseries
169  )
170 
171  type(inputparamdefinitiontype), parameter :: &
173  ( &
174  'PRT', & ! component
175  'DISV', & ! subcomponent
176  'OPTIONS', & ! block
177  'XORIGIN', & ! tag name
178  'XORIGIN', & ! fortran variable
179  'DOUBLE', & ! type
180  '', & ! shape
181  'x-position origin of the model grid coordinate system', & ! longname
182  .false., & ! required
183  .false., & ! developmode
184  .false., & ! multi-record
185  .false., & ! preserve case
186  .false., & ! layered
187  .false. & ! timeseries
188  )
189 
190  type(inputparamdefinitiontype), parameter :: &
192  ( &
193  'PRT', & ! component
194  'DISV', & ! subcomponent
195  'OPTIONS', & ! block
196  'YORIGIN', & ! tag name
197  'YORIGIN', & ! fortran variable
198  'DOUBLE', & ! type
199  '', & ! shape
200  'y-position origin of the model grid coordinate system', & ! longname
201  .false., & ! required
202  .false., & ! developmode
203  .false., & ! multi-record
204  .false., & ! preserve case
205  .false., & ! layered
206  .false. & ! timeseries
207  )
208 
209  type(inputparamdefinitiontype), parameter :: &
211  ( &
212  'PRT', & ! component
213  'DISV', & ! subcomponent
214  'OPTIONS', & ! block
215  'ANGROT', & ! tag name
216  'ANGROT', & ! fortran variable
217  'DOUBLE', & ! type
218  '', & ! shape
219  'rotation angle', & ! longname
220  .false., & ! required
221  .false., & ! developmode
222  .false., & ! multi-record
223  .false., & ! preserve case
224  .false., & ! layered
225  .false. & ! timeseries
226  )
227 
228  type(inputparamdefinitiontype), parameter :: &
230  ( &
231  'PRT', & ! component
232  'DISV', & ! subcomponent
233  'OPTIONS', & ! block
234  'EXPORT_ARRAY_ASCII', & ! tag name
235  'EXPORT_ASCII', & ! fortran variable
236  'KEYWORD', & ! type
237  '', & ! shape
238  'export array variables to layered ascii files.', & ! longname
239  .false., & ! required
240  .false., & ! developmode
241  .false., & ! multi-record
242  .false., & ! preserve case
243  .false., & ! layered
244  .false. & ! timeseries
245  )
246 
247  type(inputparamdefinitiontype), parameter :: &
249  ( &
250  'PRT', & ! component
251  'DISV', & ! subcomponent
252  'OPTIONS', & ! block
253  'EXPORT_ARRAY_NETCDF', & ! tag name
254  'EXPORT_NC', & ! fortran variable
255  'KEYWORD', & ! type
256  '', & ! shape
257  'export array variables to netcdf output files.', & ! longname
258  .false., & ! required
259  .false., & ! developmode
260  .false., & ! multi-record
261  .false., & ! preserve case
262  .false., & ! layered
263  .false. & ! timeseries
264  )
265 
266  type(inputparamdefinitiontype), parameter :: &
268  ( &
269  'PRT', & ! component
270  'DISV', & ! subcomponent
271  'OPTIONS', & ! block
272  'CRS', & ! tag name
273  'CRS', & ! fortran variable
274  'STRING', & ! type
275  'LENBIGLINE', & ! shape
276  'CRS user input string', & ! longname
277  .false., & ! required
278  .false., & ! developmode
279  .false., & ! multi-record
280  .true., & ! preserve case
281  .false., & ! layered
282  .false. & ! timeseries
283  )
284 
285  type(inputparamdefinitiontype), parameter :: &
287  ( &
288  'PRT', & ! component
289  'DISV', & ! subcomponent
290  'OPTIONS', & ! block
291  'NCF_FILERECORD', & ! tag name
292  'NCF_FILERECORD', & ! fortran variable
293  'RECORD NCF6 FILEIN NCF6_FILENAME', & ! type
294  '', & ! shape
295  '', & ! longname
296  .false., & ! required
297  .false., & ! developmode
298  .false., & ! multi-record
299  .false., & ! preserve case
300  .false., & ! layered
301  .false. & ! timeseries
302  )
303 
304  type(inputparamdefinitiontype), parameter :: &
306  ( &
307  'PRT', & ! component
308  'DISV', & ! subcomponent
309  'OPTIONS', & ! block
310  'NCF6', & ! tag name
311  'NCF6', & ! fortran variable
312  'KEYWORD', & ! type
313  '', & ! shape
314  'ncf keyword', & ! longname
315  .true., & ! required
316  .false., & ! developmode
317  .true., & ! multi-record
318  .false., & ! preserve case
319  .false., & ! layered
320  .false. & ! timeseries
321  )
322 
323  type(inputparamdefinitiontype), parameter :: &
325  ( &
326  'PRT', & ! component
327  'DISV', & ! subcomponent
328  'OPTIONS', & ! block
329  'FILEIN', & ! tag name
330  'FILEIN', & ! fortran variable
331  'KEYWORD', & ! type
332  '', & ! shape
333  'file keyword', & ! longname
334  .true., & ! required
335  .false., & ! developmode
336  .true., & ! multi-record
337  .false., & ! preserve case
338  .false., & ! layered
339  .false. & ! timeseries
340  )
341 
342  type(inputparamdefinitiontype), parameter :: &
344  ( &
345  'PRT', & ! component
346  'DISV', & ! subcomponent
347  'OPTIONS', & ! block
348  'NCF6_FILENAME', & ! tag name
349  'NCF6_FILENAME', & ! fortran variable
350  'STRING', & ! type
351  '', & ! shape
352  'file name of NCF information', & ! longname
353  .true., & ! required
354  .false., & ! developmode
355  .true., & ! multi-record
356  .true., & ! preserve case
357  .false., & ! layered
358  .false. & ! timeseries
359  )
360 
361  type(inputparamdefinitiontype), parameter :: &
363  ( &
364  'PRT', & ! component
365  'DISV', & ! subcomponent
366  'DIMENSIONS', & ! block
367  'NLAY', & ! tag name
368  'NLAY', & ! fortran variable
369  'INTEGER', & ! type
370  '', & ! shape
371  'number of layers', & ! longname
372  .true., & ! required
373  .false., & ! developmode
374  .false., & ! multi-record
375  .false., & ! preserve case
376  .false., & ! layered
377  .false. & ! timeseries
378  )
379 
380  type(inputparamdefinitiontype), parameter :: &
382  ( &
383  'PRT', & ! component
384  'DISV', & ! subcomponent
385  'DIMENSIONS', & ! block
386  'NCPL', & ! tag name
387  'NCPL', & ! fortran variable
388  'INTEGER', & ! type
389  '', & ! shape
390  'number of cells per layer', & ! longname
391  .true., & ! required
392  .false., & ! developmode
393  .false., & ! multi-record
394  .false., & ! preserve case
395  .false., & ! layered
396  .false. & ! timeseries
397  )
398 
399  type(inputparamdefinitiontype), parameter :: &
401  ( &
402  'PRT', & ! component
403  'DISV', & ! subcomponent
404  'DIMENSIONS', & ! block
405  'NVERT', & ! tag name
406  'NVERT', & ! fortran variable
407  'INTEGER', & ! type
408  '', & ! shape
409  'number of columns', & ! longname
410  .true., & ! required
411  .false., & ! developmode
412  .false., & ! multi-record
413  .false., & ! preserve case
414  .false., & ! layered
415  .false. & ! timeseries
416  )
417 
418  type(inputparamdefinitiontype), parameter :: &
420  ( &
421  'PRT', & ! component
422  'DISV', & ! subcomponent
423  'GRIDDATA', & ! block
424  'TOP', & ! tag name
425  'TOP', & ! fortran variable
426  'DOUBLE1D', & ! type
427  'NCPL', & ! shape
428  'model top elevation', & ! longname
429  .true., & ! required
430  .false., & ! developmode
431  .false., & ! multi-record
432  .false., & ! preserve case
433  .false., & ! layered
434  .false. & ! timeseries
435  )
436 
437  type(inputparamdefinitiontype), parameter :: &
439  ( &
440  'PRT', & ! component
441  'DISV', & ! subcomponent
442  'GRIDDATA', & ! block
443  'BOTM', & ! tag name
444  'BOTM', & ! fortran variable
445  'DOUBLE2D', & ! type
446  'NCPL NLAY', & ! shape
447  'model bottom elevation', & ! longname
448  .true., & ! required
449  .false., & ! developmode
450  .false., & ! multi-record
451  .false., & ! preserve case
452  .true., & ! layered
453  .false. & ! timeseries
454  )
455 
456  type(inputparamdefinitiontype), parameter :: &
458  ( &
459  'PRT', & ! component
460  'DISV', & ! subcomponent
461  'GRIDDATA', & ! block
462  'IDOMAIN', & ! tag name
463  'IDOMAIN', & ! fortran variable
464  'INTEGER2D', & ! type
465  'NCPL NLAY', & ! shape
466  'idomain existence array', & ! longname
467  .false., & ! required
468  .false., & ! developmode
469  .false., & ! multi-record
470  .false., & ! preserve case
471  .true., & ! layered
472  .false. & ! timeseries
473  )
474 
475  type(inputparamdefinitiontype), parameter :: &
477  ( &
478  'PRT', & ! component
479  'DISV', & ! subcomponent
480  'VERTICES', & ! block
481  'IV', & ! tag name
482  'IV', & ! fortran variable
483  'INTEGER', & ! type
484  '', & ! shape
485  'vertex number', & ! longname
486  .true., & ! required
487  .false., & ! developmode
488  .true., & ! multi-record
489  .false., & ! preserve case
490  .false., & ! layered
491  .false. & ! timeseries
492  )
493 
494  type(inputparamdefinitiontype), parameter :: &
496  ( &
497  'PRT', & ! component
498  'DISV', & ! subcomponent
499  'VERTICES', & ! block
500  'XV', & ! tag name
501  'XV', & ! fortran variable
502  'DOUBLE', & ! type
503  '', & ! shape
504  'x-coordinate for vertex', & ! longname
505  .true., & ! required
506  .false., & ! developmode
507  .true., & ! multi-record
508  .false., & ! preserve case
509  .false., & ! layered
510  .false. & ! timeseries
511  )
512 
513  type(inputparamdefinitiontype), parameter :: &
515  ( &
516  'PRT', & ! component
517  'DISV', & ! subcomponent
518  'VERTICES', & ! block
519  'YV', & ! tag name
520  'YV', & ! fortran variable
521  'DOUBLE', & ! type
522  '', & ! shape
523  'y-coordinate for vertex', & ! longname
524  .true., & ! required
525  .false., & ! developmode
526  .true., & ! multi-record
527  .false., & ! preserve case
528  .false., & ! layered
529  .false. & ! timeseries
530  )
531 
532  type(inputparamdefinitiontype), parameter :: &
534  ( &
535  'PRT', & ! component
536  'DISV', & ! subcomponent
537  'CELL2D', & ! block
538  'ICELL2D', & ! tag name
539  'ICELL2D', & ! fortran variable
540  'INTEGER', & ! type
541  '', & ! shape
542  'cell2d number', & ! longname
543  .true., & ! required
544  .false., & ! developmode
545  .true., & ! multi-record
546  .false., & ! preserve case
547  .false., & ! layered
548  .false. & ! timeseries
549  )
550 
551  type(inputparamdefinitiontype), parameter :: &
553  ( &
554  'PRT', & ! component
555  'DISV', & ! subcomponent
556  'CELL2D', & ! block
557  'XC', & ! tag name
558  'XC', & ! fortran variable
559  'DOUBLE', & ! type
560  '', & ! shape
561  'x-coordinate for cell center', & ! longname
562  .true., & ! required
563  .false., & ! developmode
564  .true., & ! multi-record
565  .false., & ! preserve case
566  .false., & ! layered
567  .false. & ! timeseries
568  )
569 
570  type(inputparamdefinitiontype), parameter :: &
572  ( &
573  'PRT', & ! component
574  'DISV', & ! subcomponent
575  'CELL2D', & ! block
576  'YC', & ! tag name
577  'YC', & ! fortran variable
578  'DOUBLE', & ! type
579  '', & ! shape
580  'y-coordinate for cell center', & ! longname
581  .true., & ! required
582  .false., & ! developmode
583  .true., & ! multi-record
584  .false., & ! preserve case
585  .false., & ! layered
586  .false. & ! timeseries
587  )
588 
589  type(inputparamdefinitiontype), parameter :: &
591  ( &
592  'PRT', & ! component
593  'DISV', & ! subcomponent
594  'CELL2D', & ! block
595  'NCVERT', & ! tag name
596  'NCVERT', & ! fortran variable
597  'INTEGER', & ! type
598  '', & ! shape
599  'number of cell vertices', & ! longname
600  .true., & ! required
601  .false., & ! developmode
602  .true., & ! multi-record
603  .false., & ! preserve case
604  .false., & ! layered
605  .false. & ! timeseries
606  )
607 
608  type(inputparamdefinitiontype), parameter :: &
610  ( &
611  'PRT', & ! component
612  'DISV', & ! subcomponent
613  'CELL2D', & ! block
614  'ICVERT', & ! tag name
615  'ICVERT', & ! fortran variable
616  'INTEGER1D', & ! type
617  'NCVERT', & ! shape
618  'array of vertex numbers', & ! longname
619  .true., & ! required
620  .false., & ! developmode
621  .true., & ! multi-record
622  .false., & ! preserve case
623  .false., & ! layered
624  .false. & ! timeseries
625  )
626 
627  type(inputparamdefinitiontype), parameter :: &
629  [ &
631  prtdisv_nogrb, &
633  prtdisv_grb6, &
634  prtdisv_fileout, &
636  prtdisv_xorigin, &
637  prtdisv_yorigin, &
638  prtdisv_angrot, &
641  prtdisv_crs, &
643  prtdisv_ncf6, &
644  prtdisv_filein, &
646  prtdisv_nlay, &
647  prtdisv_ncpl, &
648  prtdisv_nvert, &
649  prtdisv_top, &
650  prtdisv_botm, &
651  prtdisv_idomain, &
652  prtdisv_iv, &
653  prtdisv_xv, &
654  prtdisv_yv, &
655  prtdisv_icell2d, &
656  prtdisv_xc, &
657  prtdisv_yc, &
658  prtdisv_ncvert, &
660  ]
661 
662  type(inputparamdefinitiontype), parameter :: &
664  ( &
665  'PRT', & ! component
666  'DISV', & ! subcomponent
667  'VERTICES', & ! block
668  'VERTICES', & ! tag name
669  'VERTICES', & ! fortran variable
670  'RECARRAY IV XV YV', & ! type
671  'NVERT', & ! shape
672  'vertices data', & ! longname
673  .true., & ! required
674  .false., & ! developmode
675  .false., & ! multi-record
676  .false., & ! preserve case
677  .false., & ! layered
678  .false. & ! timeseries
679  )
680 
681  type(inputparamdefinitiontype), parameter :: &
683  ( &
684  'PRT', & ! component
685  'DISV', & ! subcomponent
686  'CELL2D', & ! block
687  'CELL2D', & ! tag name
688  'CELL2D', & ! fortran variable
689  'RECARRAY ICELL2D XC YC NCVERT ICVERT', & ! type
690  'NCPL', & ! shape
691  'cell2d data', & ! longname
692  .true., & ! required
693  .false., & ! developmode
694  .false., & ! multi-record
695  .false., & ! preserve case
696  .false., & ! layered
697  .false. & ! timeseries
698  )
699 
700  type(inputparamdefinitiontype), parameter :: &
702  [ &
705  ]
706 
707  type(inputblockdefinitiontype), parameter :: &
709  [ &
711  'OPTIONS', & ! blockname
712  .false., & ! required
713  .false., & ! aggregate
714  .false. & ! block_variable
715  ), &
717  'DIMENSIONS', & ! blockname
718  .true., & ! required
719  .false., & ! aggregate
720  .false. & ! block_variable
721  ), &
723  'GRIDDATA', & ! blockname
724  .true., & ! required
725  .false., & ! aggregate
726  .false. & ! block_variable
727  ), &
729  'VERTICES', & ! blockname
730  .true., & ! required
731  .true., & ! aggregate
732  .false. & ! block_variable
733  ), &
735  'CELL2D', & ! blockname
736  .true., & ! required
737  .true., & ! aggregate
738  .false. & ! block_variable
739  ) &
740  ]
741 
742 end module prtdisvinputmodule
This module contains simulation constants.
Definition: Constants.f90:9
integer(i4b), parameter lenvarname
maximum length of a variable name
Definition: Constants.f90:17
Input definition module.
type(inputparamdefinitiontype), parameter prtdisv_top
type(inputparamdefinitiontype), parameter prtdisv_filein
type(inputparamdefinitiontype), parameter prtdisv_xc
type(inputparamdefinitiontype), parameter prtdisv_grb6
type(inputparamdefinitiontype), parameter prtdisv_yorigin
logical, public prt_disv_multi_package
Definition: prt-disvidm.f90:48
type(inputparamdefinitiontype), dimension(*), parameter, public prt_disv_aggregate_definitions
type(inputparamdefinitiontype), parameter prtdisv_crs
type(inputparamdefinitiontype), parameter prtdisv_nlay
type(inputparamdefinitiontype), dimension(*), parameter, public prt_disv_param_definitions
type(inputparamdefinitiontype), parameter prtdisv_fileout
type(inputparamdefinitiontype), parameter prtdisv_botm
type(inputparamdefinitiontype), parameter prtdisv_icell2d
type(inputparamdefinitiontype), parameter prtdisv_nogrb
Definition: prt-disvidm.f90:76
type(inputparamdefinitiontype), parameter prtdisv_ncpl
type(inputparamdefinitiontype), parameter prtdisv_length_units
Definition: prt-disvidm.f90:57
type(inputparamdefinitiontype), parameter prtdisv_ncf6
type(inputparamdefinitiontype), parameter prtdisv_idomain
type(inputparamdefinitiontype), parameter prtdisv_xv
type(inputparamdefinitiontype), parameter prtdisv_ncf6_filename
type(inputparamdefinitiontype), parameter prtdisv_vertices
character(len=16), dimension(*), parameter, public prt_disv_subpackages
Definition: prt-disvidm.f90:51
type(inputparamdefinitiontype), parameter prtdisv_cell2d
type(inputparamdefinitiontype), parameter prtdisv_iv
type(inputparamdefinitiontype), parameter prtdisv_nvert
type(inputparamdefinitiontype), parameter prtdisv_xorigin
type(inputparamdefinitiontype), parameter prtdisv_grb_filerecord
Definition: prt-disvidm.f90:95
type(inputparamdefinitiontype), parameter prtdisv_angrot
logical, public prt_disv_is_advanced
Definition: prt-disvidm.f90:49
type(inputparamdefinitiontype), parameter prtdisv_export_nc
type(inputparamdefinitiontype), parameter prtdisv_icvert
type(inputparamdefinitiontype), parameter prtdisv_yc
type(inputblockdefinitiontype), dimension(*), parameter, public prt_disv_block_definitions
type(inputparamdefinitiontype), parameter prtdisv_yv
type(inputparamdefinitiontype), parameter prtdisv_grb6_filename
type(inputparamdefinitiontype), parameter prtdisv_ncvert
type(inputparamdefinitiontype), parameter prtdisv_ncf_filerecord
type(inputparamdefinitiontype), parameter prtdisv_export_ascii
Input block definition. Describes an input block.
Input parameter definition. Describes an input parameter.