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