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