MODFLOW 6  version 6.6.0.dev0
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 :: xorigin = .false.
18  logical :: yorigin = .false.
19  logical :: angrot = .false.
20  logical :: export_ascii = .false.
21  logical :: export_nc = .false.
22  logical :: ncf_filerecord = .false.
23  logical :: ncf6 = .false.
24  logical :: filein = .false.
25  logical :: ncf6_filename = .false.
26  logical :: nlay = .false.
27  logical :: nrow = .false.
28  logical :: ncol = .false.
29  logical :: delr = .false.
30  logical :: delc = .false.
31  logical :: top = .false.
32  logical :: botm = .false.
33  logical :: idomain = .false.
34  end type prtdisparamfoundtype
35 
36  logical :: prt_dis_multi_package = .false.
37 
38  character(len=16), parameter :: &
39  prt_dis_subpackages(*) = &
40  [ &
41  ' ' &
42  ]
43 
44  type(inputparamdefinitiontype), parameter :: &
45  prtdis_length_units = inputparamdefinitiontype &
46  ( &
47  'PRT', & ! component
48  'DIS', & ! subcomponent
49  'OPTIONS', & ! block
50  'LENGTH_UNITS', & ! tag name
51  'LENGTH_UNITS', & ! fortran variable
52  'STRING', & ! type
53  '', & ! shape
54  'model length units', & ! longname
55  .false., & ! required
56  .false., & ! multi-record
57  .false., & ! preserve case
58  .false., & ! layered
59  .false. & ! timeseries
60  )
61 
62  type(inputparamdefinitiontype), parameter :: &
63  prtdis_nogrb = inputparamdefinitiontype &
64  ( &
65  'PRT', & ! component
66  'DIS', & ! subcomponent
67  'OPTIONS', & ! block
68  'NOGRB', & ! tag name
69  'NOGRB', & ! fortran variable
70  'KEYWORD', & ! type
71  '', & ! shape
72  'do not write binary grid file', & ! longname
73  .false., & ! required
74  .false., & ! multi-record
75  .false., & ! preserve case
76  .false., & ! layered
77  .false. & ! timeseries
78  )
79 
80  type(inputparamdefinitiontype), parameter :: &
81  prtdis_xorigin = inputparamdefinitiontype &
82  ( &
83  'PRT', & ! component
84  'DIS', & ! subcomponent
85  'OPTIONS', & ! block
86  'XORIGIN', & ! tag name
87  'XORIGIN', & ! fortran variable
88  'DOUBLE', & ! type
89  '', & ! shape
90  'x-position of the model grid origin', & ! longname
91  .false., & ! required
92  .false., & ! multi-record
93  .false., & ! preserve case
94  .false., & ! layered
95  .false. & ! timeseries
96  )
97 
98  type(inputparamdefinitiontype), parameter :: &
99  prtdis_yorigin = inputparamdefinitiontype &
100  ( &
101  'PRT', & ! component
102  'DIS', & ! subcomponent
103  'OPTIONS', & ! block
104  'YORIGIN', & ! tag name
105  'YORIGIN', & ! fortran variable
106  'DOUBLE', & ! type
107  '', & ! shape
108  'y-position of the model grid origin', & ! longname
109  .false., & ! required
110  .false., & ! multi-record
111  .false., & ! preserve case
112  .false., & ! layered
113  .false. & ! timeseries
114  )
115 
116  type(inputparamdefinitiontype), parameter :: &
117  prtdis_angrot = inputparamdefinitiontype &
118  ( &
119  'PRT', & ! component
120  'DIS', & ! subcomponent
121  'OPTIONS', & ! block
122  'ANGROT', & ! tag name
123  'ANGROT', & ! fortran variable
124  'DOUBLE', & ! type
125  '', & ! shape
126  'rotation angle', & ! longname
127  .false., & ! required
128  .false., & ! multi-record
129  .false., & ! preserve case
130  .false., & ! layered
131  .false. & ! timeseries
132  )
133 
134  type(inputparamdefinitiontype), parameter :: &
135  prtdis_export_ascii = inputparamdefinitiontype &
136  ( &
137  'PRT', & ! component
138  'DIS', & ! subcomponent
139  'OPTIONS', & ! block
140  'EXPORT_ARRAY_ASCII', & ! tag name
141  'EXPORT_ASCII', & ! fortran variable
142  'KEYWORD', & ! type
143  '', & ! shape
144  'export array variables to layered ascii files.', & ! longname
145  .false., & ! required
146  .false., & ! multi-record
147  .false., & ! preserve case
148  .false., & ! layered
149  .false. & ! timeseries
150  )
151 
152  type(inputparamdefinitiontype), parameter :: &
153  prtdis_export_nc = inputparamdefinitiontype &
154  ( &
155  'PRT', & ! component
156  'DIS', & ! subcomponent
157  'OPTIONS', & ! block
158  'EXPORT_ARRAY_NETCDF', & ! tag name
159  'EXPORT_NC', & ! fortran variable
160  'KEYWORD', & ! type
161  '', & ! shape
162  'export array variables to netcdf output files.', & ! longname
163  .false., & ! required
164  .false., & ! multi-record
165  .false., & ! preserve case
166  .false., & ! layered
167  .false. & ! timeseries
168  )
169 
170  type(inputparamdefinitiontype), parameter :: &
171  prtdis_ncf_filerecord = inputparamdefinitiontype &
172  ( &
173  'PRT', & ! component
174  'DIS', & ! subcomponent
175  'OPTIONS', & ! block
176  'NCF_FILERECORD', & ! tag name
177  'NCF_FILERECORD', & ! fortran variable
178  'RECORD NCF6 FILEIN NCF6_FILENAME', & ! type
179  '', & ! shape
180  '', & ! longname
181  .false., & ! required
182  .false., & ! multi-record
183  .false., & ! preserve case
184  .false., & ! layered
185  .false. & ! timeseries
186  )
187 
188  type(inputparamdefinitiontype), parameter :: &
189  prtdis_ncf6 = inputparamdefinitiontype &
190  ( &
191  'PRT', & ! component
192  'DIS', & ! subcomponent
193  'OPTIONS', & ! block
194  'NCF6', & ! tag name
195  'NCF6', & ! fortran variable
196  'KEYWORD', & ! type
197  '', & ! shape
198  'ncf keyword', & ! longname
199  .true., & ! required
200  .true., & ! multi-record
201  .false., & ! preserve case
202  .false., & ! layered
203  .false. & ! timeseries
204  )
205 
206  type(inputparamdefinitiontype), parameter :: &
207  prtdis_filein = inputparamdefinitiontype &
208  ( &
209  'PRT', & ! component
210  'DIS', & ! subcomponent
211  'OPTIONS', & ! block
212  'FILEIN', & ! tag name
213  'FILEIN', & ! fortran variable
214  'KEYWORD', & ! type
215  '', & ! shape
216  'file keyword', & ! longname
217  .true., & ! required
218  .true., & ! multi-record
219  .false., & ! preserve case
220  .false., & ! layered
221  .false. & ! timeseries
222  )
223 
224  type(inputparamdefinitiontype), parameter :: &
225  prtdis_ncf6_filename = inputparamdefinitiontype &
226  ( &
227  'PRT', & ! component
228  'DIS', & ! subcomponent
229  'OPTIONS', & ! block
230  'NCF6_FILENAME', & ! tag name
231  'NCF6_FILENAME', & ! fortran variable
232  'STRING', & ! type
233  '', & ! shape
234  'file name of NCF information', & ! longname
235  .true., & ! required
236  .true., & ! multi-record
237  .true., & ! preserve case
238  .false., & ! layered
239  .false. & ! timeseries
240  )
241 
242  type(inputparamdefinitiontype), parameter :: &
243  prtdis_nlay = inputparamdefinitiontype &
244  ( &
245  'PRT', & ! component
246  'DIS', & ! subcomponent
247  'DIMENSIONS', & ! block
248  'NLAY', & ! tag name
249  'NLAY', & ! fortran variable
250  'INTEGER', & ! type
251  '', & ! shape
252  'number of layers', & ! longname
253  .true., & ! required
254  .false., & ! multi-record
255  .false., & ! preserve case
256  .false., & ! layered
257  .false. & ! timeseries
258  )
259 
260  type(inputparamdefinitiontype), parameter :: &
261  prtdis_nrow = inputparamdefinitiontype &
262  ( &
263  'PRT', & ! component
264  'DIS', & ! subcomponent
265  'DIMENSIONS', & ! block
266  'NROW', & ! tag name
267  'NROW', & ! fortran variable
268  'INTEGER', & ! type
269  '', & ! shape
270  'number of rows', & ! longname
271  .true., & ! required
272  .false., & ! multi-record
273  .false., & ! preserve case
274  .false., & ! layered
275  .false. & ! timeseries
276  )
277 
278  type(inputparamdefinitiontype), parameter :: &
279  prtdis_ncol = inputparamdefinitiontype &
280  ( &
281  'PRT', & ! component
282  'DIS', & ! subcomponent
283  'DIMENSIONS', & ! block
284  'NCOL', & ! tag name
285  'NCOL', & ! fortran variable
286  'INTEGER', & ! type
287  '', & ! shape
288  'number of columns', & ! longname
289  .true., & ! required
290  .false., & ! multi-record
291  .false., & ! preserve case
292  .false., & ! layered
293  .false. & ! timeseries
294  )
295 
296  type(inputparamdefinitiontype), parameter :: &
297  prtdis_delr = inputparamdefinitiontype &
298  ( &
299  'PRT', & ! component
300  'DIS', & ! subcomponent
301  'GRIDDATA', & ! block
302  'DELR', & ! tag name
303  'DELR', & ! fortran variable
304  'DOUBLE1D', & ! type
305  'NCOL', & ! shape
306  'spacing along a row', & ! longname
307  .true., & ! required
308  .false., & ! multi-record
309  .false., & ! preserve case
310  .false., & ! layered
311  .false. & ! timeseries
312  )
313 
314  type(inputparamdefinitiontype), parameter :: &
315  prtdis_delc = inputparamdefinitiontype &
316  ( &
317  'PRT', & ! component
318  'DIS', & ! subcomponent
319  'GRIDDATA', & ! block
320  'DELC', & ! tag name
321  'DELC', & ! fortran variable
322  'DOUBLE1D', & ! type
323  'NROW', & ! shape
324  'spacing along a column', & ! longname
325  .true., & ! required
326  .false., & ! multi-record
327  .false., & ! preserve case
328  .false., & ! layered
329  .false. & ! timeseries
330  )
331 
332  type(inputparamdefinitiontype), parameter :: &
333  prtdis_top = inputparamdefinitiontype &
334  ( &
335  'PRT', & ! component
336  'DIS', & ! subcomponent
337  'GRIDDATA', & ! block
338  'TOP', & ! tag name
339  'TOP', & ! fortran variable
340  'DOUBLE2D', & ! type
341  'NCOL NROW', & ! shape
342  'cell top elevation', & ! longname
343  .true., & ! required
344  .false., & ! multi-record
345  .false., & ! preserve case
346  .false., & ! layered
347  .false. & ! timeseries
348  )
349 
350  type(inputparamdefinitiontype), parameter :: &
351  prtdis_botm = inputparamdefinitiontype &
352  ( &
353  'PRT', & ! component
354  'DIS', & ! subcomponent
355  'GRIDDATA', & ! block
356  'BOTM', & ! tag name
357  'BOTM', & ! fortran variable
358  'DOUBLE3D', & ! type
359  'NCOL NROW NLAY', & ! shape
360  'cell bottom elevation', & ! longname
361  .true., & ! required
362  .false., & ! multi-record
363  .false., & ! preserve case
364  .true., & ! layered
365  .false. & ! timeseries
366  )
367 
368  type(inputparamdefinitiontype), parameter :: &
369  prtdis_idomain = inputparamdefinitiontype &
370  ( &
371  'PRT', & ! component
372  'DIS', & ! subcomponent
373  'GRIDDATA', & ! block
374  'IDOMAIN', & ! tag name
375  'IDOMAIN', & ! fortran variable
376  'INTEGER3D', & ! type
377  'NCOL NROW NLAY', & ! shape
378  'idomain existence array', & ! longname
379  .false., & ! required
380  .false., & ! multi-record
381  .false., & ! preserve case
382  .true., & ! layered
383  .false. & ! timeseries
384  )
385 
386  type(inputparamdefinitiontype), parameter :: &
387  prt_dis_param_definitions(*) = &
388  [ &
389  prtdis_length_units, &
390  prtdis_nogrb, &
391  prtdis_xorigin, &
392  prtdis_yorigin, &
393  prtdis_angrot, &
394  prtdis_export_ascii, &
395  prtdis_export_nc, &
396  prtdis_ncf_filerecord, &
397  prtdis_ncf6, &
398  prtdis_filein, &
399  prtdis_ncf6_filename, &
400  prtdis_nlay, &
401  prtdis_nrow, &
402  prtdis_ncol, &
403  prtdis_delr, &
404  prtdis_delc, &
405  prtdis_top, &
406  prtdis_botm, &
407  prtdis_idomain &
408  ]
409 
410  type(inputparamdefinitiontype), parameter :: &
411  prt_dis_aggregate_definitions(*) = &
412  [ &
413  inputparamdefinitiontype &
414  ( &
415  '', & ! component
416  '', & ! subcomponent
417  '', & ! block
418  '', & ! tag name
419  '', & ! fortran variable
420  '', & ! type
421  '', & ! shape
422  '', & ! longname
423  .false., & ! required
424  .false., & ! multi-record
425  .false., & ! preserve case
426  .false., & ! layered
427  .false. & ! timeseries
428  ) &
429  ]
430 
431  type(inputblockdefinitiontype), parameter :: &
432  prt_dis_block_definitions(*) = &
433  [ &
434  inputblockdefinitiontype( &
435  'OPTIONS', & ! blockname
436  .false., & ! required
437  .false., & ! aggregate
438  .false. & ! block_variable
439  ), &
440  inputblockdefinitiontype( &
441  'DIMENSIONS', & ! blockname
442  .true., & ! required
443  .false., & ! aggregate
444  .false. & ! block_variable
445  ), &
446  inputblockdefinitiontype( &
447  'GRIDDATA', & ! blockname
448  .true., & ! required
449  .false., & ! aggregate
450  .false. & ! block_variable
451  ) &
452  ]
453 
454 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_export_nc
type(inputparamdefinitiontype), parameter prtdis_export_nc
Definition: prt-disidm.f90:152
prtdisinputmodule::prtdis_yorigin
type(inputparamdefinitiontype), parameter prtdis_yorigin
Definition: prt-disidm.f90:98
prtdisinputmodule::prtdis_top
type(inputparamdefinitiontype), parameter prtdis_top
Definition: prt-disidm.f90:332
prtdisinputmodule::prtdis_nogrb
type(inputparamdefinitiontype), parameter prtdis_nogrb
Definition: prt-disidm.f90:62
prtdisinputmodule::prtdis_nlay
type(inputparamdefinitiontype), parameter prtdis_nlay
Definition: prt-disidm.f90:242
prtdisinputmodule::prtdis_xorigin
type(inputparamdefinitiontype), parameter prtdis_xorigin
Definition: prt-disidm.f90:80
prtdisinputmodule::prt_dis_subpackages
character(len=16), dimension(*), parameter, public prt_dis_subpackages
Definition: prt-disidm.f90:38
prtdisinputmodule::prtdis_export_ascii
type(inputparamdefinitiontype), parameter prtdis_export_ascii
Definition: prt-disidm.f90:134
prtdisinputmodule::prtdis_botm
type(inputparamdefinitiontype), parameter prtdis_botm
Definition: prt-disidm.f90:350
prtdisinputmodule::prtdis_idomain
type(inputparamdefinitiontype), parameter prtdis_idomain
Definition: prt-disidm.f90:368
prtdisinputmodule::prtdis_nrow
type(inputparamdefinitiontype), parameter prtdis_nrow
Definition: prt-disidm.f90:260
prtdisinputmodule::prt_dis_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public prt_dis_aggregate_definitions
Definition: prt-disidm.f90:410
prtdisinputmodule::prtdis_delr
type(inputparamdefinitiontype), parameter prtdis_delr
Definition: prt-disidm.f90:296
prtdisinputmodule::prtdis_ncf_filerecord
type(inputparamdefinitiontype), parameter prtdis_ncf_filerecord
Definition: prt-disidm.f90:170
prtdisinputmodule::prtdis_delc
type(inputparamdefinitiontype), parameter prtdis_delc
Definition: prt-disidm.f90:314
prtdisinputmodule::prtdis_ncf6_filename
type(inputparamdefinitiontype), parameter prtdis_ncf6_filename
Definition: prt-disidm.f90:224
prtdisinputmodule::prtdis_angrot
type(inputparamdefinitiontype), parameter prtdis_angrot
Definition: prt-disidm.f90:116
prtdisinputmodule::prtdis_ncol
type(inputparamdefinitiontype), parameter prtdis_ncol
Definition: prt-disidm.f90:278
prtdisinputmodule::prt_dis_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public prt_dis_block_definitions
Definition: prt-disidm.f90:431
prtdisinputmodule::prt_dis_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public prt_dis_param_definitions
Definition: prt-disidm.f90:386
prtdisinputmodule::prt_dis_multi_package
logical, public prt_dis_multi_package
Definition: prt-disidm.f90:36
prtdisinputmodule::prtdis_filein
type(inputparamdefinitiontype), parameter prtdis_filein
Definition: prt-disidm.f90:206
prtdisinputmodule::prtdis_length_units
type(inputparamdefinitiontype), parameter prtdis_length_units
Definition: prt-disidm.f90:44
prtdisinputmodule::prtdis_ncf6
type(inputparamdefinitiontype), parameter prtdis_ncf6
Definition: prt-disidm.f90:188