MODFLOW 6  version 6.7.0.dev3
USGS Modular Hydrologic Model
sim-tdisidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module simtdisinputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public sim_tdis_param_definitions
8  public sim_tdis_aggregate_definitions
9  public sim_tdis_block_definitions
10  public simtdisparamfoundtype
11  public sim_tdis_multi_package
12  public sim_tdis_subpackages
13 
14  type simtdisparamfoundtype
15  logical :: time_units = .false.
16  logical :: start_date_time = .false.
17  logical :: ats_filerecord = .false.
18  logical :: ats6 = .false.
19  logical :: filein = .false.
20  logical :: ats6_filename = .false.
21  logical :: nper = .false.
22  logical :: perlen = .false.
23  logical :: nstp = .false.
24  logical :: tsmult = .false.
25  end type simtdisparamfoundtype
26 
27  logical :: sim_tdis_multi_package = .false.
28 
29  character(len=16), parameter :: &
30  sim_tdis_subpackages(*) = &
31  [ &
32  ' ' &
33  ]
34 
35  type(inputparamdefinitiontype), parameter :: &
36  simtdis_time_units = inputparamdefinitiontype &
37  ( &
38  'SIM', & ! component
39  'TDIS', & ! subcomponent
40  'OPTIONS', & ! block
41  'TIME_UNITS', & ! tag name
42  'TIME_UNITS', & ! fortran variable
43  'STRING', & ! type
44  '', & ! shape
45  'time unit', & ! longname
46  .false., & ! required
47  .false., & ! developmode
48  .false., & ! multi-record
49  .false., & ! preserve case
50  .false., & ! layered
51  .false. & ! timeseries
52  )
53 
54  type(inputparamdefinitiontype), parameter :: &
55  simtdis_start_date_time = inputparamdefinitiontype &
56  ( &
57  'SIM', & ! component
58  'TDIS', & ! subcomponent
59  'OPTIONS', & ! block
60  'START_DATE_TIME', & ! tag name
61  'START_DATE_TIME', & ! fortran variable
62  'STRING', & ! type
63  '', & ! shape
64  'starting date and time', & ! longname
65  .false., & ! required
66  .false., & ! developmode
67  .false., & ! multi-record
68  .false., & ! preserve case
69  .false., & ! layered
70  .false. & ! timeseries
71  )
72 
73  type(inputparamdefinitiontype), parameter :: &
74  simtdis_ats_filerecord = inputparamdefinitiontype &
75  ( &
76  'SIM', & ! component
77  'TDIS', & ! subcomponent
78  'OPTIONS', & ! block
79  'ATS_FILERECORD', & ! tag name
80  'ATS_FILERECORD', & ! fortran variable
81  'RECORD ATS6 FILEIN ATS6_FILENAME', & ! type
82  '', & ! shape
83  '', & ! longname
84  .false., & ! required
85  .false., & ! developmode
86  .false., & ! multi-record
87  .false., & ! preserve case
88  .false., & ! layered
89  .false. & ! timeseries
90  )
91 
92  type(inputparamdefinitiontype), parameter :: &
93  simtdis_ats6 = inputparamdefinitiontype &
94  ( &
95  'SIM', & ! component
96  'TDIS', & ! subcomponent
97  'OPTIONS', & ! block
98  'ATS6', & ! tag name
99  'ATS6', & ! fortran variable
100  'KEYWORD', & ! type
101  '', & ! shape
102  'ats keyword', & ! longname
103  .true., & ! required
104  .false., & ! developmode
105  .true., & ! multi-record
106  .false., & ! preserve case
107  .false., & ! layered
108  .false. & ! timeseries
109  )
110 
111  type(inputparamdefinitiontype), parameter :: &
112  simtdis_filein = inputparamdefinitiontype &
113  ( &
114  'SIM', & ! component
115  'TDIS', & ! subcomponent
116  'OPTIONS', & ! block
117  'FILEIN', & ! tag name
118  'FILEIN', & ! fortran variable
119  'KEYWORD', & ! type
120  '', & ! shape
121  'file keyword', & ! longname
122  .true., & ! required
123  .false., & ! developmode
124  .true., & ! multi-record
125  .false., & ! preserve case
126  .false., & ! layered
127  .false. & ! timeseries
128  )
129 
130  type(inputparamdefinitiontype), parameter :: &
131  simtdis_ats6_filename = inputparamdefinitiontype &
132  ( &
133  'SIM', & ! component
134  'TDIS', & ! subcomponent
135  'OPTIONS', & ! block
136  'ATS6_FILENAME', & ! tag name
137  'ATS6_FILENAME', & ! fortran variable
138  'STRING', & ! type
139  '', & ! shape
140  'file name of adaptive time series information', & ! longname
141  .true., & ! required
142  .false., & ! developmode
143  .true., & ! multi-record
144  .true., & ! preserve case
145  .false., & ! layered
146  .false. & ! timeseries
147  )
148 
149  type(inputparamdefinitiontype), parameter :: &
150  simtdis_nper = inputparamdefinitiontype &
151  ( &
152  'SIM', & ! component
153  'TDIS', & ! subcomponent
154  'DIMENSIONS', & ! block
155  'NPER', & ! tag name
156  'NPER', & ! fortran variable
157  'INTEGER', & ! type
158  '', & ! shape
159  'number of stress periods', & ! longname
160  .true., & ! required
161  .false., & ! developmode
162  .false., & ! multi-record
163  .false., & ! preserve case
164  .false., & ! layered
165  .false. & ! timeseries
166  )
167 
168  type(inputparamdefinitiontype), parameter :: &
169  simtdis_perlen = inputparamdefinitiontype &
170  ( &
171  'SIM', & ! component
172  'TDIS', & ! subcomponent
173  'PERIODDATA', & ! block
174  'PERLEN', & ! tag name
175  'PERLEN', & ! fortran variable
176  'DOUBLE', & ! type
177  '', & ! shape
178  'length of stress period', & ! longname
179  .true., & ! required
180  .false., & ! developmode
181  .true., & ! multi-record
182  .false., & ! preserve case
183  .false., & ! layered
184  .false. & ! timeseries
185  )
186 
187  type(inputparamdefinitiontype), parameter :: &
188  simtdis_nstp = inputparamdefinitiontype &
189  ( &
190  'SIM', & ! component
191  'TDIS', & ! subcomponent
192  'PERIODDATA', & ! block
193  'NSTP', & ! tag name
194  'NSTP', & ! fortran variable
195  'INTEGER', & ! type
196  '', & ! shape
197  'number of time steps', & ! longname
198  .true., & ! required
199  .false., & ! developmode
200  .true., & ! multi-record
201  .false., & ! preserve case
202  .false., & ! layered
203  .false. & ! timeseries
204  )
205 
206  type(inputparamdefinitiontype), parameter :: &
207  simtdis_tsmult = inputparamdefinitiontype &
208  ( &
209  'SIM', & ! component
210  'TDIS', & ! subcomponent
211  'PERIODDATA', & ! block
212  'TSMULT', & ! tag name
213  'TSMULT', & ! fortran variable
214  'DOUBLE', & ! type
215  '', & ! shape
216  'number of time steps', & ! longname
217  .true., & ! required
218  .false., & ! developmode
219  .true., & ! multi-record
220  .false., & ! preserve case
221  .false., & ! layered
222  .false. & ! timeseries
223  )
224 
225  type(inputparamdefinitiontype), parameter :: &
226  sim_tdis_param_definitions(*) = &
227  [ &
228  simtdis_time_units, &
229  simtdis_start_date_time, &
230  simtdis_ats_filerecord, &
231  simtdis_ats6, &
232  simtdis_filein, &
233  simtdis_ats6_filename, &
234  simtdis_nper, &
235  simtdis_perlen, &
236  simtdis_nstp, &
237  simtdis_tsmult &
238  ]
239 
240  type(inputparamdefinitiontype), parameter :: &
241  simtdis_perioddata = inputparamdefinitiontype &
242  ( &
243  'SIM', & ! component
244  'TDIS', & ! subcomponent
245  'PERIODDATA', & ! block
246  'PERIODDATA', & ! tag name
247  'PERIODDATA', & ! fortran variable
248  'RECARRAY PERLEN NSTP TSMULT', & ! type
249  '', & ! shape
250  'stress period time information', & ! longname
251  .true., & ! required
252  .false., & ! developmode
253  .false., & ! multi-record
254  .false., & ! preserve case
255  .false., & ! layered
256  .false. & ! timeseries
257  )
258 
259  type(inputparamdefinitiontype), parameter :: &
260  sim_tdis_aggregate_definitions(*) = &
261  [ &
262  simtdis_perioddata &
263  ]
264 
265  type(inputblockdefinitiontype), parameter :: &
266  sim_tdis_block_definitions(*) = &
267  [ &
268  inputblockdefinitiontype( &
269  'OPTIONS', & ! blockname
270  .false., & ! required
271  .false., & ! aggregate
272  .false. & ! block_variable
273  ), &
274  inputblockdefinitiontype( &
275  'DIMENSIONS', & ! blockname
276  .true., & ! required
277  .false., & ! aggregate
278  .false. & ! block_variable
279  ), &
280  inputblockdefinitiontype( &
281  'PERIODDATA', & ! blockname
282  .true., & ! required
283  .true., & ! aggregate
284  .false. & ! block_variable
285  ) &
286  ]
287 
288 end module simtdisinputmodule
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
This module contains the InputDefinitionModule.
Definition: InputDefinition.f90:7
simtdisinputmodule::simtdis_ats6_filename
type(inputparamdefinitiontype), parameter simtdis_ats6_filename
Definition: sim-tdisidm.f90:130
simtdisinputmodule::simtdis_tsmult
type(inputparamdefinitiontype), parameter simtdis_tsmult
Definition: sim-tdisidm.f90:206
simtdisinputmodule::simtdis_nper
type(inputparamdefinitiontype), parameter simtdis_nper
Definition: sim-tdisidm.f90:149
simtdisinputmodule::sim_tdis_multi_package
logical, public sim_tdis_multi_package
Definition: sim-tdisidm.f90:27
simtdisinputmodule::sim_tdis_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public sim_tdis_param_definitions
Definition: sim-tdisidm.f90:225
simtdisinputmodule::simtdis_start_date_time
type(inputparamdefinitiontype), parameter simtdis_start_date_time
Definition: sim-tdisidm.f90:54
simtdisinputmodule::simtdis_nstp
type(inputparamdefinitiontype), parameter simtdis_nstp
Definition: sim-tdisidm.f90:187
simtdisinputmodule::sim_tdis_subpackages
character(len=16), dimension(*), parameter, public sim_tdis_subpackages
Definition: sim-tdisidm.f90:29
simtdisinputmodule::simtdis_ats6
type(inputparamdefinitiontype), parameter simtdis_ats6
Definition: sim-tdisidm.f90:92
simtdisinputmodule::simtdis_filein
type(inputparamdefinitiontype), parameter simtdis_filein
Definition: sim-tdisidm.f90:111
simtdisinputmodule::simtdis_ats_filerecord
type(inputparamdefinitiontype), parameter simtdis_ats_filerecord
Definition: sim-tdisidm.f90:73
simtdisinputmodule::simtdis_perioddata
type(inputparamdefinitiontype), parameter simtdis_perioddata
Definition: sim-tdisidm.f90:240
simtdisinputmodule::sim_tdis_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public sim_tdis_aggregate_definitions
Definition: sim-tdisidm.f90:259
simtdisinputmodule::sim_tdis_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public sim_tdis_block_definitions
Definition: sim-tdisidm.f90:265
simtdisinputmodule::simtdis_perlen
type(inputparamdefinitiontype), parameter simtdis_perlen
Definition: sim-tdisidm.f90:168
simtdisinputmodule::simtdis_time_units
type(inputparamdefinitiontype), parameter simtdis_time_units
Definition: sim-tdisidm.f90:35