MODFLOW 6  version 6.7.0.dev3
USGS Modular Hydrologic Model
prt-prpidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module prtprpinputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public prt_prp_param_definitions
8  public prt_prp_aggregate_definitions
9  public prt_prp_block_definitions
10  public prtprpparamfoundtype
11  public prt_prp_multi_package
12  public prt_prp_subpackages
13 
14  type prtprpparamfoundtype
15  logical :: boundnames = .false.
16  logical :: iprpak = .false.
17  logical :: iexmeth = .false.
18  logical :: extol = .false.
19  logical :: localz = .false.
20  logical :: extend = .false.
21  logical :: track_filerecord = .false.
22  logical :: track = .false.
23  logical :: fileout = .false.
24  logical :: trackfile = .false.
25  logical :: trackcsvfr = .false.
26  logical :: trackcsv = .false.
27  logical :: trackcsvfile = .false.
28  logical :: stoptime = .false.
29  logical :: stoptraveltime = .false.
30  logical :: istopweaksink = .false.
31  logical :: istopzone = .false.
32  logical :: drape = .false.
33  logical :: releasetr = .false.
34  logical :: release_times = .false.
35  logical :: times = .false.
36  logical :: release_timesfr = .false.
37  logical :: release_timesfn = .false.
38  logical :: timesfile = .false.
39  logical :: idrymeth = .false.
40  logical :: frctrn = .false.
41  logical :: rttol = .false.
42  logical :: rtfreq = .false.
43  logical :: ichkmeth = .false.
44  logical :: icycwin = .false.
45  logical :: nreleasepts = .false.
46  logical :: nreleasetimes = .false.
47  logical :: irptno = .false.
48  logical :: cellid = .false.
49  logical :: xrpt = .false.
50  logical :: yrpt = .false.
51  logical :: zrpt = .false.
52  logical :: boundname = .false.
53  logical :: time = .false.
54  logical :: releasesetting = .false.
55  logical :: all = .false.
56  logical :: first = .false.
57  logical :: last = .false.
58  logical :: frequency = .false.
59  logical :: steps = .false.
60  logical :: fraction = .false.
61  end type prtprpparamfoundtype
62 
63  logical :: prt_prp_multi_package = .true.
64 
65  character(len=16), parameter :: &
66  prt_prp_subpackages(*) = &
67  [ &
68  ' ' &
69  ]
70 
71  type(inputparamdefinitiontype), parameter :: &
72  prtprp_boundnames = inputparamdefinitiontype &
73  ( &
74  'PRT', & ! component
75  'PRP', & ! subcomponent
76  'OPTIONS', & ! block
77  'BOUNDNAMES', & ! tag name
78  'BOUNDNAMES', & ! fortran variable
79  'KEYWORD', & ! type
80  '', & ! shape
81  '', & ! longname
82  .false., & ! required
83  .false., & ! prerelease
84  .false., & ! multi-record
85  .false., & ! preserve case
86  .false., & ! layered
87  .false. & ! timeseries
88  )
89 
90  type(inputparamdefinitiontype), parameter :: &
91  prtprp_iprpak = inputparamdefinitiontype &
92  ( &
93  'PRT', & ! component
94  'PRP', & ! subcomponent
95  'OPTIONS', & ! block
96  'PRINT_INPUT', & ! tag name
97  'IPRPAK', & ! fortran variable
98  'KEYWORD', & ! type
99  '', & ! shape
100  'print input to listing file', & ! longname
101  .false., & ! required
102  .false., & ! prerelease
103  .false., & ! multi-record
104  .false., & ! preserve case
105  .false., & ! layered
106  .false. & ! timeseries
107  )
108 
109  type(inputparamdefinitiontype), parameter :: &
110  prtprp_iexmeth = inputparamdefinitiontype &
111  ( &
112  'PRT', & ! component
113  'PRP', & ! subcomponent
114  'OPTIONS', & ! block
115  'DEV_EXIT_SOLVE_METHOD', & ! tag name
116  'IEXMETH', & ! fortran variable
117  'INTEGER', & ! type
118  '', & ! shape
119  'exit solve method', & ! longname
120  .false., & ! required
121  .false., & ! prerelease
122  .false., & ! multi-record
123  .false., & ! preserve case
124  .false., & ! layered
125  .false. & ! timeseries
126  )
127 
128  type(inputparamdefinitiontype), parameter :: &
129  prtprp_extol = inputparamdefinitiontype &
130  ( &
131  'PRT', & ! component
132  'PRP', & ! subcomponent
133  'OPTIONS', & ! block
134  'EXIT_SOLVE_TOLERANCE', & ! tag name
135  'EXTOL', & ! fortran variable
136  'DOUBLE', & ! type
137  '', & ! shape
138  'exit solve tolerance', & ! longname
139  .false., & ! required
140  .false., & ! prerelease
141  .false., & ! multi-record
142  .false., & ! preserve case
143  .false., & ! layered
144  .false. & ! timeseries
145  )
146 
147  type(inputparamdefinitiontype), parameter :: &
148  prtprp_localz = inputparamdefinitiontype &
149  ( &
150  'PRT', & ! component
151  'PRP', & ! subcomponent
152  'OPTIONS', & ! block
153  'LOCAL_Z', & ! tag name
154  'LOCALZ', & ! fortran variable
155  'KEYWORD', & ! type
156  '', & ! shape
157  'whether to use local z coordinates', & ! longname
158  .false., & ! required
159  .false., & ! prerelease
160  .false., & ! multi-record
161  .false., & ! preserve case
162  .false., & ! layered
163  .false. & ! timeseries
164  )
165 
166  type(inputparamdefinitiontype), parameter :: &
167  prtprp_extend = inputparamdefinitiontype &
168  ( &
169  'PRT', & ! component
170  'PRP', & ! subcomponent
171  'OPTIONS', & ! block
172  'EXTEND_TRACKING', & ! tag name
173  'EXTEND', & ! fortran variable
174  'KEYWORD', & ! type
175  '', & ! shape
176  'whether to extend tracking beyond the end of the simulation', & ! longname
177  .false., & ! required
178  .false., & ! prerelease
179  .false., & ! multi-record
180  .false., & ! preserve case
181  .false., & ! layered
182  .false. & ! timeseries
183  )
184 
185  type(inputparamdefinitiontype), parameter :: &
186  prtprp_track_filerecord = inputparamdefinitiontype &
187  ( &
188  'PRT', & ! component
189  'PRP', & ! subcomponent
190  'OPTIONS', & ! block
191  'TRACK_FILERECORD', & ! tag name
192  'TRACK_FILERECORD', & ! fortran variable
193  'RECORD TRACK FILEOUT TRACKFILE', & ! type
194  '', & ! shape
195  '', & ! longname
196  .false., & ! required
197  .false., & ! prerelease
198  .false., & ! multi-record
199  .false., & ! preserve case
200  .false., & ! layered
201  .false. & ! timeseries
202  )
203 
204  type(inputparamdefinitiontype), parameter :: &
205  prtprp_track = inputparamdefinitiontype &
206  ( &
207  'PRT', & ! component
208  'PRP', & ! subcomponent
209  'OPTIONS', & ! block
210  'TRACK', & ! tag name
211  'TRACK', & ! fortran variable
212  'KEYWORD', & ! type
213  '', & ! shape
214  'track keyword', & ! longname
215  .true., & ! required
216  .false., & ! prerelease
217  .true., & ! multi-record
218  .false., & ! preserve case
219  .false., & ! layered
220  .false. & ! timeseries
221  )
222 
223  type(inputparamdefinitiontype), parameter :: &
224  prtprp_fileout = inputparamdefinitiontype &
225  ( &
226  'PRT', & ! component
227  'PRP', & ! subcomponent
228  'OPTIONS', & ! block
229  'FILEOUT', & ! tag name
230  'FILEOUT', & ! fortran variable
231  'KEYWORD', & ! type
232  '', & ! shape
233  'file keyword', & ! longname
234  .true., & ! required
235  .false., & ! prerelease
236  .true., & ! multi-record
237  .false., & ! preserve case
238  .false., & ! layered
239  .false. & ! timeseries
240  )
241 
242  type(inputparamdefinitiontype), parameter :: &
243  prtprp_trackfile = inputparamdefinitiontype &
244  ( &
245  'PRT', & ! component
246  'PRP', & ! subcomponent
247  'OPTIONS', & ! block
248  'TRACKFILE', & ! tag name
249  'TRACKFILE', & ! fortran variable
250  'STRING', & ! type
251  '', & ! shape
252  'file keyword', & ! longname
253  .true., & ! required
254  .false., & ! prerelease
255  .true., & ! multi-record
256  .true., & ! preserve case
257  .false., & ! layered
258  .false. & ! timeseries
259  )
260 
261  type(inputparamdefinitiontype), parameter :: &
262  prtprp_trackcsvfr = inputparamdefinitiontype &
263  ( &
264  'PRT', & ! component
265  'PRP', & ! subcomponent
266  'OPTIONS', & ! block
267  'TRACKCSV_FILERECORD', & ! tag name
268  'TRACKCSVFR', & ! fortran variable
269  'RECORD TRACKCSV FILEOUT TRACKCSVFILE', & ! type
270  '', & ! shape
271  '', & ! longname
272  .false., & ! required
273  .false., & ! prerelease
274  .false., & ! multi-record
275  .false., & ! preserve case
276  .false., & ! layered
277  .false. & ! timeseries
278  )
279 
280  type(inputparamdefinitiontype), parameter :: &
281  prtprp_trackcsv = inputparamdefinitiontype &
282  ( &
283  'PRT', & ! component
284  'PRP', & ! subcomponent
285  'OPTIONS', & ! block
286  'TRACKCSV', & ! tag name
287  'TRACKCSV', & ! fortran variable
288  'KEYWORD', & ! type
289  '', & ! shape
290  'track keyword', & ! longname
291  .true., & ! required
292  .false., & ! prerelease
293  .true., & ! multi-record
294  .false., & ! preserve case
295  .false., & ! layered
296  .false. & ! timeseries
297  )
298 
299  type(inputparamdefinitiontype), parameter :: &
300  prtprp_trackcsvfile = inputparamdefinitiontype &
301  ( &
302  'PRT', & ! component
303  'PRP', & ! subcomponent
304  'OPTIONS', & ! block
305  'TRACKCSVFILE', & ! tag name
306  'TRACKCSVFILE', & ! fortran variable
307  'STRING', & ! type
308  '', & ! shape
309  'file keyword', & ! longname
310  .true., & ! required
311  .false., & ! prerelease
312  .true., & ! multi-record
313  .true., & ! preserve case
314  .false., & ! layered
315  .false. & ! timeseries
316  )
317 
318  type(inputparamdefinitiontype), parameter :: &
319  prtprp_stoptime = inputparamdefinitiontype &
320  ( &
321  'PRT', & ! component
322  'PRP', & ! subcomponent
323  'OPTIONS', & ! block
324  'STOPTIME', & ! tag name
325  'STOPTIME', & ! fortran variable
326  'DOUBLE', & ! type
327  '', & ! shape
328  'stop time', & ! longname
329  .false., & ! required
330  .false., & ! prerelease
331  .false., & ! multi-record
332  .false., & ! preserve case
333  .false., & ! layered
334  .false. & ! timeseries
335  )
336 
337  type(inputparamdefinitiontype), parameter :: &
338  prtprp_stoptraveltime = inputparamdefinitiontype &
339  ( &
340  'PRT', & ! component
341  'PRP', & ! subcomponent
342  'OPTIONS', & ! block
343  'STOPTRAVELTIME', & ! tag name
344  'STOPTRAVELTIME', & ! fortran variable
345  'DOUBLE', & ! type
346  '', & ! shape
347  'stop travel time', & ! longname
348  .false., & ! required
349  .false., & ! prerelease
350  .false., & ! multi-record
351  .false., & ! preserve case
352  .false., & ! layered
353  .false. & ! timeseries
354  )
355 
356  type(inputparamdefinitiontype), parameter :: &
357  prtprp_istopweaksink = inputparamdefinitiontype &
358  ( &
359  'PRT', & ! component
360  'PRP', & ! subcomponent
361  'OPTIONS', & ! block
362  'STOP_AT_WEAK_SINK', & ! tag name
363  'ISTOPWEAKSINK', & ! fortran variable
364  'KEYWORD', & ! type
365  '', & ! shape
366  'stop at weak sink', & ! longname
367  .false., & ! required
368  .false., & ! prerelease
369  .false., & ! multi-record
370  .false., & ! preserve case
371  .false., & ! layered
372  .false. & ! timeseries
373  )
374 
375  type(inputparamdefinitiontype), parameter :: &
376  prtprp_istopzone = inputparamdefinitiontype &
377  ( &
378  'PRT', & ! component
379  'PRP', & ! subcomponent
380  'OPTIONS', & ! block
381  'ISTOPZONE', & ! tag name
382  'ISTOPZONE', & ! fortran variable
383  'INTEGER', & ! type
384  '', & ! shape
385  'stop zone number', & ! longname
386  .false., & ! required
387  .false., & ! prerelease
388  .false., & ! multi-record
389  .false., & ! preserve case
390  .false., & ! layered
391  .false. & ! timeseries
392  )
393 
394  type(inputparamdefinitiontype), parameter :: &
395  prtprp_drape = inputparamdefinitiontype &
396  ( &
397  'PRT', & ! component
398  'PRP', & ! subcomponent
399  'OPTIONS', & ! block
400  'DRAPE', & ! tag name
401  'DRAPE', & ! fortran variable
402  'KEYWORD', & ! type
403  '', & ! shape
404  'drape', & ! longname
405  .false., & ! required
406  .false., & ! prerelease
407  .false., & ! multi-record
408  .false., & ! preserve case
409  .false., & ! layered
410  .false. & ! timeseries
411  )
412 
413  type(inputparamdefinitiontype), parameter :: &
414  prtprp_releasetr = inputparamdefinitiontype &
415  ( &
416  'PRT', & ! component
417  'PRP', & ! subcomponent
418  'OPTIONS', & ! block
419  'RELEASE_TIMESRECORD', & ! tag name
420  'RELEASETR', & ! fortran variable
421  'RECORD RELEASE_TIMES TIMES', & ! type
422  '', & ! shape
423  '', & ! longname
424  .false., & ! required
425  .false., & ! prerelease
426  .false., & ! multi-record
427  .false., & ! preserve case
428  .false., & ! layered
429  .false. & ! timeseries
430  )
431 
432  type(inputparamdefinitiontype), parameter :: &
433  prtprp_release_times = inputparamdefinitiontype &
434  ( &
435  'PRT', & ! component
436  'PRP', & ! subcomponent
437  'OPTIONS', & ! block
438  'RELEASE_TIMES', & ! tag name
439  'RELEASE_TIMES', & ! fortran variable
440  'KEYWORD', & ! type
441  '', & ! shape
442  '', & ! longname
443  .true., & ! required
444  .false., & ! prerelease
445  .true., & ! multi-record
446  .false., & ! preserve case
447  .false., & ! layered
448  .false. & ! timeseries
449  )
450 
451  type(inputparamdefinitiontype), parameter :: &
452  prtprp_times = inputparamdefinitiontype &
453  ( &
454  'PRT', & ! component
455  'PRP', & ! subcomponent
456  'OPTIONS', & ! block
457  'TIMES', & ! tag name
458  'TIMES', & ! fortran variable
459  'DOUBLE1D', & ! type
460  'ANY1D', & ! shape
461  'release times', & ! longname
462  .true., & ! required
463  .false., & ! prerelease
464  .true., & ! multi-record
465  .false., & ! preserve case
466  .false., & ! layered
467  .false. & ! timeseries
468  )
469 
470  type(inputparamdefinitiontype), parameter :: &
471  prtprp_release_timesfr = inputparamdefinitiontype &
472  ( &
473  'PRT', & ! component
474  'PRP', & ! subcomponent
475  'OPTIONS', & ! block
476  'RELEASE_TIMESFILERECORD', & ! tag name
477  'RELEASE_TIMESFR', & ! fortran variable
478  'RECORD RELEASE_TIMESFILE TIMESFILE', & ! type
479  '', & ! shape
480  '', & ! longname
481  .false., & ! required
482  .false., & ! prerelease
483  .false., & ! multi-record
484  .false., & ! preserve case
485  .false., & ! layered
486  .false. & ! timeseries
487  )
488 
489  type(inputparamdefinitiontype), parameter :: &
490  prtprp_release_timesfn = inputparamdefinitiontype &
491  ( &
492  'PRT', & ! component
493  'PRP', & ! subcomponent
494  'OPTIONS', & ! block
495  'RELEASE_TIMESFILE', & ! tag name
496  'RELEASE_TIMESFN', & ! fortran variable
497  'KEYWORD', & ! type
498  '', & ! shape
499  '', & ! longname
500  .true., & ! required
501  .false., & ! prerelease
502  .true., & ! multi-record
503  .false., & ! preserve case
504  .false., & ! layered
505  .false. & ! timeseries
506  )
507 
508  type(inputparamdefinitiontype), parameter :: &
509  prtprp_timesfile = inputparamdefinitiontype &
510  ( &
511  'PRT', & ! component
512  'PRP', & ! subcomponent
513  'OPTIONS', & ! block
514  'TIMESFILE', & ! tag name
515  'TIMESFILE', & ! fortran variable
516  'STRING', & ! type
517  '', & ! shape
518  'file keyword', & ! longname
519  .true., & ! required
520  .false., & ! prerelease
521  .true., & ! multi-record
522  .true., & ! preserve case
523  .false., & ! layered
524  .false. & ! timeseries
525  )
526 
527  type(inputparamdefinitiontype), parameter :: &
528  prtprp_idrymeth = inputparamdefinitiontype &
529  ( &
530  'PRT', & ! component
531  'PRP', & ! subcomponent
532  'OPTIONS', & ! block
533  'DRY_TRACKING_METHOD', & ! tag name
534  'IDRYMETH', & ! fortran variable
535  'STRING', & ! type
536  '', & ! shape
537  'what to do in dry-but-active cells', & ! longname
538  .false., & ! required
539  .false., & ! prerelease
540  .false., & ! multi-record
541  .false., & ! preserve case
542  .false., & ! layered
543  .false. & ! timeseries
544  )
545 
546  type(inputparamdefinitiontype), parameter :: &
547  prtprp_frctrn = inputparamdefinitiontype &
548  ( &
549  'PRT', & ! component
550  'PRP', & ! subcomponent
551  'OPTIONS', & ! block
552  'DEV_FORCETERNARY', & ! tag name
553  'FRCTRN', & ! fortran variable
554  'KEYWORD', & ! type
555  '', & ! shape
556  'force ternary tracking method', & ! longname
557  .true., & ! required
558  .false., & ! prerelease
559  .false., & ! multi-record
560  .false., & ! preserve case
561  .false., & ! layered
562  .false. & ! timeseries
563  )
564 
565  type(inputparamdefinitiontype), parameter :: &
566  prtprp_rttol = inputparamdefinitiontype &
567  ( &
568  'PRT', & ! component
569  'PRP', & ! subcomponent
570  'OPTIONS', & ! block
571  'RELEASE_TIME_TOLERANCE', & ! tag name
572  'RTTOL', & ! fortran variable
573  'DOUBLE', & ! type
574  '', & ! shape
575  'release time coincidence tolerance', & ! longname
576  .false., & ! required
577  .false., & ! prerelease
578  .false., & ! multi-record
579  .false., & ! preserve case
580  .false., & ! layered
581  .false. & ! timeseries
582  )
583 
584  type(inputparamdefinitiontype), parameter :: &
585  prtprp_rtfreq = inputparamdefinitiontype &
586  ( &
587  'PRT', & ! component
588  'PRP', & ! subcomponent
589  'OPTIONS', & ! block
590  'RELEASE_TIME_FREQUENCY', & ! tag name
591  'RTFREQ', & ! fortran variable
592  'DOUBLE', & ! type
593  '', & ! shape
594  'release time frequency', & ! longname
595  .false., & ! required
596  .false., & ! prerelease
597  .false., & ! multi-record
598  .false., & ! preserve case
599  .false., & ! layered
600  .false. & ! timeseries
601  )
602 
603  type(inputparamdefinitiontype), parameter :: &
604  prtprp_ichkmeth = inputparamdefinitiontype &
605  ( &
606  'PRT', & ! component
607  'PRP', & ! subcomponent
608  'OPTIONS', & ! block
609  'COORDINATE_CHECK_METHOD', & ! tag name
610  'ICHKMETH', & ! fortran variable
611  'STRING', & ! type
612  '', & ! shape
613  'coordinate checking method', & ! longname
614  .false., & ! required
615  .true., & ! prerelease
616  .false., & ! multi-record
617  .false., & ! preserve case
618  .false., & ! layered
619  .false. & ! timeseries
620  )
621 
622  type(inputparamdefinitiontype), parameter :: &
623  prtprp_icycwin = inputparamdefinitiontype &
624  ( &
625  'PRT', & ! component
626  'PRP', & ! subcomponent
627  'OPTIONS', & ! block
628  'DEV_CYCLE_DETECTION_WINDOW', & ! tag name
629  'ICYCWIN', & ! fortran variable
630  'INTEGER', & ! type
631  '', & ! shape
632  'cycle detection window size', & ! longname
633  .false., & ! required
634  .false., & ! prerelease
635  .false., & ! multi-record
636  .false., & ! preserve case
637  .false., & ! layered
638  .false. & ! timeseries
639  )
640 
641  type(inputparamdefinitiontype), parameter :: &
642  prtprp_nreleasepts = inputparamdefinitiontype &
643  ( &
644  'PRT', & ! component
645  'PRP', & ! subcomponent
646  'DIMENSIONS', & ! block
647  'NRELEASEPTS', & ! tag name
648  'NRELEASEPTS', & ! fortran variable
649  'INTEGER', & ! type
650  '', & ! shape
651  'number of particle release points', & ! longname
652  .true., & ! required
653  .false., & ! prerelease
654  .false., & ! multi-record
655  .false., & ! preserve case
656  .false., & ! layered
657  .false. & ! timeseries
658  )
659 
660  type(inputparamdefinitiontype), parameter :: &
661  prtprp_nreleasetimes = inputparamdefinitiontype &
662  ( &
663  'PRT', & ! component
664  'PRP', & ! subcomponent
665  'DIMENSIONS', & ! block
666  'NRELEASETIMES', & ! tag name
667  'NRELEASETIMES', & ! fortran variable
668  'INTEGER', & ! type
669  '', & ! shape
670  'number of particle release times', & ! 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 :: &
680  prtprp_irptno = inputparamdefinitiontype &
681  ( &
682  'PRT', & ! component
683  'PRP', & ! subcomponent
684  'PACKAGEDATA', & ! block
685  'IRPTNO', & ! tag name
686  'IRPTNO', & ! fortran variable
687  'INTEGER', & ! type
688  '', & ! shape
689  'PRP id number for release point', & ! longname
690  .true., & ! required
691  .false., & ! prerelease
692  .true., & ! multi-record
693  .false., & ! preserve case
694  .false., & ! layered
695  .false. & ! timeseries
696  )
697 
698  type(inputparamdefinitiontype), parameter :: &
699  prtprp_cellid = inputparamdefinitiontype &
700  ( &
701  'PRT', & ! component
702  'PRP', & ! subcomponent
703  'PACKAGEDATA', & ! block
704  'CELLID', & ! tag name
705  'CELLID', & ! fortran variable
706  'INTEGER1D', & ! type
707  'NCELLDIM', & ! shape
708  'cell identifier', & ! longname
709  .true., & ! required
710  .false., & ! prerelease
711  .true., & ! multi-record
712  .false., & ! preserve case
713  .false., & ! layered
714  .false. & ! timeseries
715  )
716 
717  type(inputparamdefinitiontype), parameter :: &
718  prtprp_xrpt = inputparamdefinitiontype &
719  ( &
720  'PRT', & ! component
721  'PRP', & ! subcomponent
722  'PACKAGEDATA', & ! block
723  'XRPT', & ! tag name
724  'XRPT', & ! fortran variable
725  'DOUBLE', & ! type
726  '', & ! shape
727  'x coordinate of release point', & ! longname
728  .true., & ! required
729  .false., & ! prerelease
730  .true., & ! multi-record
731  .false., & ! preserve case
732  .false., & ! layered
733  .false. & ! timeseries
734  )
735 
736  type(inputparamdefinitiontype), parameter :: &
737  prtprp_yrpt = inputparamdefinitiontype &
738  ( &
739  'PRT', & ! component
740  'PRP', & ! subcomponent
741  'PACKAGEDATA', & ! block
742  'YRPT', & ! tag name
743  'YRPT', & ! fortran variable
744  'DOUBLE', & ! type
745  '', & ! shape
746  'y coordinate of release point', & ! longname
747  .true., & ! required
748  .false., & ! prerelease
749  .true., & ! multi-record
750  .false., & ! preserve case
751  .false., & ! layered
752  .false. & ! timeseries
753  )
754 
755  type(inputparamdefinitiontype), parameter :: &
756  prtprp_zrpt = inputparamdefinitiontype &
757  ( &
758  'PRT', & ! component
759  'PRP', & ! subcomponent
760  'PACKAGEDATA', & ! block
761  'ZRPT', & ! tag name
762  'ZRPT', & ! fortran variable
763  'DOUBLE', & ! type
764  '', & ! shape
765  'z coordinate of release point', & ! longname
766  .true., & ! required
767  .false., & ! prerelease
768  .true., & ! multi-record
769  .false., & ! preserve case
770  .false., & ! layered
771  .false. & ! timeseries
772  )
773 
774  type(inputparamdefinitiontype), parameter :: &
775  prtprp_boundname = inputparamdefinitiontype &
776  ( &
777  'PRT', & ! component
778  'PRP', & ! subcomponent
779  'PACKAGEDATA', & ! block
780  'BOUNDNAME', & ! tag name
781  'BOUNDNAME', & ! fortran variable
782  'STRING', & ! type
783  '', & ! shape
784  'release point name', & ! longname
785  .false., & ! required
786  .false., & ! prerelease
787  .true., & ! multi-record
788  .false., & ! preserve case
789  .false., & ! layered
790  .false. & ! timeseries
791  )
792 
793  type(inputparamdefinitiontype), parameter :: &
794  prtprp_time = inputparamdefinitiontype &
795  ( &
796  'PRT', & ! component
797  'PRP', & ! subcomponent
798  'RELEASETIMES', & ! block
799  'TIME', & ! tag name
800  'TIME', & ! fortran variable
801  'DOUBLE', & ! type
802  '', & ! shape
803  'release time', & ! longname
804  .true., & ! required
805  .false., & ! prerelease
806  .true., & ! multi-record
807  .false., & ! preserve case
808  .false., & ! layered
809  .false. & ! timeseries
810  )
811 
812  type(inputparamdefinitiontype), parameter :: &
813  prtprp_releasesetting = inputparamdefinitiontype &
814  ( &
815  'PRT', & ! component
816  'PRP', & ! subcomponent
817  'PERIOD', & ! block
818  'RELEASESETTING', & ! tag name
819  'RELEASESETTING', & ! fortran variable
820  'KEYSTRING ALL FIRST LAST FREQUENCY STEPS FRACTION', & ! type
821  '', & ! shape
822  '', & ! longname
823  .true., & ! required
824  .false., & ! prerelease
825  .true., & ! multi-record
826  .false., & ! preserve case
827  .false., & ! layered
828  .false. & ! timeseries
829  )
830 
831  type(inputparamdefinitiontype), parameter :: &
832  prtprp_all = inputparamdefinitiontype &
833  ( &
834  'PRT', & ! component
835  'PRP', & ! subcomponent
836  'PERIOD', & ! block
837  'ALL', & ! tag name
838  'ALL', & ! fortran variable
839  'KEYWORD', & ! type
840  '', & ! shape
841  '', & ! longname
842  .true., & ! required
843  .false., & ! prerelease
844  .true., & ! multi-record
845  .false., & ! preserve case
846  .false., & ! layered
847  .false. & ! timeseries
848  )
849 
850  type(inputparamdefinitiontype), parameter :: &
851  prtprp_first = inputparamdefinitiontype &
852  ( &
853  'PRT', & ! component
854  'PRP', & ! subcomponent
855  'PERIOD', & ! block
856  'FIRST', & ! tag name
857  'FIRST', & ! fortran variable
858  'KEYWORD', & ! type
859  '', & ! shape
860  '', & ! longname
861  .true., & ! required
862  .false., & ! prerelease
863  .true., & ! multi-record
864  .false., & ! preserve case
865  .false., & ! layered
866  .false. & ! timeseries
867  )
868 
869  type(inputparamdefinitiontype), parameter :: &
870  prtprp_last = inputparamdefinitiontype &
871  ( &
872  'PRT', & ! component
873  'PRP', & ! subcomponent
874  'PERIOD', & ! block
875  'LAST', & ! tag name
876  'LAST', & ! fortran variable
877  'KEYWORD', & ! type
878  '', & ! shape
879  '', & ! longname
880  .true., & ! required
881  .false., & ! prerelease
882  .true., & ! multi-record
883  .false., & ! preserve case
884  .false., & ! layered
885  .false. & ! timeseries
886  )
887 
888  type(inputparamdefinitiontype), parameter :: &
889  prtprp_frequency = inputparamdefinitiontype &
890  ( &
891  'PRT', & ! component
892  'PRP', & ! subcomponent
893  'PERIOD', & ! block
894  'FREQUENCY', & ! tag name
895  'FREQUENCY', & ! fortran variable
896  'INTEGER', & ! type
897  '', & ! shape
898  '', & ! longname
899  .true., & ! required
900  .false., & ! prerelease
901  .true., & ! multi-record
902  .false., & ! preserve case
903  .false., & ! layered
904  .false. & ! timeseries
905  )
906 
907  type(inputparamdefinitiontype), parameter :: &
908  prtprp_steps = inputparamdefinitiontype &
909  ( &
910  'PRT', & ! component
911  'PRP', & ! subcomponent
912  'PERIOD', & ! block
913  'STEPS', & ! tag name
914  'STEPS', & ! fortran variable
915  'INTEGER1D', & ! type
916  '<NSTP', & ! shape
917  '', & ! longname
918  .true., & ! required
919  .false., & ! prerelease
920  .true., & ! multi-record
921  .false., & ! preserve case
922  .false., & ! layered
923  .false. & ! timeseries
924  )
925 
926  type(inputparamdefinitiontype), parameter :: &
927  prtprp_fraction = inputparamdefinitiontype &
928  ( &
929  'PRT', & ! component
930  'PRP', & ! subcomponent
931  'PERIOD', & ! block
932  'FRACTION', & ! tag name
933  'FRACTION', & ! fortran variable
934  'DOUBLE1D', & ! type
935  '<NSTP', & ! shape
936  '', & ! longname
937  .false., & ! required
938  .false., & ! prerelease
939  .true., & ! multi-record
940  .false., & ! preserve case
941  .false., & ! layered
942  .false. & ! timeseries
943  )
944 
945  type(inputparamdefinitiontype), parameter :: &
946  prt_prp_param_definitions(*) = &
947  [ &
948  prtprp_boundnames, &
949  prtprp_iprpak, &
950  prtprp_iexmeth, &
951  prtprp_extol, &
952  prtprp_localz, &
953  prtprp_extend, &
954  prtprp_track_filerecord, &
955  prtprp_track, &
956  prtprp_fileout, &
957  prtprp_trackfile, &
958  prtprp_trackcsvfr, &
959  prtprp_trackcsv, &
960  prtprp_trackcsvfile, &
961  prtprp_stoptime, &
962  prtprp_stoptraveltime, &
963  prtprp_istopweaksink, &
964  prtprp_istopzone, &
965  prtprp_drape, &
966  prtprp_releasetr, &
967  prtprp_release_times, &
968  prtprp_times, &
969  prtprp_release_timesfr, &
970  prtprp_release_timesfn, &
971  prtprp_timesfile, &
972  prtprp_idrymeth, &
973  prtprp_frctrn, &
974  prtprp_rttol, &
975  prtprp_rtfreq, &
976  prtprp_ichkmeth, &
977  prtprp_icycwin, &
978  prtprp_nreleasepts, &
979  prtprp_nreleasetimes, &
980  prtprp_irptno, &
981  prtprp_cellid, &
982  prtprp_xrpt, &
983  prtprp_yrpt, &
984  prtprp_zrpt, &
985  prtprp_boundname, &
986  prtprp_time, &
987  prtprp_releasesetting, &
988  prtprp_all, &
989  prtprp_first, &
990  prtprp_last, &
991  prtprp_frequency, &
992  prtprp_steps, &
993  prtprp_fraction &
994  ]
995 
996  type(inputparamdefinitiontype), parameter :: &
997  prtprp_packagedata = inputparamdefinitiontype &
998  ( &
999  'PRT', & ! component
1000  'PRP', & ! subcomponent
1001  'PACKAGEDATA', & ! block
1002  'PACKAGEDATA', & ! tag name
1003  'PACKAGEDATA', & ! fortran variable
1004  'RECARRAY IRPTNO CELLID XRPT YRPT ZRPT BOUNDNAME', & ! type
1005  'NRELEASEPTS', & ! shape
1006  '', & ! longname
1007  .true., & ! required
1008  .false., & ! prerelease
1009  .false., & ! multi-record
1010  .false., & ! preserve case
1011  .false., & ! layered
1012  .false. & ! timeseries
1013  )
1014 
1015  type(inputparamdefinitiontype), parameter :: &
1016  prtprp_releasetimes = inputparamdefinitiontype &
1017  ( &
1018  'PRT', & ! component
1019  'PRP', & ! subcomponent
1020  'RELEASETIMES', & ! block
1021  'RELEASETIMES', & ! tag name
1022  'RELEASETIMES', & ! fortran variable
1023  'RECARRAY TIME', & ! type
1024  'NRELEASETIMES', & ! shape
1025  '', & ! longname
1026  .false., & ! required
1027  .false., & ! prerelease
1028  .false., & ! multi-record
1029  .false., & ! preserve case
1030  .false., & ! layered
1031  .false. & ! timeseries
1032  )
1033 
1034  type(inputparamdefinitiontype), parameter :: &
1035  prtprp_perioddata = inputparamdefinitiontype &
1036  ( &
1037  'PRT', & ! component
1038  'PRP', & ! subcomponent
1039  'PERIOD', & ! block
1040  'PERIODDATA', & ! tag name
1041  'PERIODDATA', & ! fortran variable
1042  'RECARRAY RELEASESETTING', & ! type
1043  '', & ! shape
1044  '', & ! longname
1045  .true., & ! required
1046  .false., & ! prerelease
1047  .false., & ! multi-record
1048  .false., & ! preserve case
1049  .false., & ! layered
1050  .false. & ! timeseries
1051  )
1052 
1053  type(inputparamdefinitiontype), parameter :: &
1054  prt_prp_aggregate_definitions(*) = &
1055  [ &
1056  prtprp_packagedata, &
1057  prtprp_releasetimes, &
1058  prtprp_perioddata &
1059  ]
1060 
1061  type(inputblockdefinitiontype), parameter :: &
1062  prt_prp_block_definitions(*) = &
1063  [ &
1064  inputblockdefinitiontype( &
1065  'OPTIONS', & ! blockname
1066  .true., & ! required
1067  .false., & ! aggregate
1068  .false. & ! block_variable
1069  ), &
1070  inputblockdefinitiontype( &
1071  'DIMENSIONS', & ! blockname
1072  .true., & ! required
1073  .false., & ! aggregate
1074  .false. & ! block_variable
1075  ), &
1076  inputblockdefinitiontype( &
1077  'PACKAGEDATA', & ! blockname
1078  .true., & ! required
1079  .true., & ! aggregate
1080  .false. & ! block_variable
1081  ), &
1082  inputblockdefinitiontype( &
1083  'RELEASETIMES', & ! blockname
1084  .false., & ! required
1085  .true., & ! aggregate
1086  .false. & ! block_variable
1087  ), &
1088  inputblockdefinitiontype( &
1089  'PERIOD', & ! blockname
1090  .true., & ! required
1091  .true., & ! aggregate
1092  .true. & ! block_variable
1093  ) &
1094  ]
1095 
1096 end module prtprpinputmodule
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
prtprpinputmodule::prtprp_istopzone
type(inputparamdefinitiontype), parameter prtprp_istopzone
Definition: prt-prpidm.f90:375
prtprpinputmodule::prtprp_localz
type(inputparamdefinitiontype), parameter prtprp_localz
Definition: prt-prpidm.f90:147
prtprpinputmodule::prtprp_rtfreq
type(inputparamdefinitiontype), parameter prtprp_rtfreq
Definition: prt-prpidm.f90:584
prtprpinputmodule::prtprp_extend
type(inputparamdefinitiontype), parameter prtprp_extend
Definition: prt-prpidm.f90:166
prtprpinputmodule::prtprp_fraction
type(inputparamdefinitiontype), parameter prtprp_fraction
Definition: prt-prpidm.f90:926
prtprpinputmodule::prtprp_frequency
type(inputparamdefinitiontype), parameter prtprp_frequency
Definition: prt-prpidm.f90:888
prtprpinputmodule::prtprp_release_timesfr
type(inputparamdefinitiontype), parameter prtprp_release_timesfr
Definition: prt-prpidm.f90:470
prtprpinputmodule::prtprp_idrymeth
type(inputparamdefinitiontype), parameter prtprp_idrymeth
Definition: prt-prpidm.f90:527
prtprpinputmodule::prtprp_perioddata
type(inputparamdefinitiontype), parameter prtprp_perioddata
Definition: prt-prpidm.f90:1034
prtprpinputmodule::prtprp_timesfile
type(inputparamdefinitiontype), parameter prtprp_timesfile
Definition: prt-prpidm.f90:508
prtprpinputmodule::prtprp_all
type(inputparamdefinitiontype), parameter prtprp_all
Definition: prt-prpidm.f90:831
prtprpinputmodule::prtprp_release_timesfn
type(inputparamdefinitiontype), parameter prtprp_release_timesfn
Definition: prt-prpidm.f90:489
prtprpinputmodule::prtprp_releasetr
type(inputparamdefinitiontype), parameter prtprp_releasetr
Definition: prt-prpidm.f90:413
prtprpinputmodule::prtprp_fileout
type(inputparamdefinitiontype), parameter prtprp_fileout
Definition: prt-prpidm.f90:223
prtprpinputmodule::prtprp_release_times
type(inputparamdefinitiontype), parameter prtprp_release_times
Definition: prt-prpidm.f90:432
prtprpinputmodule::prtprp_stoptime
type(inputparamdefinitiontype), parameter prtprp_stoptime
Definition: prt-prpidm.f90:318
prtprpinputmodule::prtprp_steps
type(inputparamdefinitiontype), parameter prtprp_steps
Definition: prt-prpidm.f90:907
prtprpinputmodule::prtprp_extol
type(inputparamdefinitiontype), parameter prtprp_extol
Definition: prt-prpidm.f90:128
prtprpinputmodule::prtprp_packagedata
type(inputparamdefinitiontype), parameter prtprp_packagedata
Definition: prt-prpidm.f90:996
prtprpinputmodule::prtprp_xrpt
type(inputparamdefinitiontype), parameter prtprp_xrpt
Definition: prt-prpidm.f90:717
prtprpinputmodule::prtprp_trackcsvfr
type(inputparamdefinitiontype), parameter prtprp_trackcsvfr
Definition: prt-prpidm.f90:261
prtprpinputmodule::prtprp_ichkmeth
type(inputparamdefinitiontype), parameter prtprp_ichkmeth
Definition: prt-prpidm.f90:603
prtprpinputmodule::prtprp_time
type(inputparamdefinitiontype), parameter prtprp_time
Definition: prt-prpidm.f90:793
prtprpinputmodule::prtprp_istopweaksink
type(inputparamdefinitiontype), parameter prtprp_istopweaksink
Definition: prt-prpidm.f90:356
prtprpinputmodule::prtprp_boundnames
type(inputparamdefinitiontype), parameter prtprp_boundnames
Definition: prt-prpidm.f90:71
prtprpinputmodule::prtprp_trackfile
type(inputparamdefinitiontype), parameter prtprp_trackfile
Definition: prt-prpidm.f90:242
prtprpinputmodule::prtprp_cellid
type(inputparamdefinitiontype), parameter prtprp_cellid
Definition: prt-prpidm.f90:698
prtprpinputmodule::prtprp_releasetimes
type(inputparamdefinitiontype), parameter prtprp_releasetimes
Definition: prt-prpidm.f90:1015
prtprpinputmodule::prtprp_trackcsv
type(inputparamdefinitiontype), parameter prtprp_trackcsv
Definition: prt-prpidm.f90:280
prtprpinputmodule::prtprp_irptno
type(inputparamdefinitiontype), parameter prtprp_irptno
Definition: prt-prpidm.f90:679
prtprpinputmodule::prt_prp_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public prt_prp_param_definitions
Definition: prt-prpidm.f90:945
prtprpinputmodule::prt_prp_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public prt_prp_aggregate_definitions
Definition: prt-prpidm.f90:1053
prtprpinputmodule::prt_prp_multi_package
logical, public prt_prp_multi_package
Definition: prt-prpidm.f90:63
prtprpinputmodule::prtprp_iexmeth
type(inputparamdefinitiontype), parameter prtprp_iexmeth
Definition: prt-prpidm.f90:109
prtprpinputmodule::prtprp_nreleasepts
type(inputparamdefinitiontype), parameter prtprp_nreleasepts
Definition: prt-prpidm.f90:641
prtprpinputmodule::prt_prp_subpackages
character(len=16), dimension(*), parameter, public prt_prp_subpackages
Definition: prt-prpidm.f90:65
prtprpinputmodule::prtprp_iprpak
type(inputparamdefinitiontype), parameter prtprp_iprpak
Definition: prt-prpidm.f90:90
prtprpinputmodule::prtprp_trackcsvfile
type(inputparamdefinitiontype), parameter prtprp_trackcsvfile
Definition: prt-prpidm.f90:299
prtprpinputmodule::prtprp_times
type(inputparamdefinitiontype), parameter prtprp_times
Definition: prt-prpidm.f90:451
prtprpinputmodule::prtprp_first
type(inputparamdefinitiontype), parameter prtprp_first
Definition: prt-prpidm.f90:850
prtprpinputmodule::prtprp_frctrn
type(inputparamdefinitiontype), parameter prtprp_frctrn
Definition: prt-prpidm.f90:546
prtprpinputmodule::prtprp_nreleasetimes
type(inputparamdefinitiontype), parameter prtprp_nreleasetimes
Definition: prt-prpidm.f90:660
prtprpinputmodule::prt_prp_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public prt_prp_block_definitions
Definition: prt-prpidm.f90:1061
prtprpinputmodule::prtprp_drape
type(inputparamdefinitiontype), parameter prtprp_drape
Definition: prt-prpidm.f90:394
prtprpinputmodule::prtprp_icycwin
type(inputparamdefinitiontype), parameter prtprp_icycwin
Definition: prt-prpidm.f90:622
prtprpinputmodule::prtprp_track_filerecord
type(inputparamdefinitiontype), parameter prtprp_track_filerecord
Definition: prt-prpidm.f90:185
prtprpinputmodule::prtprp_boundname
type(inputparamdefinitiontype), parameter prtprp_boundname
Definition: prt-prpidm.f90:774
prtprpinputmodule::prtprp_yrpt
type(inputparamdefinitiontype), parameter prtprp_yrpt
Definition: prt-prpidm.f90:736
prtprpinputmodule::prtprp_track
type(inputparamdefinitiontype), parameter prtprp_track
Definition: prt-prpidm.f90:204
prtprpinputmodule::prtprp_stoptraveltime
type(inputparamdefinitiontype), parameter prtprp_stoptraveltime
Definition: prt-prpidm.f90:337
prtprpinputmodule::prtprp_rttol
type(inputparamdefinitiontype), parameter prtprp_rttol
Definition: prt-prpidm.f90:565
prtprpinputmodule::prtprp_last
type(inputparamdefinitiontype), parameter prtprp_last
Definition: prt-prpidm.f90:869
prtprpinputmodule::prtprp_releasesetting
type(inputparamdefinitiontype), parameter prtprp_releasesetting
Definition: prt-prpidm.f90:812
prtprpinputmodule::prtprp_zrpt
type(inputparamdefinitiontype), parameter prtprp_zrpt
Definition: prt-prpidm.f90:755