MODFLOW 6  version 6.5.0.dev2
MODFLOW 6 Code Documentation
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 
13  type gwfrchaparamfoundtype
14  logical :: readasarrays = .false.
15  logical :: fixed_cell = .false.
16  logical :: auxiliary = .false.
17  logical :: auxmultname = .false.
18  logical :: iprpak = .false.
19  logical :: iprflow = .false.
20  logical :: ipakcb = .false.
21  logical :: tas_filerecord = .false.
22  logical :: tas6 = .false.
23  logical :: filein = .false.
24  logical :: tas6_filename = .false.
25  logical :: obs_filerecord = .false.
26  logical :: obs6 = .false.
27  logical :: obs6_filename = .false.
28  logical :: irch = .false.
29  logical :: recharge = .false.
30  logical :: auxvar = .false.
31  end type gwfrchaparamfoundtype
32 
33  logical :: gwf_rcha_multi_package = .true.
34 
35  type(inputparamdefinitiontype), parameter :: &
36  gwfrcha_readasarrays = inputparamdefinitiontype &
37  ( &
38  'GWF', & ! component
39  'RCHA', & ! subcomponent
40  'OPTIONS', & ! block
41  'READASARRAYS', & ! tag name
42  'READASARRAYS', & ! fortran variable
43  'KEYWORD', & ! type
44  '', & ! shape
45  .true., & ! required
46  .false., & ! multi-record
47  .false., & ! preserve case
48  .false., & ! layered
49  .false. & ! timeseries
50  )
51 
52  type(inputparamdefinitiontype), parameter :: &
53  gwfrcha_fixed_cell = inputparamdefinitiontype &
54  ( &
55  'GWF', & ! component
56  'RCHA', & ! subcomponent
57  'OPTIONS', & ! block
58  'FIXED_CELL', & ! tag name
59  'FIXED_CELL', & ! fortran variable
60  'KEYWORD', & ! type
61  '', & ! shape
62  .false., & ! required
63  .false., & ! multi-record
64  .false., & ! preserve case
65  .false., & ! layered
66  .false. & ! timeseries
67  )
68 
69  type(inputparamdefinitiontype), parameter :: &
70  gwfrcha_auxiliary = inputparamdefinitiontype &
71  ( &
72  'GWF', & ! component
73  'RCHA', & ! subcomponent
74  'OPTIONS', & ! block
75  'AUXILIARY', & ! tag name
76  'AUXILIARY', & ! fortran variable
77  'STRING', & ! type
78  'NAUX', & ! shape
79  .false., & ! required
80  .false., & ! multi-record
81  .false., & ! preserve case
82  .false., & ! layered
83  .false. & ! timeseries
84  )
85 
86  type(inputparamdefinitiontype), parameter :: &
87  gwfrcha_auxmultname = inputparamdefinitiontype &
88  ( &
89  'GWF', & ! component
90  'RCHA', & ! subcomponent
91  'OPTIONS', & ! block
92  'AUXMULTNAME', & ! tag name
93  'AUXMULTNAME', & ! fortran variable
94  'STRING', & ! type
95  '', & ! shape
96  .false., & ! required
97  .false., & ! multi-record
98  .false., & ! preserve case
99  .false., & ! layered
100  .false. & ! timeseries
101  )
102 
103  type(inputparamdefinitiontype), parameter :: &
104  gwfrcha_iprpak = inputparamdefinitiontype &
105  ( &
106  'GWF', & ! component
107  'RCHA', & ! subcomponent
108  'OPTIONS', & ! block
109  'PRINT_INPUT', & ! tag name
110  'IPRPAK', & ! fortran variable
111  'KEYWORD', & ! type
112  '', & ! shape
113  .false., & ! required
114  .false., & ! multi-record
115  .false., & ! preserve case
116  .false., & ! layered
117  .false. & ! timeseries
118  )
119 
120  type(inputparamdefinitiontype), parameter :: &
121  gwfrcha_iprflow = inputparamdefinitiontype &
122  ( &
123  'GWF', & ! component
124  'RCHA', & ! subcomponent
125  'OPTIONS', & ! block
126  'PRINT_FLOWS', & ! tag name
127  'IPRFLOW', & ! fortran variable
128  'KEYWORD', & ! type
129  '', & ! shape
130  .false., & ! required
131  .false., & ! multi-record
132  .false., & ! preserve case
133  .false., & ! layered
134  .false. & ! timeseries
135  )
136 
137  type(inputparamdefinitiontype), parameter :: &
138  gwfrcha_ipakcb = inputparamdefinitiontype &
139  ( &
140  'GWF', & ! component
141  'RCHA', & ! subcomponent
142  'OPTIONS', & ! block
143  'SAVE_FLOWS', & ! tag name
144  'IPAKCB', & ! fortran variable
145  'KEYWORD', & ! type
146  '', & ! shape
147  .false., & ! required
148  .false., & ! multi-record
149  .false., & ! preserve case
150  .false., & ! layered
151  .false. & ! timeseries
152  )
153 
154  type(inputparamdefinitiontype), parameter :: &
155  gwfrcha_tas_filerecord = inputparamdefinitiontype &
156  ( &
157  'GWF', & ! component
158  'RCHA', & ! subcomponent
159  'OPTIONS', & ! block
160  'TAS_FILERECORD', & ! tag name
161  'TAS_FILERECORD', & ! fortran variable
162  'RECORD TAS6 FILEIN TAS6_FILENAME', & ! type
163  '', & ! shape
164  .false., & ! required
165  .false., & ! multi-record
166  .false., & ! preserve case
167  .false., & ! layered
168  .false. & ! timeseries
169  )
170 
171  type(inputparamdefinitiontype), parameter :: &
172  gwfrcha_tas6 = inputparamdefinitiontype &
173  ( &
174  'GWF', & ! component
175  'RCHA', & ! subcomponent
176  'OPTIONS', & ! block
177  'TAS6', & ! tag name
178  'TAS6', & ! fortran variable
179  'KEYWORD', & ! type
180  '', & ! shape
181  .true., & ! required
182  .true., & ! multi-record
183  .false., & ! preserve case
184  .false., & ! layered
185  .false. & ! timeseries
186  )
187 
188  type(inputparamdefinitiontype), parameter :: &
189  gwfrcha_filein = inputparamdefinitiontype &
190  ( &
191  'GWF', & ! component
192  'RCHA', & ! subcomponent
193  'OPTIONS', & ! block
194  'FILEIN', & ! tag name
195  'FILEIN', & ! fortran variable
196  'KEYWORD', & ! type
197  '', & ! shape
198  .true., & ! required
199  .true., & ! multi-record
200  .false., & ! preserve case
201  .false., & ! layered
202  .false. & ! timeseries
203  )
204 
205  type(inputparamdefinitiontype), parameter :: &
206  gwfrcha_tas6_filename = inputparamdefinitiontype &
207  ( &
208  'GWF', & ! component
209  'RCHA', & ! subcomponent
210  'OPTIONS', & ! block
211  'TAS6_FILENAME', & ! tag name
212  'TAS6_FILENAME', & ! fortran variable
213  'STRING', & ! type
214  '', & ! shape
215  .true., & ! required
216  .true., & ! multi-record
217  .true., & ! preserve case
218  .false., & ! layered
219  .false. & ! timeseries
220  )
221 
222  type(inputparamdefinitiontype), parameter :: &
223  gwfrcha_obs_filerecord = inputparamdefinitiontype &
224  ( &
225  'GWF', & ! component
226  'RCHA', & ! subcomponent
227  'OPTIONS', & ! block
228  'OBS_FILERECORD', & ! tag name
229  'OBS_FILERECORD', & ! fortran variable
230  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
231  '', & ! shape
232  .false., & ! required
233  .false., & ! multi-record
234  .false., & ! preserve case
235  .false., & ! layered
236  .false. & ! timeseries
237  )
238 
239  type(inputparamdefinitiontype), parameter :: &
240  gwfrcha_obs6 = inputparamdefinitiontype &
241  ( &
242  'GWF', & ! component
243  'RCHA', & ! subcomponent
244  'OPTIONS', & ! block
245  'OBS6', & ! tag name
246  'OBS6', & ! fortran variable
247  'KEYWORD', & ! type
248  '', & ! shape
249  .true., & ! required
250  .true., & ! multi-record
251  .false., & ! preserve case
252  .false., & ! layered
253  .false. & ! timeseries
254  )
255 
256  type(inputparamdefinitiontype), parameter :: &
257  gwfrcha_obs6_filename = inputparamdefinitiontype &
258  ( &
259  'GWF', & ! component
260  'RCHA', & ! subcomponent
261  'OPTIONS', & ! block
262  'OBS6_FILENAME', & ! tag name
263  'OBS6_FILENAME', & ! fortran variable
264  'STRING', & ! type
265  '', & ! shape
266  .true., & ! required
267  .true., & ! multi-record
268  .true., & ! preserve case
269  .false., & ! layered
270  .false. & ! timeseries
271  )
272 
273  type(inputparamdefinitiontype), parameter :: &
274  gwfrcha_irch = inputparamdefinitiontype &
275  ( &
276  'GWF', & ! component
277  'RCHA', & ! subcomponent
278  'PERIOD', & ! block
279  'IRCH', & ! tag name
280  'IRCH', & ! fortran variable
281  'INTEGER1D', & ! type
282  'NCPL', & ! shape
283  .false., & ! required
284  .false., & ! multi-record
285  .false., & ! preserve case
286  .false., & ! layered
287  .false. & ! timeseries
288  )
289 
290  type(inputparamdefinitiontype), parameter :: &
291  gwfrcha_recharge = inputparamdefinitiontype &
292  ( &
293  'GWF', & ! component
294  'RCHA', & ! subcomponent
295  'PERIOD', & ! block
296  'RECHARGE', & ! tag name
297  'RECHARGE', & ! fortran variable
298  'DOUBLE1D', & ! type
299  'NCPL', & ! shape
300  .true., & ! required
301  .false., & ! multi-record
302  .false., & ! preserve case
303  .false., & ! layered
304  .true. & ! timeseries
305  )
306 
307  type(inputparamdefinitiontype), parameter :: &
308  gwfrcha_auxvar = inputparamdefinitiontype &
309  ( &
310  'GWF', & ! component
311  'RCHA', & ! subcomponent
312  'PERIOD', & ! block
313  'AUX', & ! tag name
314  'AUXVAR', & ! fortran variable
315  'DOUBLE2D', & ! type
316  'NAUX NCPL', & ! shape
317  .false., & ! required
318  .false., & ! multi-record
319  .false., & ! preserve case
320  .false., & ! layered
321  .true. & ! timeseries
322  )
323 
324  type(inputparamdefinitiontype), parameter :: &
325  gwf_rcha_param_definitions(*) = &
326  [ &
327  gwfrcha_readasarrays, &
328  gwfrcha_fixed_cell, &
329  gwfrcha_auxiliary, &
330  gwfrcha_auxmultname, &
331  gwfrcha_iprpak, &
332  gwfrcha_iprflow, &
333  gwfrcha_ipakcb, &
334  gwfrcha_tas_filerecord, &
335  gwfrcha_tas6, &
336  gwfrcha_filein, &
337  gwfrcha_tas6_filename, &
338  gwfrcha_obs_filerecord, &
339  gwfrcha_obs6, &
340  gwfrcha_obs6_filename, &
341  gwfrcha_irch, &
342  gwfrcha_recharge, &
343  gwfrcha_auxvar &
344  ]
345 
346  type(inputparamdefinitiontype), parameter :: &
347  gwf_rcha_aggregate_definitions(*) = &
348  [ &
349  inputparamdefinitiontype &
350  ( &
351  '', & ! component
352  '', & ! subcomponent
353  '', & ! block
354  '', & ! tag name
355  '', & ! fortran variable
356  '', & ! type
357  '', & ! shape
358  .false., & ! required
359  .false., & ! multi-record
360  .false., & ! preserve case
361  .false., & ! layered
362  .false. & ! timeseries
363  ) &
364  ]
365 
366  type(inputblockdefinitiontype), parameter :: &
367  gwf_rcha_block_definitions(*) = &
368  [ &
369  inputblockdefinitiontype( &
370  'OPTIONS', & ! blockname
371  .true., & ! required
372  .false., & ! aggregate
373  .false. & ! block_variable
374  ), &
375  inputblockdefinitiontype( &
376  'PERIOD', & ! blockname
377  .true., & ! required
378  .false., & ! aggregate
379  .true. & ! block_variable
380  ) &
381  ]
382 
383 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:205
gwfrchainputmodule::gwfrcha_auxvar
type(inputparamdefinitiontype), parameter gwfrcha_auxvar
Definition: gwf-rchaidm.f90:307
gwfrchainputmodule::gwfrcha_obs6
type(inputparamdefinitiontype), parameter gwfrcha_obs6
Definition: gwf-rchaidm.f90:239
gwfrchainputmodule::gwfrcha_irch
type(inputparamdefinitiontype), parameter gwfrcha_irch
Definition: gwf-rchaidm.f90:273
gwfrchainputmodule::gwfrcha_iprflow
type(inputparamdefinitiontype), parameter gwfrcha_iprflow
Definition: gwf-rchaidm.f90:120
gwfrchainputmodule::gwfrcha_auxmultname
type(inputparamdefinitiontype), parameter gwfrcha_auxmultname
Definition: gwf-rchaidm.f90:86
gwfrchainputmodule::gwfrcha_auxiliary
type(inputparamdefinitiontype), parameter gwfrcha_auxiliary
Definition: gwf-rchaidm.f90:69
gwfrchainputmodule::gwf_rcha_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_rcha_aggregate_definitions
Definition: gwf-rchaidm.f90:346
gwfrchainputmodule::gwfrcha_fixed_cell
type(inputparamdefinitiontype), parameter gwfrcha_fixed_cell
Definition: gwf-rchaidm.f90:52
gwfrchainputmodule::gwfrcha_recharge
type(inputparamdefinitiontype), parameter gwfrcha_recharge
Definition: gwf-rchaidm.f90:290
gwfrchainputmodule::gwf_rcha_multi_package
logical, public gwf_rcha_multi_package
Definition: gwf-rchaidm.f90:33
gwfrchainputmodule::gwfrcha_tas6
type(inputparamdefinitiontype), parameter gwfrcha_tas6
Definition: gwf-rchaidm.f90:171
gwfrchainputmodule::gwfrcha_obs_filerecord
type(inputparamdefinitiontype), parameter gwfrcha_obs_filerecord
Definition: gwf-rchaidm.f90:222
gwfrchainputmodule::gwfrcha_iprpak
type(inputparamdefinitiontype), parameter gwfrcha_iprpak
Definition: gwf-rchaidm.f90:103
gwfrchainputmodule::gwf_rcha_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public gwf_rcha_param_definitions
Definition: gwf-rchaidm.f90:324
gwfrchainputmodule::gwfrcha_ipakcb
type(inputparamdefinitiontype), parameter gwfrcha_ipakcb
Definition: gwf-rchaidm.f90:137
gwfrchainputmodule::gwfrcha_filein
type(inputparamdefinitiontype), parameter gwfrcha_filein
Definition: gwf-rchaidm.f90:188
gwfrchainputmodule::gwf_rcha_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public gwf_rcha_block_definitions
Definition: gwf-rchaidm.f90:366
gwfrchainputmodule::gwfrcha_obs6_filename
type(inputparamdefinitiontype), parameter gwfrcha_obs6_filename
Definition: gwf-rchaidm.f90:256
gwfrchainputmodule::gwfrcha_tas_filerecord
type(inputparamdefinitiontype), parameter gwfrcha_tas_filerecord
Definition: gwf-rchaidm.f90:154
gwfrchainputmodule::gwfrcha_readasarrays
type(inputparamdefinitiontype), parameter gwfrcha_readasarrays
Definition: gwf-rchaidm.f90:35
inputdefinitionmodule
This module contains the InputDefinitionModule.
Definition: InputDefinition.f90:7