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