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