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