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