MODFLOW 6  version 6.7.0.dev3
USGS Modular Hydrologic Model
gwf-evtaidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
3  use constantsmodule, only: lenvarname
6  private
13 
15  logical :: readasarrays = .false.
16  logical :: fixed_cell = .false.
17  logical :: auxiliary = .false.
18  logical :: auxmultname = .false.
19  logical :: iprpak = .false.
20  logical :: iprflow = .false.
21  logical :: ipakcb = .false.
22  logical :: tas_filerecord = .false.
23  logical :: tas6 = .false.
24  logical :: filein = .false.
25  logical :: tas6_filename = .false.
26  logical :: obs_filerecord = .false.
27  logical :: obs6 = .false.
28  logical :: obs6_filename = .false.
29  logical :: export_nc = .false.
30  logical :: ievt = .false.
31  logical :: surface = .false.
32  logical :: rate = .false.
33  logical :: depth = .false.
34  logical :: auxvar = .false.
35  end type gwfevtaparamfoundtype
36 
37  logical :: gwf_evta_multi_package = .true.
38 
39  character(len=16), parameter :: &
41  [ &
42  ' ' &
43  ]
44 
45  type(inputparamdefinitiontype), parameter :: &
47  ( &
48  'GWF', & ! component
49  'EVTA', & ! subcomponent
50  'OPTIONS', & ! block
51  'READASARRAYS', & ! tag name
52  'READASARRAYS', & ! fortran variable
53  'KEYWORD', & ! type
54  '', & ! shape
55  'use array-based input', & ! longname
56  .true., & ! required
57  .false., & ! prerelease
58  .false., & ! multi-record
59  .false., & ! preserve case
60  .false., & ! layered
61  .false. & ! timeseries
62  )
63 
64  type(inputparamdefinitiontype), parameter :: &
66  ( &
67  'GWF', & ! component
68  'EVTA', & ! subcomponent
69  'OPTIONS', & ! block
70  'FIXED_CELL', & ! tag name
71  'FIXED_CELL', & ! fortran variable
72  'KEYWORD', & ! type
73  '', & ! shape
74  'if cell is dry do not apply evapotranspiration to underlying cell', & ! longname
75  .false., & ! required
76  .false., & ! prerelease
77  .false., & ! multi-record
78  .false., & ! preserve case
79  .false., & ! layered
80  .false. & ! timeseries
81  )
82 
83  type(inputparamdefinitiontype), parameter :: &
85  ( &
86  'GWF', & ! component
87  'EVTA', & ! subcomponent
88  'OPTIONS', & ! block
89  'AUXILIARY', & ! tag name
90  'AUXILIARY', & ! fortran variable
91  'STRING', & ! type
92  'NAUX', & ! shape
93  'keyword to specify aux variables', & ! longname
94  .false., & ! required
95  .false., & ! prerelease
96  .false., & ! multi-record
97  .false., & ! preserve case
98  .false., & ! layered
99  .false. & ! timeseries
100  )
101 
102  type(inputparamdefinitiontype), parameter :: &
104  ( &
105  'GWF', & ! component
106  'EVTA', & ! subcomponent
107  'OPTIONS', & ! block
108  'AUXMULTNAME', & ! tag name
109  'AUXMULTNAME', & ! fortran variable
110  'STRING', & ! type
111  '', & ! shape
112  'name of auxiliary variable for multiplier', & ! longname
113  .false., & ! required
114  .false., & ! prerelease
115  .false., & ! multi-record
116  .false., & ! preserve case
117  .false., & ! layered
118  .false. & ! timeseries
119  )
120 
121  type(inputparamdefinitiontype), parameter :: &
123  ( &
124  'GWF', & ! component
125  'EVTA', & ! subcomponent
126  'OPTIONS', & ! block
127  'PRINT_INPUT', & ! tag name
128  'IPRPAK', & ! fortran variable
129  'KEYWORD', & ! type
130  '', & ! shape
131  'print input to listing file', & ! longname
132  .false., & ! required
133  .false., & ! prerelease
134  .false., & ! multi-record
135  .false., & ! preserve case
136  .false., & ! layered
137  .false. & ! timeseries
138  )
139 
140  type(inputparamdefinitiontype), parameter :: &
142  ( &
143  'GWF', & ! component
144  'EVTA', & ! subcomponent
145  'OPTIONS', & ! block
146  'PRINT_FLOWS', & ! tag name
147  'IPRFLOW', & ! fortran variable
148  'KEYWORD', & ! type
149  '', & ! shape
150  'print evapotranspiration rates to listing file', & ! longname
151  .false., & ! required
152  .false., & ! prerelease
153  .false., & ! multi-record
154  .false., & ! preserve case
155  .false., & ! layered
156  .false. & ! timeseries
157  )
158 
159  type(inputparamdefinitiontype), parameter :: &
161  ( &
162  'GWF', & ! component
163  'EVTA', & ! subcomponent
164  'OPTIONS', & ! block
165  'SAVE_FLOWS', & ! tag name
166  'IPAKCB', & ! fortran variable
167  'KEYWORD', & ! type
168  '', & ! shape
169  'save CHD flows to budget file', & ! longname
170  .false., & ! required
171  .false., & ! prerelease
172  .false., & ! multi-record
173  .false., & ! preserve case
174  .false., & ! layered
175  .false. & ! timeseries
176  )
177 
178  type(inputparamdefinitiontype), parameter :: &
180  ( &
181  'GWF', & ! component
182  'EVTA', & ! subcomponent
183  'OPTIONS', & ! block
184  'TAS_FILERECORD', & ! tag name
185  'TAS_FILERECORD', & ! fortran variable
186  'RECORD TAS6 FILEIN TAS6_FILENAME', & ! type
187  '', & ! shape
188  '', & ! longname
189  .false., & ! required
190  .false., & ! prerelease
191  .false., & ! multi-record
192  .false., & ! preserve case
193  .false., & ! layered
194  .false. & ! timeseries
195  )
196 
197  type(inputparamdefinitiontype), parameter :: &
199  ( &
200  'GWF', & ! component
201  'EVTA', & ! subcomponent
202  'OPTIONS', & ! block
203  'TAS6', & ! tag name
204  'TAS6', & ! fortran variable
205  'KEYWORD', & ! type
206  '', & ! shape
207  'head keyword', & ! longname
208  .true., & ! required
209  .false., & ! prerelease
210  .true., & ! multi-record
211  .false., & ! preserve case
212  .false., & ! layered
213  .false. & ! timeseries
214  )
215 
216  type(inputparamdefinitiontype), parameter :: &
218  ( &
219  'GWF', & ! component
220  'EVTA', & ! subcomponent
221  'OPTIONS', & ! block
222  'FILEIN', & ! tag name
223  'FILEIN', & ! fortran variable
224  'KEYWORD', & ! type
225  '', & ! shape
226  'file keyword', & ! longname
227  .true., & ! required
228  .false., & ! prerelease
229  .true., & ! multi-record
230  .false., & ! preserve case
231  .false., & ! layered
232  .false. & ! timeseries
233  )
234 
235  type(inputparamdefinitiontype), parameter :: &
237  ( &
238  'GWF', & ! component
239  'EVTA', & ! subcomponent
240  'OPTIONS', & ! block
241  'TAS6_FILENAME', & ! tag name
242  'TAS6_FILENAME', & ! fortran variable
243  'STRING', & ! type
244  '', & ! shape
245  'file name of time series information', & ! longname
246  .true., & ! required
247  .false., & ! prerelease
248  .true., & ! multi-record
249  .true., & ! preserve case
250  .false., & ! layered
251  .false. & ! timeseries
252  )
253 
254  type(inputparamdefinitiontype), parameter :: &
256  ( &
257  'GWF', & ! component
258  'EVTA', & ! subcomponent
259  'OPTIONS', & ! block
260  'OBS_FILERECORD', & ! tag name
261  'OBS_FILERECORD', & ! fortran variable
262  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
263  '', & ! shape
264  '', & ! longname
265  .false., & ! required
266  .false., & ! prerelease
267  .false., & ! multi-record
268  .false., & ! preserve case
269  .false., & ! layered
270  .false. & ! timeseries
271  )
272 
273  type(inputparamdefinitiontype), parameter :: &
275  ( &
276  'GWF', & ! component
277  'EVTA', & ! subcomponent
278  'OPTIONS', & ! block
279  'OBS6', & ! tag name
280  'OBS6', & ! fortran variable
281  'KEYWORD', & ! type
282  '', & ! shape
283  'obs keyword', & ! longname
284  .true., & ! required
285  .false., & ! prerelease
286  .true., & ! multi-record
287  .false., & ! preserve case
288  .false., & ! layered
289  .false. & ! timeseries
290  )
291 
292  type(inputparamdefinitiontype), parameter :: &
294  ( &
295  'GWF', & ! component
296  'EVTA', & ! subcomponent
297  'OPTIONS', & ! block
298  'OBS6_FILENAME', & ! tag name
299  'OBS6_FILENAME', & ! fortran variable
300  'STRING', & ! type
301  '', & ! shape
302  'obs6 input filename', & ! longname
303  .true., & ! required
304  .false., & ! prerelease
305  .true., & ! multi-record
306  .true., & ! preserve case
307  .false., & ! layered
308  .false. & ! timeseries
309  )
310 
311  type(inputparamdefinitiontype), parameter :: &
313  ( &
314  'GWF', & ! component
315  'EVTA', & ! subcomponent
316  'OPTIONS', & ! block
317  'EXPORT_ARRAY_NETCDF', & ! tag name
318  'EXPORT_NC', & ! fortran variable
319  'KEYWORD', & ! type
320  '', & ! shape
321  'export array variables to netcdf output files.', & ! longname
322  .false., & ! required
323  .false., & ! prerelease
324  .false., & ! multi-record
325  .false., & ! preserve case
326  .false., & ! layered
327  .false. & ! timeseries
328  )
329 
330  type(inputparamdefinitiontype), parameter :: &
332  ( &
333  'GWF', & ! component
334  'EVTA', & ! subcomponent
335  'PERIOD', & ! block
336  'IEVT', & ! tag name
337  'IEVT', & ! fortran variable
338  'INTEGER1D', & ! type
339  'NCPL', & ! shape
340  'layer number for evapotranspiration', & ! longname
341  .false., & ! required
342  .false., & ! prerelease
343  .false., & ! multi-record
344  .false., & ! preserve case
345  .false., & ! layered
346  .false. & ! timeseries
347  )
348 
349  type(inputparamdefinitiontype), parameter :: &
351  ( &
352  'GWF', & ! component
353  'EVTA', & ! subcomponent
354  'PERIOD', & ! block
355  'SURFACE', & ! tag name
356  'SURFACE', & ! fortran variable
357  'DOUBLE1D', & ! type
358  'NCPL', & ! shape
359  'evapotranspiration surface', & ! longname
360  .true., & ! required
361  .false., & ! prerelease
362  .false., & ! multi-record
363  .false., & ! preserve case
364  .false., & ! layered
365  .false. & ! timeseries
366  )
367 
368  type(inputparamdefinitiontype), parameter :: &
370  ( &
371  'GWF', & ! component
372  'EVTA', & ! subcomponent
373  'PERIOD', & ! block
374  'RATE', & ! tag name
375  'RATE', & ! fortran variable
376  'DOUBLE1D', & ! type
377  'NCPL', & ! shape
378  'evapotranspiration surface', & ! longname
379  .true., & ! required
380  .false., & ! prerelease
381  .false., & ! multi-record
382  .false., & ! preserve case
383  .false., & ! layered
384  .true. & ! timeseries
385  )
386 
387  type(inputparamdefinitiontype), parameter :: &
389  ( &
390  'GWF', & ! component
391  'EVTA', & ! subcomponent
392  'PERIOD', & ! block
393  'DEPTH', & ! tag name
394  'DEPTH', & ! fortran variable
395  'DOUBLE1D', & ! type
396  'NCPL', & ! shape
397  'extinction depth', & ! longname
398  .true., & ! required
399  .false., & ! prerelease
400  .false., & ! multi-record
401  .false., & ! preserve case
402  .false., & ! layered
403  .false. & ! timeseries
404  )
405 
406  type(inputparamdefinitiontype), parameter :: &
408  ( &
409  'GWF', & ! component
410  'EVTA', & ! subcomponent
411  'PERIOD', & ! block
412  'AUX', & ! tag name
413  'AUXVAR', & ! fortran variable
414  'DOUBLE2D', & ! type
415  'NAUX NCPL', & ! shape
416  'evapotranspiration auxiliary variable iaux', & ! longname
417  .true., & ! required
418  .false., & ! prerelease
419  .false., & ! multi-record
420  .false., & ! preserve case
421  .false., & ! layered
422  .true. & ! timeseries
423  )
424 
425  type(inputparamdefinitiontype), parameter :: &
427  [ &
432  gwfevta_iprpak, &
433  gwfevta_iprflow, &
434  gwfevta_ipakcb, &
436  gwfevta_tas6, &
437  gwfevta_filein, &
440  gwfevta_obs6, &
443  gwfevta_ievt, &
444  gwfevta_surface, &
445  gwfevta_rate, &
446  gwfevta_depth, &
448  ]
449 
450  type(inputparamdefinitiontype), parameter :: &
452  [ &
454  ( &
455  '', & ! component
456  '', & ! subcomponent
457  '', & ! block
458  '', & ! tag name
459  '', & ! fortran variable
460  '', & ! type
461  '', & ! shape
462  '', & ! longname
463  .false., & ! required
464  .false., & ! prerelease
465  .false., & ! multi-record
466  .false., & ! preserve case
467  .false., & ! layered
468  .false. & ! timeseries
469  ) &
470  ]
471 
472  type(inputblockdefinitiontype), parameter :: &
474  [ &
476  'OPTIONS', & ! blockname
477  .true., & ! required
478  .false., & ! aggregate
479  .false. & ! block_variable
480  ), &
482  'PERIOD', & ! blockname
483  .true., & ! required
484  .false., & ! aggregate
485  .true. & ! block_variable
486  ) &
487  ]
488 
489 end module gwfevtainputmodule
This module contains simulation constants.
Definition: Constants.f90:9
integer(i4b), parameter lenvarname
maximum length of a variable name
Definition: Constants.f90:17
type(inputparamdefinitiontype), parameter gwfevta_rate
type(inputparamdefinitiontype), parameter gwfevta_obs6
type(inputparamdefinitiontype), parameter gwfevta_auxiliary
Definition: gwf-evtaidm.f90:83
type(inputparamdefinitiontype), parameter gwfevta_obs6_filename
type(inputparamdefinitiontype), parameter gwfevta_tas_filerecord
character(len=16), dimension(*), parameter, public gwf_evta_subpackages
Definition: gwf-evtaidm.f90:39
type(inputparamdefinitiontype), parameter gwfevta_readasarrays
Definition: gwf-evtaidm.f90:45
type(inputparamdefinitiontype), parameter gwfevta_obs_filerecord
type(inputparamdefinitiontype), parameter gwfevta_ipakcb
type(inputparamdefinitiontype), parameter gwfevta_fixed_cell
Definition: gwf-evtaidm.f90:64
type(inputparamdefinitiontype), parameter gwfevta_tas6
type(inputparamdefinitiontype), parameter gwfevta_filein
type(inputparamdefinitiontype), parameter gwfevta_iprpak
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_evta_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_evta_aggregate_definitions
type(inputparamdefinitiontype), parameter gwfevta_auxmultname
type(inputparamdefinitiontype), parameter gwfevta_surface
type(inputblockdefinitiontype), dimension(*), parameter, public gwf_evta_block_definitions
type(inputparamdefinitiontype), parameter gwfevta_depth
type(inputparamdefinitiontype), parameter gwfevta_ievt
type(inputparamdefinitiontype), parameter gwfevta_export_nc
type(inputparamdefinitiontype), parameter gwfevta_auxvar
type(inputparamdefinitiontype), parameter gwfevta_iprflow
type(inputparamdefinitiontype), parameter gwfevta_tas6_filename
logical, public gwf_evta_multi_package
Definition: gwf-evtaidm.f90:37
This module contains the InputDefinitionModule.