MODFLOW 6  version 6.9.0.dev0
USGS Modular Hydrologic Model
gwt-lktidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module gwtlktinputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public gwt_lkt_param_definitions
8  public gwt_lkt_aggregate_definitions
9  public gwt_lkt_block_definitions
10  public gwtlktparamfoundtype
11  public gwt_lkt_multi_package
12  public gwt_lkt_is_advanced
13  public gwt_lkt_subpackages
14 
15  type gwtlktparamfoundtype
16  logical :: flow_pkg_name = .false.
17  logical :: auxiliary = .false.
18  logical :: fp_aux_name = .false.
19  logical :: boundnames = .false.
20  logical :: iprpak = .false.
21  logical :: iprconc = .false.
22  logical :: iprflow = .false.
23  logical :: ipakcb = .false.
24  logical :: conc_filerec = .false.
25  logical :: options_concentration = .false.
26  logical :: concfile = .false.
27  logical :: budfilerec = .false.
28  logical :: budget = .false.
29  logical :: fileout = .false.
30  logical :: budgetfile = .false.
31  logical :: budcsvfilerec = .false.
32  logical :: budgetcsv = .false.
33  logical :: budgetcsvfile = .false.
34  logical :: ts_filerecord = .false.
35  logical :: ts6 = .false.
36  logical :: filein = .false.
37  logical :: ts6_filename = .false.
38  logical :: obs_filerecord = .false.
39  logical :: obs6 = .false.
40  logical :: obs6_filename = .false.
41  logical :: dev_nonexpanding = .false.
42  logical :: packagedata_ifno = .false.
43  logical :: strt = .false.
44  logical :: aux = .false.
45  logical :: boundname = .false.
46  logical :: ifno = .false.
47  logical :: status = .false.
48  logical :: concentration = .false.
49  logical :: rainfall = .false.
50  logical :: evaporation = .false.
51  logical :: runoff = .false.
52  logical :: ext_inflow = .false.
53  logical :: auxiliaryrecord = .false.
54  logical :: period_auxiliary = .false.
55  logical :: auxname = .false.
56  logical :: auxval = .false.
57  end type gwtlktparamfoundtype
58 
59  logical :: gwt_lkt_multi_package = .true.
60  logical :: gwt_lkt_is_advanced = .true.
61 
62  character(len=16), parameter :: &
63  gwt_lkt_subpackages(*) = &
64  [ &
65  ' ' &
66  ]
67 
68  type(inputparamdefinitiontype), parameter :: &
69  gwtlkt_flow_pkg_name = inputparamdefinitiontype &
70  ( &
71  'GWT', & ! component
72  'LKT', & ! subcomponent
73  'OPTIONS', & ! block
74  'FLOW_PACKAGE_NAME', & ! tag name
75  'FLOW_PKG_NAME', & ! fortran variable
76  'STRING', & ! type
77  '', & ! shape
78  'keyword to specify name of corresponding flow package', & ! longname
79  .false., & ! required
80  .false., & ! developmode
81  .false., & ! multi-record
82  .false., & ! preserve case
83  .false., & ! layered
84  .false. & ! timeseries
85  )
86 
87  type(inputparamdefinitiontype), parameter :: &
88  gwtlkt_auxiliary = inputparamdefinitiontype &
89  ( &
90  'GWT', & ! component
91  'LKT', & ! subcomponent
92  'OPTIONS', & ! block
93  'AUXILIARY', & ! tag name
94  'AUXILIARY', & ! fortran variable
95  'STRING', & ! type
96  'NAUX', & ! shape
97  'keyword to specify aux variables', & ! longname
98  .false., & ! required
99  .false., & ! developmode
100  .false., & ! multi-record
101  .false., & ! preserve case
102  .false., & ! layered
103  .false. & ! timeseries
104  )
105 
106  type(inputparamdefinitiontype), parameter :: &
107  gwtlkt_fp_aux_name = inputparamdefinitiontype &
108  ( &
109  'GWT', & ! component
110  'LKT', & ! subcomponent
111  'OPTIONS', & ! block
112  'FLOW_PACKAGE_AUXILIARY_NAME', & ! tag name
113  'FP_AUX_NAME', & ! fortran variable
114  'STRING', & ! type
115  '', & ! shape
116  'keyword to specify name of concentration auxiliary variable '// &
117  'in flow package', & ! longname
118  .false., & ! required
119  .false., & ! developmode
120  .false., & ! multi-record
121  .false., & ! preserve case
122  .false., & ! layered
123  .false. & ! timeseries
124  )
125 
126  type(inputparamdefinitiontype), parameter :: &
127  gwtlkt_boundnames = inputparamdefinitiontype &
128  ( &
129  'GWT', & ! component
130  'LKT', & ! subcomponent
131  'OPTIONS', & ! block
132  'BOUNDNAMES', & ! tag name
133  'BOUNDNAMES', & ! fortran variable
134  'KEYWORD', & ! type
135  '', & ! shape
136  '', & ! longname
137  .false., & ! required
138  .false., & ! developmode
139  .false., & ! multi-record
140  .false., & ! preserve case
141  .false., & ! layered
142  .false. & ! timeseries
143  )
144 
145  type(inputparamdefinitiontype), parameter :: &
146  gwtlkt_iprpak = inputparamdefinitiontype &
147  ( &
148  'GWT', & ! component
149  'LKT', & ! subcomponent
150  'OPTIONS', & ! block
151  'PRINT_INPUT', & ! tag name
152  'IPRPAK', & ! fortran variable
153  'KEYWORD', & ! type
154  '', & ! shape
155  'print input to listing file', & ! longname
156  .false., & ! required
157  .false., & ! developmode
158  .false., & ! multi-record
159  .false., & ! preserve case
160  .false., & ! layered
161  .false. & ! timeseries
162  )
163 
164  type(inputparamdefinitiontype), parameter :: &
165  gwtlkt_iprconc = inputparamdefinitiontype &
166  ( &
167  'GWT', & ! component
168  'LKT', & ! subcomponent
169  'OPTIONS', & ! block
170  'PRINT_CONCENTRATION', & ! tag name
171  'IPRCONC', & ! fortran variable
172  'KEYWORD', & ! type
173  '', & ! shape
174  'print calculated stages to listing file', & ! longname
175  .false., & ! required
176  .false., & ! developmode
177  .false., & ! multi-record
178  .false., & ! preserve case
179  .false., & ! layered
180  .false. & ! timeseries
181  )
182 
183  type(inputparamdefinitiontype), parameter :: &
184  gwtlkt_iprflow = inputparamdefinitiontype &
185  ( &
186  'GWT', & ! component
187  'LKT', & ! subcomponent
188  'OPTIONS', & ! block
189  'PRINT_FLOWS', & ! tag name
190  'IPRFLOW', & ! fortran variable
191  'KEYWORD', & ! type
192  '', & ! shape
193  'print calculated flows to listing file', & ! longname
194  .false., & ! required
195  .false., & ! developmode
196  .false., & ! multi-record
197  .false., & ! preserve case
198  .false., & ! layered
199  .false. & ! timeseries
200  )
201 
202  type(inputparamdefinitiontype), parameter :: &
203  gwtlkt_ipakcb = inputparamdefinitiontype &
204  ( &
205  'GWT', & ! component
206  'LKT', & ! subcomponent
207  'OPTIONS', & ! block
208  'SAVE_FLOWS', & ! tag name
209  'IPAKCB', & ! fortran variable
210  'KEYWORD', & ! type
211  '', & ! shape
212  'save lake flows to budget file', & ! longname
213  .false., & ! required
214  .false., & ! developmode
215  .false., & ! multi-record
216  .false., & ! preserve case
217  .false., & ! layered
218  .false. & ! timeseries
219  )
220 
221  type(inputparamdefinitiontype), parameter :: &
222  gwtlkt_conc_filerec = inputparamdefinitiontype &
223  ( &
224  'GWT', & ! component
225  'LKT', & ! subcomponent
226  'OPTIONS', & ! block
227  'CONCENTRATION_FILERECORD', & ! tag name
228  'CONC_FILEREC', & ! fortran variable
229  'RECORD CONCENTRATION FILEOUT CONCFILE', & ! type
230  '', & ! shape
231  '', & ! longname
232  .false., & ! required
233  .false., & ! developmode
234  .false., & ! multi-record
235  .false., & ! preserve case
236  .false., & ! layered
237  .false. & ! timeseries
238  )
239 
240  type(inputparamdefinitiontype), parameter :: &
241  gwtlkt_options_concentration = inputparamdefinitiontype &
242  ( &
243  'GWT', & ! component
244  'LKT', & ! subcomponent
245  'OPTIONS', & ! block
246  'CONCENTRATION', & ! tag name
247  'CONCENTRATION', & ! fortran variable
248  'KEYWORD', & ! type
249  '', & ! shape
250  'stage keyword', & ! longname
251  .true., & ! required
252  .false., & ! developmode
253  .true., & ! multi-record
254  .false., & ! preserve case
255  .false., & ! layered
256  .false. & ! timeseries
257  )
258 
259  type(inputparamdefinitiontype), parameter :: &
260  gwtlkt_concfile = inputparamdefinitiontype &
261  ( &
262  'GWT', & ! component
263  'LKT', & ! subcomponent
264  'OPTIONS', & ! block
265  'CONCFILE', & ! tag name
266  'CONCFILE', & ! fortran variable
267  'STRING', & ! type
268  '', & ! shape
269  'file keyword', & ! longname
270  .true., & ! required
271  .false., & ! developmode
272  .true., & ! multi-record
273  .true., & ! preserve case
274  .false., & ! layered
275  .false. & ! timeseries
276  )
277 
278  type(inputparamdefinitiontype), parameter :: &
279  gwtlkt_budfilerec = inputparamdefinitiontype &
280  ( &
281  'GWT', & ! component
282  'LKT', & ! subcomponent
283  'OPTIONS', & ! block
284  'BUDGET_FILERECORD', & ! tag name
285  'BUDFILEREC', & ! fortran variable
286  'RECORD BUDGET FILEOUT BUDGETFILE', & ! type
287  '', & ! shape
288  '', & ! longname
289  .false., & ! required
290  .false., & ! developmode
291  .false., & ! multi-record
292  .false., & ! preserve case
293  .false., & ! layered
294  .false. & ! timeseries
295  )
296 
297  type(inputparamdefinitiontype), parameter :: &
298  gwtlkt_budget = inputparamdefinitiontype &
299  ( &
300  'GWT', & ! component
301  'LKT', & ! subcomponent
302  'OPTIONS', & ! block
303  'BUDGET', & ! tag name
304  'BUDGET', & ! fortran variable
305  'KEYWORD', & ! type
306  '', & ! shape
307  'budget keyword', & ! longname
308  .true., & ! required
309  .false., & ! developmode
310  .true., & ! multi-record
311  .false., & ! preserve case
312  .false., & ! layered
313  .false. & ! timeseries
314  )
315 
316  type(inputparamdefinitiontype), parameter :: &
317  gwtlkt_fileout = inputparamdefinitiontype &
318  ( &
319  'GWT', & ! component
320  'LKT', & ! subcomponent
321  'OPTIONS', & ! block
322  'FILEOUT', & ! tag name
323  'FILEOUT', & ! fortran variable
324  'KEYWORD', & ! type
325  '', & ! shape
326  'file keyword', & ! longname
327  .true., & ! required
328  .false., & ! developmode
329  .true., & ! multi-record
330  .false., & ! preserve case
331  .false., & ! layered
332  .false. & ! timeseries
333  )
334 
335  type(inputparamdefinitiontype), parameter :: &
336  gwtlkt_budgetfile = inputparamdefinitiontype &
337  ( &
338  'GWT', & ! component
339  'LKT', & ! subcomponent
340  'OPTIONS', & ! block
341  'BUDGETFILE', & ! tag name
342  'BUDGETFILE', & ! fortran variable
343  'STRING', & ! type
344  '', & ! shape
345  'file keyword', & ! longname
346  .true., & ! required
347  .false., & ! developmode
348  .true., & ! multi-record
349  .true., & ! preserve case
350  .false., & ! layered
351  .false. & ! timeseries
352  )
353 
354  type(inputparamdefinitiontype), parameter :: &
355  gwtlkt_budcsvfilerec = inputparamdefinitiontype &
356  ( &
357  'GWT', & ! component
358  'LKT', & ! subcomponent
359  'OPTIONS', & ! block
360  'BUDGETCSV_FILERECORD', & ! tag name
361  'BUDCSVFILEREC', & ! fortran variable
362  'RECORD BUDGETCSV FILEOUT BUDGETCSVFILE', & ! type
363  '', & ! shape
364  '', & ! longname
365  .false., & ! required
366  .false., & ! developmode
367  .false., & ! multi-record
368  .false., & ! preserve case
369  .false., & ! layered
370  .false. & ! timeseries
371  )
372 
373  type(inputparamdefinitiontype), parameter :: &
374  gwtlkt_budgetcsv = inputparamdefinitiontype &
375  ( &
376  'GWT', & ! component
377  'LKT', & ! subcomponent
378  'OPTIONS', & ! block
379  'BUDGETCSV', & ! tag name
380  'BUDGETCSV', & ! fortran variable
381  'KEYWORD', & ! type
382  '', & ! shape
383  'budget keyword', & ! longname
384  .true., & ! required
385  .false., & ! developmode
386  .true., & ! multi-record
387  .false., & ! preserve case
388  .false., & ! layered
389  .false. & ! timeseries
390  )
391 
392  type(inputparamdefinitiontype), parameter :: &
393  gwtlkt_budgetcsvfile = inputparamdefinitiontype &
394  ( &
395  'GWT', & ! component
396  'LKT', & ! subcomponent
397  'OPTIONS', & ! block
398  'BUDGETCSVFILE', & ! tag name
399  'BUDGETCSVFILE', & ! fortran variable
400  'STRING', & ! type
401  '', & ! shape
402  'file keyword', & ! longname
403  .true., & ! required
404  .false., & ! developmode
405  .true., & ! multi-record
406  .true., & ! preserve case
407  .false., & ! layered
408  .false. & ! timeseries
409  )
410 
411  type(inputparamdefinitiontype), parameter :: &
412  gwtlkt_ts_filerecord = inputparamdefinitiontype &
413  ( &
414  'GWT', & ! component
415  'LKT', & ! subcomponent
416  'OPTIONS', & ! block
417  'TS_FILERECORD', & ! tag name
418  'TS_FILERECORD', & ! fortran variable
419  'RECORD TS6 FILEIN TS6_FILENAME', & ! type
420  '', & ! shape
421  '', & ! longname
422  .false., & ! required
423  .false., & ! developmode
424  .false., & ! multi-record
425  .false., & ! preserve case
426  .false., & ! layered
427  .false. & ! timeseries
428  )
429 
430  type(inputparamdefinitiontype), parameter :: &
431  gwtlkt_ts6 = inputparamdefinitiontype &
432  ( &
433  'GWT', & ! component
434  'LKT', & ! subcomponent
435  'OPTIONS', & ! block
436  'TS6', & ! tag name
437  'TS6', & ! fortran variable
438  'KEYWORD', & ! type
439  '', & ! shape
440  'head keyword', & ! longname
441  .true., & ! required
442  .false., & ! developmode
443  .true., & ! multi-record
444  .false., & ! preserve case
445  .false., & ! layered
446  .false. & ! timeseries
447  )
448 
449  type(inputparamdefinitiontype), parameter :: &
450  gwtlkt_filein = inputparamdefinitiontype &
451  ( &
452  'GWT', & ! component
453  'LKT', & ! subcomponent
454  'OPTIONS', & ! block
455  'FILEIN', & ! tag name
456  'FILEIN', & ! fortran variable
457  'KEYWORD', & ! type
458  '', & ! shape
459  'file keyword', & ! longname
460  .true., & ! required
461  .false., & ! developmode
462  .true., & ! multi-record
463  .false., & ! preserve case
464  .false., & ! layered
465  .false. & ! timeseries
466  )
467 
468  type(inputparamdefinitiontype), parameter :: &
469  gwtlkt_ts6_filename = inputparamdefinitiontype &
470  ( &
471  'GWT', & ! component
472  'LKT', & ! subcomponent
473  'OPTIONS', & ! block
474  'TS6_FILENAME', & ! tag name
475  'TS6_FILENAME', & ! fortran variable
476  'STRING', & ! type
477  '', & ! shape
478  'file name of time series information', & ! longname
479  .true., & ! required
480  .false., & ! developmode
481  .true., & ! multi-record
482  .true., & ! preserve case
483  .false., & ! layered
484  .false. & ! timeseries
485  )
486 
487  type(inputparamdefinitiontype), parameter :: &
488  gwtlkt_obs_filerecord = inputparamdefinitiontype &
489  ( &
490  'GWT', & ! component
491  'LKT', & ! subcomponent
492  'OPTIONS', & ! block
493  'OBS_FILERECORD', & ! tag name
494  'OBS_FILERECORD', & ! fortran variable
495  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
496  '', & ! shape
497  '', & ! longname
498  .false., & ! required
499  .false., & ! developmode
500  .false., & ! multi-record
501  .false., & ! preserve case
502  .false., & ! layered
503  .false. & ! timeseries
504  )
505 
506  type(inputparamdefinitiontype), parameter :: &
507  gwtlkt_obs6 = inputparamdefinitiontype &
508  ( &
509  'GWT', & ! component
510  'LKT', & ! subcomponent
511  'OPTIONS', & ! block
512  'OBS6', & ! tag name
513  'OBS6', & ! fortran variable
514  'KEYWORD', & ! type
515  '', & ! shape
516  'obs keyword', & ! longname
517  .true., & ! required
518  .false., & ! developmode
519  .true., & ! multi-record
520  .false., & ! preserve case
521  .false., & ! layered
522  .false. & ! timeseries
523  )
524 
525  type(inputparamdefinitiontype), parameter :: &
526  gwtlkt_obs6_filename = inputparamdefinitiontype &
527  ( &
528  'GWT', & ! component
529  'LKT', & ! subcomponent
530  'OPTIONS', & ! block
531  'OBS6_FILENAME', & ! tag name
532  'OBS6_FILENAME', & ! fortran variable
533  'STRING', & ! type
534  '', & ! shape
535  'obs6 input filename', & ! longname
536  .true., & ! required
537  .false., & ! developmode
538  .true., & ! multi-record
539  .true., & ! preserve case
540  .false., & ! layered
541  .false. & ! timeseries
542  )
543 
544  type(inputparamdefinitiontype), parameter :: &
545  gwtlkt_dev_nonexpanding = inputparamdefinitiontype &
546  ( &
547  'GWT', & ! component
548  'LKT', & ! subcomponent
549  'OPTIONS', & ! block
550  'DEV_NONEXPANDING_MATRIX', & ! tag name
551  'DEV_NONEXPANDING', & ! fortran variable
552  'KEYWORD', & ! type
553  '', & ! shape
554  'do not add rows to the solution matrix', & ! longname
555  .false., & ! required
556  .false., & ! developmode
557  .false., & ! multi-record
558  .false., & ! preserve case
559  .false., & ! layered
560  .false. & ! timeseries
561  )
562 
563  type(inputparamdefinitiontype), parameter :: &
564  gwtlkt_packagedata_ifno = inputparamdefinitiontype &
565  ( &
566  'GWT', & ! component
567  'LKT', & ! subcomponent
568  'PACKAGEDATA', & ! block
569  'IFNO', & ! tag name
570  'PACKAGEDATA_IFNO', & ! fortran variable
571  'INTEGER', & ! type
572  '', & ! shape
573  'lake number for this entry', & ! longname
574  .true., & ! required
575  .false., & ! developmode
576  .true., & ! multi-record
577  .false., & ! preserve case
578  .false., & ! layered
579  .false. & ! timeseries
580  )
581 
582  type(inputparamdefinitiontype), parameter :: &
583  gwtlkt_strt = inputparamdefinitiontype &
584  ( &
585  'GWT', & ! component
586  'LKT', & ! subcomponent
587  'PACKAGEDATA', & ! block
588  'STRT', & ! tag name
589  'STRT', & ! fortran variable
590  'DOUBLE', & ! type
591  '', & ! shape
592  'starting lake concentration', & ! longname
593  .true., & ! required
594  .false., & ! developmode
595  .true., & ! multi-record
596  .false., & ! preserve case
597  .false., & ! layered
598  .false. & ! timeseries
599  )
600 
601  type(inputparamdefinitiontype), parameter :: &
602  gwtlkt_aux = inputparamdefinitiontype &
603  ( &
604  'GWT', & ! component
605  'LKT', & ! subcomponent
606  'PACKAGEDATA', & ! block
607  'AUX', & ! tag name
608  'AUX', & ! fortran variable
609  'DOUBLE1D', & ! type
610  'NAUX', & ! shape
611  'auxiliary variables', & ! longname
612  .false., & ! required
613  .false., & ! developmode
614  .true., & ! multi-record
615  .false., & ! preserve case
616  .false., & ! layered
617  .true. & ! timeseries
618  )
619 
620  type(inputparamdefinitiontype), parameter :: &
621  gwtlkt_boundname = inputparamdefinitiontype &
622  ( &
623  'GWT', & ! component
624  'LKT', & ! subcomponent
625  'PACKAGEDATA', & ! block
626  'BOUNDNAME', & ! tag name
627  'BOUNDNAME', & ! fortran variable
628  'STRING', & ! type
629  '', & ! shape
630  'lake name', & ! longname
631  .false., & ! required
632  .false., & ! developmode
633  .true., & ! multi-record
634  .false., & ! preserve case
635  .false., & ! layered
636  .false. & ! timeseries
637  )
638 
639  type(inputparamdefinitiontype), parameter :: &
640  gwtlkt_ifno = inputparamdefinitiontype &
641  ( &
642  'GWT', & ! component
643  'LKT', & ! subcomponent
644  'PERIOD', & ! block
645  'IFNO', & ! tag name
646  'IFNO', & ! fortran variable
647  'INTEGER', & ! type
648  '', & ! shape
649  'lake number for this entry', & ! longname
650  .true., & ! required
651  .false., & ! developmode
652  .true., & ! multi-record
653  .false., & ! preserve case
654  .false., & ! layered
655  .false. & ! timeseries
656  )
657 
658  type(inputparamdefinitiontype), parameter :: &
659  gwtlkt_status = inputparamdefinitiontype &
660  ( &
661  'GWT', & ! component
662  'LKT', & ! subcomponent
663  'PERIOD', & ! block
664  'STATUS', & ! tag name
665  'STATUS', & ! fortran variable
666  'STRING', & ! type
667  '', & ! shape
668  'lake concentration status', & ! longname
669  .true., & ! required
670  .false., & ! developmode
671  .true., & ! multi-record
672  .false., & ! preserve case
673  .false., & ! layered
674  .false. & ! timeseries
675  )
676 
677  type(inputparamdefinitiontype), parameter :: &
678  gwtlkt_concentration = inputparamdefinitiontype &
679  ( &
680  'GWT', & ! component
681  'LKT', & ! subcomponent
682  'PERIOD', & ! block
683  'CONCENTRATION', & ! tag name
684  'CONCENTRATION', & ! fortran variable
685  'DOUBLE', & ! type
686  '', & ! shape
687  'lake concentration', & ! longname
688  .true., & ! required
689  .false., & ! developmode
690  .true., & ! multi-record
691  .false., & ! preserve case
692  .false., & ! layered
693  .true. & ! timeseries
694  )
695 
696  type(inputparamdefinitiontype), parameter :: &
697  gwtlkt_rainfall = inputparamdefinitiontype &
698  ( &
699  'GWT', & ! component
700  'LKT', & ! subcomponent
701  'PERIOD', & ! block
702  'RAINFALL', & ! tag name
703  'RAINFALL', & ! fortran variable
704  'DOUBLE', & ! type
705  '', & ! shape
706  'rainfall concentration', & ! longname
707  .true., & ! required
708  .false., & ! developmode
709  .true., & ! multi-record
710  .false., & ! preserve case
711  .false., & ! layered
712  .true. & ! timeseries
713  )
714 
715  type(inputparamdefinitiontype), parameter :: &
716  gwtlkt_evaporation = inputparamdefinitiontype &
717  ( &
718  'GWT', & ! component
719  'LKT', & ! subcomponent
720  'PERIOD', & ! block
721  'EVAPORATION', & ! tag name
722  'EVAPORATION', & ! fortran variable
723  'DOUBLE', & ! type
724  '', & ! shape
725  'evaporation concentration', & ! longname
726  .true., & ! required
727  .false., & ! developmode
728  .true., & ! multi-record
729  .false., & ! preserve case
730  .false., & ! layered
731  .true. & ! timeseries
732  )
733 
734  type(inputparamdefinitiontype), parameter :: &
735  gwtlkt_runoff = inputparamdefinitiontype &
736  ( &
737  'GWT', & ! component
738  'LKT', & ! subcomponent
739  'PERIOD', & ! block
740  'RUNOFF', & ! tag name
741  'RUNOFF', & ! fortran variable
742  'DOUBLE', & ! type
743  '', & ! shape
744  'runoff concentration', & ! longname
745  .true., & ! required
746  .false., & ! developmode
747  .true., & ! multi-record
748  .false., & ! preserve case
749  .false., & ! layered
750  .true. & ! timeseries
751  )
752 
753  type(inputparamdefinitiontype), parameter :: &
754  gwtlkt_ext_inflow = inputparamdefinitiontype &
755  ( &
756  'GWT', & ! component
757  'LKT', & ! subcomponent
758  'PERIOD', & ! block
759  'EXT-INFLOW', & ! tag name
760  'EXT_INFLOW', & ! fortran variable
761  'DOUBLE', & ! type
762  '', & ! shape
763  'ext-inflow concentration', & ! longname
764  .true., & ! required
765  .false., & ! developmode
766  .true., & ! multi-record
767  .false., & ! preserve case
768  .false., & ! layered
769  .true. & ! timeseries
770  )
771 
772  type(inputparamdefinitiontype), parameter :: &
773  gwtlkt_auxiliaryrecord = inputparamdefinitiontype &
774  ( &
775  'GWT', & ! component
776  'LKT', & ! subcomponent
777  'PERIOD', & ! block
778  'AUXILIARYRECORD', & ! tag name
779  'AUXILIARYRECORD', & ! fortran variable
780  'RECORD AUXILIARY AUXNAME AUXVAL', & ! type
781  '', & ! shape
782  '', & ! longname
783  .true., & ! required
784  .false., & ! developmode
785  .true., & ! multi-record
786  .false., & ! preserve case
787  .false., & ! layered
788  .false. & ! timeseries
789  )
790 
791  type(inputparamdefinitiontype), parameter :: &
792  gwtlkt_period_auxiliary = inputparamdefinitiontype &
793  ( &
794  'GWT', & ! component
795  'LKT', & ! subcomponent
796  'PERIOD', & ! block
797  'AUXILIARY', & ! tag name
798  'PERIOD_AUXILIARY', & ! fortran variable
799  'KEYWORD', & ! type
800  '', & ! shape
801  '', & ! longname
802  .true., & ! required
803  .false., & ! developmode
804  .true., & ! multi-record
805  .false., & ! preserve case
806  .false., & ! layered
807  .false. & ! timeseries
808  )
809 
810  type(inputparamdefinitiontype), parameter :: &
811  gwtlkt_auxname = inputparamdefinitiontype &
812  ( &
813  'GWT', & ! component
814  'LKT', & ! subcomponent
815  'PERIOD', & ! block
816  'AUXNAME', & ! tag name
817  'AUXNAME', & ! fortran variable
818  'STRING', & ! type
819  '', & ! shape
820  '', & ! longname
821  .true., & ! required
822  .false., & ! developmode
823  .true., & ! multi-record
824  .false., & ! preserve case
825  .false., & ! layered
826  .false. & ! timeseries
827  )
828 
829  type(inputparamdefinitiontype), parameter :: &
830  gwtlkt_auxval = inputparamdefinitiontype &
831  ( &
832  'GWT', & ! component
833  'LKT', & ! subcomponent
834  'PERIOD', & ! block
835  'AUXVAL', & ! tag name
836  'AUXVAL', & ! fortran variable
837  'DOUBLE', & ! type
838  '', & ! shape
839  'auxiliary variable value', & ! longname
840  .true., & ! required
841  .false., & ! developmode
842  .true., & ! multi-record
843  .false., & ! preserve case
844  .false., & ! layered
845  .true. & ! timeseries
846  )
847 
848  type(inputparamdefinitiontype), parameter :: &
849  gwt_lkt_param_definitions(*) = &
850  [ &
851  gwtlkt_flow_pkg_name, &
852  gwtlkt_auxiliary, &
853  gwtlkt_fp_aux_name, &
854  gwtlkt_boundnames, &
855  gwtlkt_iprpak, &
856  gwtlkt_iprconc, &
857  gwtlkt_iprflow, &
858  gwtlkt_ipakcb, &
859  gwtlkt_conc_filerec, &
860  gwtlkt_options_concentration, &
861  gwtlkt_concfile, &
862  gwtlkt_budfilerec, &
863  gwtlkt_budget, &
864  gwtlkt_fileout, &
865  gwtlkt_budgetfile, &
866  gwtlkt_budcsvfilerec, &
867  gwtlkt_budgetcsv, &
868  gwtlkt_budgetcsvfile, &
869  gwtlkt_ts_filerecord, &
870  gwtlkt_ts6, &
871  gwtlkt_filein, &
872  gwtlkt_ts6_filename, &
873  gwtlkt_obs_filerecord, &
874  gwtlkt_obs6, &
875  gwtlkt_obs6_filename, &
876  gwtlkt_dev_nonexpanding, &
877  gwtlkt_packagedata_ifno, &
878  gwtlkt_strt, &
879  gwtlkt_aux, &
880  gwtlkt_boundname, &
881  gwtlkt_ifno, &
882  gwtlkt_status, &
883  gwtlkt_concentration, &
884  gwtlkt_rainfall, &
885  gwtlkt_evaporation, &
886  gwtlkt_runoff, &
887  gwtlkt_ext_inflow, &
888  gwtlkt_auxiliaryrecord, &
889  gwtlkt_period_auxiliary, &
890  gwtlkt_auxname, &
891  gwtlkt_auxval &
892  ]
893 
894  type(inputparamdefinitiontype), parameter :: &
895  gwtlkt_packagedata = inputparamdefinitiontype &
896  ( &
897  'GWT', & ! component
898  'LKT', & ! subcomponent
899  'PACKAGEDATA', & ! block
900  'PACKAGEDATA', & ! tag name
901  'PACKAGEDATA', & ! fortran variable
902  'RECARRAY IFNO STRT AUX BOUNDNAME', & ! type
903  'NLAKES', & ! shape
904  '', & ! longname
905  .true., & ! required
906  .false., & ! developmode
907  .false., & ! multi-record
908  .false., & ! preserve case
909  .false., & ! layered
910  .false. & ! timeseries
911  )
912 
913  type(inputparamdefinitiontype), parameter :: &
914  gwtlkt_lakeperioddata = inputparamdefinitiontype &
915  ( &
916  'GWT', & ! component
917  'LKT', & ! subcomponent
918  'PERIOD', & ! block
919  'LAKEPERIODDATA', & ! tag name
920  'LAKEPERIODDATA', & ! fortran variable
921  'RECARRAY IFNO LAKSETTING', & ! type
922  '', & ! shape
923  '', & ! longname
924  .true., & ! required
925  .false., & ! developmode
926  .false., & ! multi-record
927  .false., & ! preserve case
928  .false., & ! layered
929  .false. & ! timeseries
930  )
931 
932  type(inputparamdefinitiontype), parameter :: &
933  gwtlkt_laksetting = inputparamdefinitiontype &
934  ( &
935  'GWT', & ! component
936  'LKT', & ! subcomponent
937  'PERIOD', & ! block
938  'LAKSETTING', & ! tag name
939  'LAKSETTING', & ! fortran variable
940  'KEYSTRING STATUS CONCENTRATION RAINFALL EVAPORATION RUNOFF '// &
941  'EXT-INFLOW AUXILIARYRECORD', & ! type
942  '', & ! shape
943  '', & ! longname
944  .true., & ! required
945  .false., & ! developmode
946  .true., & ! multi-record
947  .false., & ! preserve case
948  .false., & ! layered
949  .false. & ! timeseries
950  )
951 
952  type(inputparamdefinitiontype), parameter :: &
953  gwt_lkt_aggregate_definitions(*) = &
954  [ &
955  gwtlkt_packagedata, &
956  gwtlkt_lakeperioddata, &
957  gwtlkt_laksetting &
958  ]
959 
960  type(inputblockdefinitiontype), parameter :: &
961  gwt_lkt_block_definitions(*) = &
962  [ &
963  inputblockdefinitiontype( &
964  'OPTIONS', & ! blockname
965  .false., & ! required
966  .false., & ! aggregate
967  .false. & ! block_variable
968  ), &
969  inputblockdefinitiontype( &
970  'PACKAGEDATA', & ! blockname
971  .true., & ! required
972  .true., & ! aggregate
973  .false. & ! block_variable
974  ), &
975  inputblockdefinitiontype( &
976  'PERIOD', & ! blockname
977  .true., & ! required
978  .true., & ! aggregate
979  .true. & ! block_variable
980  ) &
981  ]
982 
983 end module gwtlktinputmodule
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
gwtlktinputmodule::gwtlkt_budgetcsv
type(inputparamdefinitiontype), parameter gwtlkt_budgetcsv
Definition: gwt-lktidm.f90:373
gwtlktinputmodule::gwtlkt_period_auxiliary
type(inputparamdefinitiontype), parameter gwtlkt_period_auxiliary
Definition: gwt-lktidm.f90:791
gwtlktinputmodule::gwtlkt_rainfall
type(inputparamdefinitiontype), parameter gwtlkt_rainfall
Definition: gwt-lktidm.f90:696
gwtlktinputmodule::gwtlkt_boundname
type(inputparamdefinitiontype), parameter gwtlkt_boundname
Definition: gwt-lktidm.f90:620
gwtlktinputmodule::gwtlkt_lakeperioddata
type(inputparamdefinitiontype), parameter gwtlkt_lakeperioddata
Definition: gwt-lktidm.f90:913
gwtlktinputmodule::gwtlkt_dev_nonexpanding
type(inputparamdefinitiontype), parameter gwtlkt_dev_nonexpanding
Definition: gwt-lktidm.f90:544
gwtlktinputmodule::gwtlkt_concfile
type(inputparamdefinitiontype), parameter gwtlkt_concfile
Definition: gwt-lktidm.f90:259
gwtlktinputmodule::gwtlkt_ifno
type(inputparamdefinitiontype), parameter gwtlkt_ifno
Definition: gwt-lktidm.f90:639
gwtlktinputmodule::gwtlkt_ts_filerecord
type(inputparamdefinitiontype), parameter gwtlkt_ts_filerecord
Definition: gwt-lktidm.f90:411
gwtlktinputmodule::gwtlkt_ipakcb
type(inputparamdefinitiontype), parameter gwtlkt_ipakcb
Definition: gwt-lktidm.f90:202
gwtlktinputmodule::gwtlkt_packagedata_ifno
type(inputparamdefinitiontype), parameter gwtlkt_packagedata_ifno
Definition: gwt-lktidm.f90:563
gwtlktinputmodule::gwtlkt_fileout
type(inputparamdefinitiontype), parameter gwtlkt_fileout
Definition: gwt-lktidm.f90:316
gwtlktinputmodule::gwtlkt_ts6
type(inputparamdefinitiontype), parameter gwtlkt_ts6
Definition: gwt-lktidm.f90:430
gwtlktinputmodule::gwtlkt_auxiliary
type(inputparamdefinitiontype), parameter gwtlkt_auxiliary
Definition: gwt-lktidm.f90:87
gwtlktinputmodule::gwtlkt_budget
type(inputparamdefinitiontype), parameter gwtlkt_budget
Definition: gwt-lktidm.f90:297
gwtlktinputmodule::gwtlkt_auxname
type(inputparamdefinitiontype), parameter gwtlkt_auxname
Definition: gwt-lktidm.f90:810
gwtlktinputmodule::gwtlkt_runoff
type(inputparamdefinitiontype), parameter gwtlkt_runoff
Definition: gwt-lktidm.f90:734
gwtlktinputmodule::gwtlkt_laksetting
type(inputparamdefinitiontype), parameter gwtlkt_laksetting
Definition: gwt-lktidm.f90:932
gwtlktinputmodule::gwtlkt_options_concentration
type(inputparamdefinitiontype), parameter gwtlkt_options_concentration
Definition: gwt-lktidm.f90:240
gwtlktinputmodule::gwt_lkt_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public gwt_lkt_block_definitions
Definition: gwt-lktidm.f90:960
gwtlktinputmodule::gwtlkt_budgetcsvfile
type(inputparamdefinitiontype), parameter gwtlkt_budgetcsvfile
Definition: gwt-lktidm.f90:392
gwtlktinputmodule::gwtlkt_budcsvfilerec
type(inputparamdefinitiontype), parameter gwtlkt_budcsvfilerec
Definition: gwt-lktidm.f90:354
gwtlktinputmodule::gwtlkt_auxiliaryrecord
type(inputparamdefinitiontype), parameter gwtlkt_auxiliaryrecord
Definition: gwt-lktidm.f90:772
gwtlktinputmodule::gwtlkt_auxval
type(inputparamdefinitiontype), parameter gwtlkt_auxval
Definition: gwt-lktidm.f90:829
gwtlktinputmodule::gwtlkt_budfilerec
type(inputparamdefinitiontype), parameter gwtlkt_budfilerec
Definition: gwt-lktidm.f90:278
gwtlktinputmodule::gwtlkt_packagedata
type(inputparamdefinitiontype), parameter gwtlkt_packagedata
Definition: gwt-lktidm.f90:894
gwtlktinputmodule::gwtlkt_flow_pkg_name
type(inputparamdefinitiontype), parameter gwtlkt_flow_pkg_name
Definition: gwt-lktidm.f90:68
gwtlktinputmodule::gwtlkt_obs_filerecord
type(inputparamdefinitiontype), parameter gwtlkt_obs_filerecord
Definition: gwt-lktidm.f90:487
gwtlktinputmodule::gwtlkt_fp_aux_name
type(inputparamdefinitiontype), parameter gwtlkt_fp_aux_name
Definition: gwt-lktidm.f90:106
gwtlktinputmodule::gwtlkt_boundnames
type(inputparamdefinitiontype), parameter gwtlkt_boundnames
Definition: gwt-lktidm.f90:126
gwtlktinputmodule::gwt_lkt_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwt_lkt_param_definitions
Definition: gwt-lktidm.f90:848
gwtlktinputmodule::gwt_lkt_multi_package
logical, public gwt_lkt_multi_package
Definition: gwt-lktidm.f90:59
gwtlktinputmodule::gwtlkt_ts6_filename
type(inputparamdefinitiontype), parameter gwtlkt_ts6_filename
Definition: gwt-lktidm.f90:468
gwtlktinputmodule::gwt_lkt_is_advanced
logical, public gwt_lkt_is_advanced
Definition: gwt-lktidm.f90:60
gwtlktinputmodule::gwt_lkt_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwt_lkt_aggregate_definitions
Definition: gwt-lktidm.f90:952
gwtlktinputmodule::gwtlkt_iprpak
type(inputparamdefinitiontype), parameter gwtlkt_iprpak
Definition: gwt-lktidm.f90:145
gwtlktinputmodule::gwtlkt_obs6_filename
type(inputparamdefinitiontype), parameter gwtlkt_obs6_filename
Definition: gwt-lktidm.f90:525
gwtlktinputmodule::gwtlkt_iprflow
type(inputparamdefinitiontype), parameter gwtlkt_iprflow
Definition: gwt-lktidm.f90:183
gwtlktinputmodule::gwt_lkt_subpackages
character(len=16), dimension(*), parameter, public gwt_lkt_subpackages
Definition: gwt-lktidm.f90:62
gwtlktinputmodule::gwtlkt_concentration
type(inputparamdefinitiontype), parameter gwtlkt_concentration
Definition: gwt-lktidm.f90:677
gwtlktinputmodule::gwtlkt_ext_inflow
type(inputparamdefinitiontype), parameter gwtlkt_ext_inflow
Definition: gwt-lktidm.f90:753
gwtlktinputmodule::gwtlkt_aux
type(inputparamdefinitiontype), parameter gwtlkt_aux
Definition: gwt-lktidm.f90:601
gwtlktinputmodule::gwtlkt_iprconc
type(inputparamdefinitiontype), parameter gwtlkt_iprconc
Definition: gwt-lktidm.f90:164
gwtlktinputmodule::gwtlkt_filein
type(inputparamdefinitiontype), parameter gwtlkt_filein
Definition: gwt-lktidm.f90:449
gwtlktinputmodule::gwtlkt_obs6
type(inputparamdefinitiontype), parameter gwtlkt_obs6
Definition: gwt-lktidm.f90:506
gwtlktinputmodule::gwtlkt_evaporation
type(inputparamdefinitiontype), parameter gwtlkt_evaporation
Definition: gwt-lktidm.f90:715
gwtlktinputmodule::gwtlkt_strt
type(inputparamdefinitiontype), parameter gwtlkt_strt
Definition: gwt-lktidm.f90:582
gwtlktinputmodule::gwtlkt_conc_filerec
type(inputparamdefinitiontype), parameter gwtlkt_conc_filerec
Definition: gwt-lktidm.f90:221
gwtlktinputmodule::gwtlkt_budgetfile
type(inputparamdefinitiontype), parameter gwtlkt_budgetfile
Definition: gwt-lktidm.f90:335
gwtlktinputmodule::gwtlkt_status
type(inputparamdefinitiontype), parameter gwtlkt_status
Definition: gwt-lktidm.f90:658
inputdefinitionmodule
Input definition module.
Definition: InputDefinition.f90:7
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