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