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