MODFLOW 6  version 6.9.0.dev0
USGS Modular Hydrologic Model
chf-cdbidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module chfcdbinputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public chf_cdb_param_definitions
8  public chf_cdb_aggregate_definitions
9  public chf_cdb_block_definitions
10  public chfcdbparamfoundtype
11  public chf_cdb_multi_package
12  public chf_cdb_is_advanced
13  public chf_cdb_subpackages
14 
15  type chfcdbparamfoundtype
16  logical :: auxiliary = .false.
17  logical :: boundnames = .false.
18  logical :: iprpak = .false.
19  logical :: iprflow = .false.
20  logical :: ipakcb = .false.
21  logical :: filein = .false.
22  logical :: obs_filerecord = .false.
23  logical :: obs6 = .false.
24  logical :: obs6_filename = .false.
25  logical :: maxbound = .false.
26  logical :: cellid = .false.
27  logical :: idcxs = .false.
28  logical :: width = .false.
29  logical :: auxvar = .false.
30  logical :: boundname = .false.
31  end type chfcdbparamfoundtype
32 
33  logical :: chf_cdb_multi_package = .true.
34  logical :: chf_cdb_is_advanced = .false.
35 
36  character(len=16), parameter :: &
37  chf_cdb_subpackages(*) = &
38  [ &
39  ' ' &
40  ]
41 
42  type(inputparamdefinitiontype), parameter :: &
43  chfcdb_auxiliary = inputparamdefinitiontype &
44  ( &
45  'CHF', & ! component
46  'CDB', & ! subcomponent
47  'OPTIONS', & ! block
48  'AUXILIARY', & ! tag name
49  'AUXILIARY', & ! fortran variable
50  'STRING', & ! type
51  'NAUX', & ! shape
52  'keyword to specify aux variables', & ! longname
53  .false., & ! required
54  .false., & ! developmode
55  .false., & ! multi-record
56  .false., & ! preserve case
57  .false., & ! layered
58  .false. & ! timeseries
59  )
60 
61  type(inputparamdefinitiontype), parameter :: &
62  chfcdb_boundnames = inputparamdefinitiontype &
63  ( &
64  'CHF', & ! component
65  'CDB', & ! subcomponent
66  'OPTIONS', & ! block
67  'BOUNDNAMES', & ! tag name
68  'BOUNDNAMES', & ! fortran variable
69  'KEYWORD', & ! type
70  '', & ! shape
71  '', & ! longname
72  .false., & ! required
73  .false., & ! developmode
74  .false., & ! multi-record
75  .false., & ! preserve case
76  .false., & ! layered
77  .false. & ! timeseries
78  )
79 
80  type(inputparamdefinitiontype), parameter :: &
81  chfcdb_iprpak = inputparamdefinitiontype &
82  ( &
83  'CHF', & ! component
84  'CDB', & ! subcomponent
85  'OPTIONS', & ! block
86  'PRINT_INPUT', & ! tag name
87  'IPRPAK', & ! fortran variable
88  'KEYWORD', & ! type
89  '', & ! shape
90  'print input to listing file', & ! longname
91  .false., & ! required
92  .false., & ! developmode
93  .false., & ! multi-record
94  .false., & ! preserve case
95  .false., & ! layered
96  .false. & ! timeseries
97  )
98 
99  type(inputparamdefinitiontype), parameter :: &
100  chfcdb_iprflow = inputparamdefinitiontype &
101  ( &
102  'CHF', & ! component
103  'CDB', & ! subcomponent
104  'OPTIONS', & ! block
105  'PRINT_FLOWS', & ! tag name
106  'IPRFLOW', & ! fortran variable
107  'KEYWORD', & ! type
108  '', & ! shape
109  'print calculated flows to listing file', & ! longname
110  .false., & ! required
111  .false., & ! developmode
112  .false., & ! multi-record
113  .false., & ! preserve case
114  .false., & ! layered
115  .false. & ! timeseries
116  )
117 
118  type(inputparamdefinitiontype), parameter :: &
119  chfcdb_ipakcb = inputparamdefinitiontype &
120  ( &
121  'CHF', & ! component
122  'CDB', & ! subcomponent
123  'OPTIONS', & ! block
124  'SAVE_FLOWS', & ! tag name
125  'IPAKCB', & ! fortran variable
126  'KEYWORD', & ! type
127  '', & ! shape
128  'save flows to budget file', & ! longname
129  .false., & ! required
130  .false., & ! developmode
131  .false., & ! multi-record
132  .false., & ! preserve case
133  .false., & ! layered
134  .false. & ! timeseries
135  )
136 
137  type(inputparamdefinitiontype), parameter :: &
138  chfcdb_filein = inputparamdefinitiontype &
139  ( &
140  'CHF', & ! component
141  'CDB', & ! subcomponent
142  'OPTIONS', & ! block
143  'FILEIN', & ! tag name
144  'FILEIN', & ! fortran variable
145  'KEYWORD', & ! type
146  '', & ! shape
147  'file keyword', & ! longname
148  .true., & ! required
149  .false., & ! developmode
150  .true., & ! multi-record
151  .false., & ! preserve case
152  .false., & ! layered
153  .false. & ! timeseries
154  )
155 
156  type(inputparamdefinitiontype), parameter :: &
157  chfcdb_obs_filerecord = inputparamdefinitiontype &
158  ( &
159  'CHF', & ! component
160  'CDB', & ! subcomponent
161  'OPTIONS', & ! block
162  'OBS_FILERECORD', & ! tag name
163  'OBS_FILERECORD', & ! fortran variable
164  'RECORD OBS6 FILEIN OBS6_FILENAME', & ! type
165  '', & ! shape
166  '', & ! longname
167  .false., & ! required
168  .false., & ! developmode
169  .false., & ! multi-record
170  .false., & ! preserve case
171  .false., & ! layered
172  .false. & ! timeseries
173  )
174 
175  type(inputparamdefinitiontype), parameter :: &
176  chfcdb_obs6 = inputparamdefinitiontype &
177  ( &
178  'CHF', & ! component
179  'CDB', & ! subcomponent
180  'OPTIONS', & ! block
181  'OBS6', & ! tag name
182  'OBS6', & ! fortran variable
183  'KEYWORD', & ! type
184  '', & ! shape
185  'obs keyword', & ! longname
186  .true., & ! required
187  .false., & ! developmode
188  .true., & ! multi-record
189  .false., & ! preserve case
190  .false., & ! layered
191  .false. & ! timeseries
192  )
193 
194  type(inputparamdefinitiontype), parameter :: &
195  chfcdb_obs6_filename = inputparamdefinitiontype &
196  ( &
197  'CHF', & ! component
198  'CDB', & ! subcomponent
199  'OPTIONS', & ! block
200  'OBS6_FILENAME', & ! tag name
201  'OBS6_FILENAME', & ! fortran variable
202  'STRING', & ! type
203  '', & ! shape
204  'obs6 input filename', & ! longname
205  .true., & ! required
206  .false., & ! developmode
207  .true., & ! multi-record
208  .true., & ! preserve case
209  .false., & ! layered
210  .false. & ! timeseries
211  )
212 
213  type(inputparamdefinitiontype), parameter :: &
214  chfcdb_maxbound = inputparamdefinitiontype &
215  ( &
216  'CHF', & ! component
217  'CDB', & ! subcomponent
218  'DIMENSIONS', & ! block
219  'MAXBOUND', & ! tag name
220  'MAXBOUND', & ! fortran variable
221  'INTEGER', & ! type
222  '', & ! shape
223  'maximum number of critical depth boundaries', & ! longname
224  .true., & ! required
225  .false., & ! developmode
226  .false., & ! multi-record
227  .false., & ! preserve case
228  .false., & ! layered
229  .false. & ! timeseries
230  )
231 
232  type(inputparamdefinitiontype), parameter :: &
233  chfcdb_cellid = inputparamdefinitiontype &
234  ( &
235  'CHF', & ! component
236  'CDB', & ! subcomponent
237  'PERIOD', & ! block
238  'CELLID', & ! tag name
239  'CELLID', & ! fortran variable
240  'INTEGER1D', & ! type
241  'NCELLDIM', & ! shape
242  'cell identifier', & ! longname
243  .true., & ! required
244  .false., & ! developmode
245  .true., & ! multi-record
246  .false., & ! preserve case
247  .false., & ! layered
248  .false. & ! timeseries
249  )
250 
251  type(inputparamdefinitiontype), parameter :: &
252  chfcdb_idcxs = inputparamdefinitiontype &
253  ( &
254  'CHF', & ! component
255  'CDB', & ! subcomponent
256  'PERIOD', & ! block
257  'IDCXS', & ! tag name
258  'IDCXS', & ! fortran variable
259  'INTEGER', & ! type
260  '', & ! shape
261  'cross section identifier', & ! longname
262  .true., & ! required
263  .false., & ! developmode
264  .true., & ! multi-record
265  .false., & ! preserve case
266  .false., & ! layered
267  .false. & ! timeseries
268  )
269 
270  type(inputparamdefinitiontype), parameter :: &
271  chfcdb_width = inputparamdefinitiontype &
272  ( &
273  'CHF', & ! component
274  'CDB', & ! subcomponent
275  'PERIOD', & ! block
276  'WIDTH', & ! tag name
277  'WIDTH', & ! fortran variable
278  'DOUBLE', & ! type
279  '', & ! shape
280  'width of the zero-depth gradient boundary', & ! longname
281  .true., & ! required
282  .false., & ! developmode
283  .true., & ! multi-record
284  .false., & ! preserve case
285  .false., & ! layered
286  .true. & ! timeseries
287  )
288 
289  type(inputparamdefinitiontype), parameter :: &
290  chfcdb_auxvar = inputparamdefinitiontype &
291  ( &
292  'CHF', & ! component
293  'CDB', & ! subcomponent
294  'PERIOD', & ! block
295  'AUX', & ! tag name
296  'AUXVAR', & ! fortran variable
297  'DOUBLE1D', & ! type
298  'NAUX', & ! shape
299  'auxiliary variables', & ! longname
300  .false., & ! required
301  .false., & ! developmode
302  .true., & ! multi-record
303  .false., & ! preserve case
304  .false., & ! layered
305  .true. & ! timeseries
306  )
307 
308  type(inputparamdefinitiontype), parameter :: &
309  chfcdb_boundname = inputparamdefinitiontype &
310  ( &
311  'CHF', & ! component
312  'CDB', & ! subcomponent
313  'PERIOD', & ! block
314  'BOUNDNAME', & ! tag name
315  'BOUNDNAME', & ! fortran variable
316  'STRING', & ! type
317  '', & ! shape
318  'zero-depth-gradient boundary name', & ! longname
319  .false., & ! required
320  .false., & ! developmode
321  .true., & ! multi-record
322  .false., & ! preserve case
323  .false., & ! layered
324  .false. & ! timeseries
325  )
326 
327  type(inputparamdefinitiontype), parameter :: &
328  chf_cdb_param_definitions(*) = &
329  [ &
330  chfcdb_auxiliary, &
331  chfcdb_boundnames, &
332  chfcdb_iprpak, &
333  chfcdb_iprflow, &
334  chfcdb_ipakcb, &
335  chfcdb_filein, &
336  chfcdb_obs_filerecord, &
337  chfcdb_obs6, &
338  chfcdb_obs6_filename, &
339  chfcdb_maxbound, &
340  chfcdb_cellid, &
341  chfcdb_idcxs, &
342  chfcdb_width, &
343  chfcdb_auxvar, &
344  chfcdb_boundname &
345  ]
346 
347  type(inputparamdefinitiontype), parameter :: &
348  chfcdb_spd = inputparamdefinitiontype &
349  ( &
350  'CHF', & ! component
351  'CDB', & ! subcomponent
352  'PERIOD', & ! block
353  'STRESS_PERIOD_DATA', & ! tag name
354  'SPD', & ! fortran variable
355  'RECARRAY CELLID IDCXS WIDTH AUX BOUNDNAME', & ! type
356  'MAXBOUND', & ! shape
357  '', & ! longname
358  .true., & ! required
359  .false., & ! developmode
360  .false., & ! multi-record
361  .false., & ! preserve case
362  .false., & ! layered
363  .false. & ! timeseries
364  )
365 
366  type(inputparamdefinitiontype), parameter :: &
367  chf_cdb_aggregate_definitions(*) = &
368  [ &
369  chfcdb_spd &
370  ]
371 
372  type(inputblockdefinitiontype), parameter :: &
373  chf_cdb_block_definitions(*) = &
374  [ &
375  inputblockdefinitiontype( &
376  'OPTIONS', & ! blockname
377  .false., & ! required
378  .false., & ! aggregate
379  .false. & ! block_variable
380  ), &
381  inputblockdefinitiontype( &
382  'DIMENSIONS', & ! blockname
383  .true., & ! required
384  .false., & ! aggregate
385  .false. & ! block_variable
386  ), &
387  inputblockdefinitiontype( &
388  'PERIOD', & ! blockname
389  .true., & ! required
390  .true., & ! aggregate
391  .true. & ! block_variable
392  ) &
393  ]
394 
395 end module chfcdbinputmodule
chfcdbinputmodule::chf_cdb_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public chf_cdb_aggregate_definitions
Definition: chf-cdbidm.f90:366
chfcdbinputmodule::chfcdb_auxvar
type(inputparamdefinitiontype), parameter chfcdb_auxvar
Definition: chf-cdbidm.f90:289
chfcdbinputmodule::chfcdb_spd
type(inputparamdefinitiontype), parameter chfcdb_spd
Definition: chf-cdbidm.f90:347
chfcdbinputmodule::chf_cdb_multi_package
logical, public chf_cdb_multi_package
Definition: chf-cdbidm.f90:33
chfcdbinputmodule::chfcdb_obs6_filename
type(inputparamdefinitiontype), parameter chfcdb_obs6_filename
Definition: chf-cdbidm.f90:194
chfcdbinputmodule::chfcdb_auxiliary
type(inputparamdefinitiontype), parameter chfcdb_auxiliary
Definition: chf-cdbidm.f90:42
chfcdbinputmodule::chfcdb_obs6
type(inputparamdefinitiontype), parameter chfcdb_obs6
Definition: chf-cdbidm.f90:175
chfcdbinputmodule::chfcdb_obs_filerecord
type(inputparamdefinitiontype), parameter chfcdb_obs_filerecord
Definition: chf-cdbidm.f90:156
chfcdbinputmodule::chfcdb_iprflow
type(inputparamdefinitiontype), parameter chfcdb_iprflow
Definition: chf-cdbidm.f90:99
chfcdbinputmodule::chfcdb_maxbound
type(inputparamdefinitiontype), parameter chfcdb_maxbound
Definition: chf-cdbidm.f90:213
chfcdbinputmodule::chfcdb_boundname
type(inputparamdefinitiontype), parameter chfcdb_boundname
Definition: chf-cdbidm.f90:308
chfcdbinputmodule::chfcdb_width
type(inputparamdefinitiontype), parameter chfcdb_width
Definition: chf-cdbidm.f90:270
chfcdbinputmodule::chfcdb_iprpak
type(inputparamdefinitiontype), parameter chfcdb_iprpak
Definition: chf-cdbidm.f90:80
chfcdbinputmodule::chfcdb_cellid
type(inputparamdefinitiontype), parameter chfcdb_cellid
Definition: chf-cdbidm.f90:232
chfcdbinputmodule::chfcdb_boundnames
type(inputparamdefinitiontype), parameter chfcdb_boundnames
Definition: chf-cdbidm.f90:61
chfcdbinputmodule::chf_cdb_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public chf_cdb_param_definitions
Definition: chf-cdbidm.f90:327
chfcdbinputmodule::chf_cdb_is_advanced
logical, public chf_cdb_is_advanced
Definition: chf-cdbidm.f90:34
chfcdbinputmodule::chf_cdb_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public chf_cdb_block_definitions
Definition: chf-cdbidm.f90:372
chfcdbinputmodule::chfcdb_idcxs
type(inputparamdefinitiontype), parameter chfcdb_idcxs
Definition: chf-cdbidm.f90:251
chfcdbinputmodule::chf_cdb_subpackages
character(len=16), dimension(*), parameter, public chf_cdb_subpackages
Definition: chf-cdbidm.f90:36
chfcdbinputmodule::chfcdb_ipakcb
type(inputparamdefinitiontype), parameter chfcdb_ipakcb
Definition: chf-cdbidm.f90:118
chfcdbinputmodule::chfcdb_filein
type(inputparamdefinitiontype), parameter chfcdb_filein
Definition: chf-cdbidm.f90:137
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
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