MODFLOW 6  version 6.9.0.dev0
USGS Modular Hydrologic Model
gwf-rchidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module gwfrchinputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public gwf_rch_param_definitions
8  public gwf_rch_aggregate_definitions
9  public gwf_rch_block_definitions
10  public gwfrchparamfoundtype
11  public gwf_rch_multi_package
12  public gwf_rch_is_advanced
13  public gwf_rch_subpackages
14 
15  type gwfrchparamfoundtype
16  logical :: fixed_cell = .false.
17  logical :: auxiliary = .false.
18  logical :: auxmultname = .false.
19  logical :: boundnames = .false.
20  logical :: iprpak = .false.
21  logical :: iprflow = .false.
22  logical :: ipakcb = .false.
23  logical :: ts_filerecord = .false.
24  logical :: ts6 = .false.
25  logical :: filein = .false.
26  logical :: ts6_filename = .false.
27  logical :: obs_filerecord = .false.
28  logical :: obs6 = .false.
29  logical :: obs6_filename = .false.
30  logical :: maxbound = .false.
31  logical :: cellid = .false.
32  logical :: recharge = .false.
33  logical :: auxvar = .false.
34  logical :: boundname = .false.
35  end type gwfrchparamfoundtype
36 
37  logical :: gwf_rch_multi_package = .true.
38  logical :: gwf_rch_is_advanced = .false.
39 
40  character(len=16), parameter :: &
41  gwf_rch_subpackages(*) = &
42  [ &
43  ' ' &
44  ]
45 
46  type(inputparamdefinitiontype), parameter :: &
47  gwfrch_fixed_cell = inputparamdefinitiontype &
48  ( &
49  'GWF', & ! component
50  'RCH', & ! subcomponent
51  'OPTIONS', & ! block
52  'FIXED_CELL', & ! tag name
53  'FIXED_CELL', & ! fortran variable
54  'KEYWORD', & ! type
55  '', & ! shape
56  'if cell is dry do not apply recharge to underlying cell', & ! longname
57  .false., & ! required
58  .false., & ! developmode
59  .false., & ! multi-record
60  .false., & ! preserve case
61  .false., & ! layered
62  .false. & ! timeseries
63  )
64 
65  type(inputparamdefinitiontype), parameter :: &
66  gwfrch_auxiliary = inputparamdefinitiontype &
67  ( &
68  'GWF', & ! component
69  'RCH', & ! subcomponent
70  'OPTIONS', & ! block
71  'AUXILIARY', & ! tag name
72  'AUXILIARY', & ! fortran variable
73  'STRING', & ! type
74  'NAUX', & ! shape
75  'keyword to specify aux variables', & ! longname
76  .false., & ! required
77  .false., & ! developmode
78  .false., & ! multi-record
79  .false., & ! preserve case
80  .false., & ! layered
81  .false. & ! timeseries
82  )
83 
84  type(inputparamdefinitiontype), parameter :: &
85  gwfrch_auxmultname = inputparamdefinitiontype &
86  ( &
87  'GWF', & ! component
88  'RCH', & ! subcomponent
89  'OPTIONS', & ! block
90  'AUXMULTNAME', & ! tag name
91  'AUXMULTNAME', & ! fortran variable
92  'STRING', & ! type
93  '', & ! shape
94  'name of auxiliary variable for multiplier', & ! longname
95  .false., & ! required
96  .false., & ! developmode
97  .false., & ! multi-record
98  .false., & ! preserve case
99  .false., & ! layered
100  .false. & ! timeseries
101  )
102 
103  type(inputparamdefinitiontype), parameter :: &
104  gwfrch_boundnames = inputparamdefinitiontype &
105  ( &
106  'GWF', & ! component
107  'RCH', & ! subcomponent
108  'OPTIONS', & ! block
109  'BOUNDNAMES', & ! tag name
110  'BOUNDNAMES', & ! fortran variable
111  'KEYWORD', & ! type
112  '', & ! shape
113  '', & ! longname
114  .false., & ! required
115  .false., & ! developmode
116  .false., & ! multi-record
117  .false., & ! preserve case
118  .false., & ! layered
119  .false. & ! timeseries
120  )
121 
122  type(inputparamdefinitiontype), parameter :: &
123  gwfrch_iprpak = inputparamdefinitiontype &
124  ( &
125  'GWF', & ! component
126  'RCH', & ! subcomponent
127  'OPTIONS', & ! block
128  'PRINT_INPUT', & ! tag name
129  'IPRPAK', & ! fortran variable
130  'KEYWORD', & ! type
131  '', & ! shape
132  'print input to listing file', & ! longname
133  .false., & ! required
134  .false., & ! developmode
135  .false., & ! multi-record
136  .false., & ! preserve case
137  .false., & ! layered
138  .false. & ! timeseries
139  )
140 
141  type(inputparamdefinitiontype), parameter :: &
142  gwfrch_iprflow = inputparamdefinitiontype &
143  ( &
144  'GWF', & ! component
145  'RCH', & ! subcomponent
146  'OPTIONS', & ! block
147  'PRINT_FLOWS', & ! tag name
148  'IPRFLOW', & ! fortran variable
149  'KEYWORD', & ! type
150  '', & ! shape
151  'print recharge rates to listing file', & ! longname
152  .false., & ! required
153  .false., & ! developmode
154  .false., & ! multi-record
155  .false., & ! preserve case
156  .false., & ! layered
157  .false. & ! timeseries
158  )
159 
160  type(inputparamdefinitiontype), parameter :: &
161  gwfrch_ipakcb = inputparamdefinitiontype &
162  ( &
163  'GWF', & ! component
164  'RCH', & ! subcomponent
165  'OPTIONS', & ! block
166  'SAVE_FLOWS', & ! tag name
167  'IPAKCB', & ! fortran variable
168  'KEYWORD', & ! type
169  '', & ! shape
170  'save recharge to budget file', & ! longname
171  .false., & ! required
172  .false., & ! developmode
173  .false., & ! multi-record
174  .false., & ! preserve case
175  .false., & ! layered
176  .false. & ! timeseries
177  )
178 
179  type(inputparamdefinitiontype), parameter :: &
180  gwfrch_ts_filerecord = inputparamdefinitiontype &
181  ( &
182  'GWF', & ! component
183  'RCH', & ! subcomponent
184  'OPTIONS', & ! block
185  'TS_FILERECORD', & ! tag name
186  'TS_FILERECORD', & ! fortran variable
187  'RECORD TS6 FILEIN TS6_FILENAME', & ! type
188  '', & ! shape
189  '', & ! longname
190  .false., & ! required
191  .false., & ! developmode
192  .false., & ! multi-record
193  .false., & ! preserve case
194  .false., & ! layered
195  .false. & ! timeseries
196  )
197 
198  type(inputparamdefinitiontype), parameter :: &
199  gwfrch_ts6 = inputparamdefinitiontype &
200  ( &
201  'GWF', & ! component
202  'RCH', & ! subcomponent
203  'OPTIONS', & ! block
204  'TS6', & ! tag name
205  'TS6', & ! fortran variable
206  'KEYWORD', & ! type
207  '', & ! shape
208  'head keyword', & ! longname
209  .true., & ! required
210  .false., & ! developmode
211  .true., & ! multi-record
212  .false., & ! preserve case
213  .false., & ! layered
214  .false. & ! timeseries
215  )
216 
217  type(inputparamdefinitiontype), parameter :: &
218  gwfrch_filein = inputparamdefinitiontype &
219  ( &
220  'GWF', & ! component
221  'RCH', & ! subcomponent
222  'OPTIONS', & ! block
223  'FILEIN', & ! tag name
224  'FILEIN', & ! fortran variable
225  'KEYWORD', & ! type
226  '', & ! shape
227  'file keyword', & ! longname
228  .true., & ! required
229  .false., & ! developmode
230  .true., & ! multi-record
231  .false., & ! preserve case
232  .false., & ! layered
233  .false. & ! timeseries
234  )
235 
236  type(inputparamdefinitiontype), parameter :: &
237  gwfrch_ts6_filename = inputparamdefinitiontype &
238  ( &
239  'GWF', & ! component
240  'RCH', & ! subcomponent
241  'OPTIONS', & ! block
242  'TS6_FILENAME', & ! tag name
243  'TS6_FILENAME', & ! fortran variable
244  'STRING', & ! type
245  '', & ! shape
246  'file name of time series information', & ! longname
247  .true., & ! required
248  .false., & ! developmode
249  .true., & ! multi-record
250  .true., & ! preserve case
251  .false., & ! layered
252  .false. & ! timeseries
253  )
254 
255  type(inputparamdefinitiontype), parameter :: &
256  gwfrch_obs_filerecord = inputparamdefinitiontype &
257  ( &
258  'GWF', & ! component
259  'RCH', & ! subcomponent
260  'OPTIONS', & ! block
261  'OBS_FILERECORD', & ! tag name
262  'OBS_FILERECORD', & ! fortran variable
263  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
264  '', & ! shape
265  '', & ! longname
266  .false., & ! required
267  .false., & ! developmode
268  .false., & ! multi-record
269  .false., & ! preserve case
270  .false., & ! layered
271  .false. & ! timeseries
272  )
273 
274  type(inputparamdefinitiontype), parameter :: &
275  gwfrch_obs6 = inputparamdefinitiontype &
276  ( &
277  'GWF', & ! component
278  'RCH', & ! subcomponent
279  'OPTIONS', & ! block
280  'OBS6', & ! tag name
281  'OBS6', & ! fortran variable
282  'KEYWORD', & ! type
283  '', & ! shape
284  'obs keyword', & ! longname
285  .true., & ! required
286  .false., & ! developmode
287  .true., & ! multi-record
288  .false., & ! preserve case
289  .false., & ! layered
290  .false. & ! timeseries
291  )
292 
293  type(inputparamdefinitiontype), parameter :: &
294  gwfrch_obs6_filename = inputparamdefinitiontype &
295  ( &
296  'GWF', & ! component
297  'RCH', & ! subcomponent
298  'OPTIONS', & ! block
299  'OBS6_FILENAME', & ! tag name
300  'OBS6_FILENAME', & ! fortran variable
301  'STRING', & ! type
302  '', & ! shape
303  'obs6 input filename', & ! longname
304  .true., & ! required
305  .false., & ! developmode
306  .true., & ! multi-record
307  .true., & ! preserve case
308  .false., & ! layered
309  .false. & ! timeseries
310  )
311 
312  type(inputparamdefinitiontype), parameter :: &
313  gwfrch_maxbound = inputparamdefinitiontype &
314  ( &
315  'GWF', & ! component
316  'RCH', & ! subcomponent
317  'DIMENSIONS', & ! block
318  'MAXBOUND', & ! tag name
319  'MAXBOUND', & ! fortran variable
320  'INTEGER', & ! type
321  '', & ! shape
322  'maximum number of recharge cells', & ! longname
323  .true., & ! required
324  .false., & ! developmode
325  .false., & ! multi-record
326  .false., & ! preserve case
327  .false., & ! layered
328  .false. & ! timeseries
329  )
330 
331  type(inputparamdefinitiontype), parameter :: &
332  gwfrch_cellid = inputparamdefinitiontype &
333  ( &
334  'GWF', & ! component
335  'RCH', & ! subcomponent
336  'PERIOD', & ! block
337  'CELLID', & ! tag name
338  'CELLID', & ! fortran variable
339  'INTEGER1D', & ! type
340  'NCELLDIM', & ! shape
341  'cell identifier', & ! longname
342  .true., & ! required
343  .false., & ! developmode
344  .true., & ! multi-record
345  .false., & ! preserve case
346  .false., & ! layered
347  .false. & ! timeseries
348  )
349 
350  type(inputparamdefinitiontype), parameter :: &
351  gwfrch_recharge = inputparamdefinitiontype &
352  ( &
353  'GWF', & ! component
354  'RCH', & ! subcomponent
355  'PERIOD', & ! block
356  'RECHARGE', & ! tag name
357  'RECHARGE', & ! fortran variable
358  'DOUBLE', & ! type
359  '', & ! shape
360  'recharge rate', & ! longname
361  .true., & ! required
362  .false., & ! developmode
363  .true., & ! multi-record
364  .false., & ! preserve case
365  .false., & ! layered
366  .true. & ! timeseries
367  )
368 
369  type(inputparamdefinitiontype), parameter :: &
370  gwfrch_auxvar = inputparamdefinitiontype &
371  ( &
372  'GWF', & ! component
373  'RCH', & ! subcomponent
374  'PERIOD', & ! block
375  'AUX', & ! tag name
376  'AUXVAR', & ! fortran variable
377  'DOUBLE1D', & ! type
378  'NAUX', & ! shape
379  'auxiliary variables', & ! longname
380  .false., & ! required
381  .false., & ! developmode
382  .true., & ! multi-record
383  .false., & ! preserve case
384  .false., & ! layered
385  .true. & ! timeseries
386  )
387 
388  type(inputparamdefinitiontype), parameter :: &
389  gwfrch_boundname = inputparamdefinitiontype &
390  ( &
391  'GWF', & ! component
392  'RCH', & ! subcomponent
393  'PERIOD', & ! block
394  'BOUNDNAME', & ! tag name
395  'BOUNDNAME', & ! fortran variable
396  'STRING', & ! type
397  '', & ! shape
398  'recharge name', & ! longname
399  .false., & ! required
400  .false., & ! developmode
401  .true., & ! multi-record
402  .false., & ! preserve case
403  .false., & ! layered
404  .false. & ! timeseries
405  )
406 
407  type(inputparamdefinitiontype), parameter :: &
408  gwf_rch_param_definitions(*) = &
409  [ &
410  gwfrch_fixed_cell, &
411  gwfrch_auxiliary, &
412  gwfrch_auxmultname, &
413  gwfrch_boundnames, &
414  gwfrch_iprpak, &
415  gwfrch_iprflow, &
416  gwfrch_ipakcb, &
417  gwfrch_ts_filerecord, &
418  gwfrch_ts6, &
419  gwfrch_filein, &
420  gwfrch_ts6_filename, &
421  gwfrch_obs_filerecord, &
422  gwfrch_obs6, &
423  gwfrch_obs6_filename, &
424  gwfrch_maxbound, &
425  gwfrch_cellid, &
426  gwfrch_recharge, &
427  gwfrch_auxvar, &
428  gwfrch_boundname &
429  ]
430 
431  type(inputparamdefinitiontype), parameter :: &
432  gwfrch_spd = inputparamdefinitiontype &
433  ( &
434  'GWF', & ! component
435  'RCH', & ! subcomponent
436  'PERIOD', & ! block
437  'STRESS_PERIOD_DATA', & ! tag name
438  'SPD', & ! fortran variable
439  'RECARRAY CELLID RECHARGE AUX BOUNDNAME', & ! type
440  'MAXBOUND', & ! shape
441  '', & ! longname
442  .true., & ! required
443  .false., & ! developmode
444  .false., & ! multi-record
445  .false., & ! preserve case
446  .false., & ! layered
447  .false. & ! timeseries
448  )
449 
450  type(inputparamdefinitiontype), parameter :: &
451  gwf_rch_aggregate_definitions(*) = &
452  [ &
453  gwfrch_spd &
454  ]
455 
456  type(inputblockdefinitiontype), parameter :: &
457  gwf_rch_block_definitions(*) = &
458  [ &
459  inputblockdefinitiontype( &
460  'OPTIONS', & ! blockname
461  .false., & ! required
462  .false., & ! aggregate
463  .false. & ! block_variable
464  ), &
465  inputblockdefinitiontype( &
466  'DIMENSIONS', & ! blockname
467  .true., & ! required
468  .false., & ! aggregate
469  .false. & ! block_variable
470  ), &
471  inputblockdefinitiontype( &
472  'PERIOD', & ! blockname
473  .true., & ! required
474  .true., & ! aggregate
475  .true. & ! block_variable
476  ) &
477  ]
478 
479 end module gwfrchinputmodule
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
gwfrchinputmodule::gwfrch_ts6
type(inputparamdefinitiontype), parameter gwfrch_ts6
Definition: gwf-rchidm.f90:198
gwfrchinputmodule::gwfrch_spd
type(inputparamdefinitiontype), parameter gwfrch_spd
Definition: gwf-rchidm.f90:431
gwfrchinputmodule::gwfrch_obs_filerecord
type(inputparamdefinitiontype), parameter gwfrch_obs_filerecord
Definition: gwf-rchidm.f90:255
gwfrchinputmodule::gwfrch_cellid
type(inputparamdefinitiontype), parameter gwfrch_cellid
Definition: gwf-rchidm.f90:331
gwfrchinputmodule::gwfrch_ts_filerecord
type(inputparamdefinitiontype), parameter gwfrch_ts_filerecord
Definition: gwf-rchidm.f90:179
gwfrchinputmodule::gwf_rch_subpackages
character(len=16), dimension(*), parameter, public gwf_rch_subpackages
Definition: gwf-rchidm.f90:40
gwfrchinputmodule::gwfrch_ts6_filename
type(inputparamdefinitiontype), parameter gwfrch_ts6_filename
Definition: gwf-rchidm.f90:236
gwfrchinputmodule::gwfrch_maxbound
type(inputparamdefinitiontype), parameter gwfrch_maxbound
Definition: gwf-rchidm.f90:312
gwfrchinputmodule::gwf_rch_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public gwf_rch_block_definitions
Definition: gwf-rchidm.f90:456
gwfrchinputmodule::gwfrch_boundnames
type(inputparamdefinitiontype), parameter gwfrch_boundnames
Definition: gwf-rchidm.f90:103
gwfrchinputmodule::gwf_rch_is_advanced
logical, public gwf_rch_is_advanced
Definition: gwf-rchidm.f90:38
gwfrchinputmodule::gwf_rch_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_rch_aggregate_definitions
Definition: gwf-rchidm.f90:450
gwfrchinputmodule::gwfrch_iprpak
type(inputparamdefinitiontype), parameter gwfrch_iprpak
Definition: gwf-rchidm.f90:122
gwfrchinputmodule::gwfrch_auxvar
type(inputparamdefinitiontype), parameter gwfrch_auxvar
Definition: gwf-rchidm.f90:369
gwfrchinputmodule::gwfrch_fixed_cell
type(inputparamdefinitiontype), parameter gwfrch_fixed_cell
Definition: gwf-rchidm.f90:46
gwfrchinputmodule::gwfrch_ipakcb
type(inputparamdefinitiontype), parameter gwfrch_ipakcb
Definition: gwf-rchidm.f90:160
gwfrchinputmodule::gwfrch_filein
type(inputparamdefinitiontype), parameter gwfrch_filein
Definition: gwf-rchidm.f90:217
gwfrchinputmodule::gwfrch_auxmultname
type(inputparamdefinitiontype), parameter gwfrch_auxmultname
Definition: gwf-rchidm.f90:84
gwfrchinputmodule::gwf_rch_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_rch_param_definitions
Definition: gwf-rchidm.f90:407
gwfrchinputmodule::gwfrch_iprflow
type(inputparamdefinitiontype), parameter gwfrch_iprflow
Definition: gwf-rchidm.f90:141
gwfrchinputmodule::gwfrch_recharge
type(inputparamdefinitiontype), parameter gwfrch_recharge
Definition: gwf-rchidm.f90:350
gwfrchinputmodule::gwfrch_auxiliary
type(inputparamdefinitiontype), parameter gwfrch_auxiliary
Definition: gwf-rchidm.f90:65
gwfrchinputmodule::gwfrch_obs6
type(inputparamdefinitiontype), parameter gwfrch_obs6
Definition: gwf-rchidm.f90:274
gwfrchinputmodule::gwfrch_boundname
type(inputparamdefinitiontype), parameter gwfrch_boundname
Definition: gwf-rchidm.f90:388
gwfrchinputmodule::gwfrch_obs6_filename
type(inputparamdefinitiontype), parameter gwfrch_obs6_filename
Definition: gwf-rchidm.f90:293
gwfrchinputmodule::gwf_rch_multi_package
logical, public gwf_rch_multi_package
Definition: gwf-rchidm.f90:37
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