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