MODFLOW 6  version 6.7.0.dev3
USGS Modular Hydrologic Model
prt-fmiidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module prtfmiinputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public prt_fmi_param_definitions
8  public prt_fmi_aggregate_definitions
9  public prt_fmi_block_definitions
10  public prtfmiparamfoundtype
11  public prt_fmi_multi_package
12  public prt_fmi_subpackages
13 
14  type prtfmiparamfoundtype
15  logical :: save_flows = .false.
16  logical :: flowtype = .false.
17  logical :: filein = .false.
18  logical :: fname = .false.
19  end type prtfmiparamfoundtype
20 
21  logical :: prt_fmi_multi_package = .false.
22 
23  character(len=16), parameter :: &
24  prt_fmi_subpackages(*) = &
25  [ &
26  ' ' &
27  ]
28 
29  type(inputparamdefinitiontype), parameter :: &
30  prtfmi_save_flows = inputparamdefinitiontype &
31  ( &
32  'PRT', & ! component
33  'FMI', & ! subcomponent
34  'OPTIONS', & ! block
35  'SAVE_FLOWS', & ! tag name
36  'SAVE_FLOWS', & ! fortran variable
37  'KEYWORD', & ! type
38  '', & ! shape
39  'save cell-by-cell flows to budget file', & ! longname
40  .false., & ! required
41  .false., & ! prerelease
42  .false., & ! multi-record
43  .false., & ! preserve case
44  .false., & ! layered
45  .false. & ! timeseries
46  )
47 
48  type(inputparamdefinitiontype), parameter :: &
49  prtfmi_flowtype = inputparamdefinitiontype &
50  ( &
51  'PRT', & ! component
52  'FMI', & ! subcomponent
53  'PACKAGEDATA', & ! block
54  'FLOWTYPE', & ! tag name
55  'FLOWTYPE', & ! fortran variable
56  'STRING', & ! type
57  '', & ! shape
58  'flow type', & ! longname
59  .true., & ! required
60  .false., & ! prerelease
61  .true., & ! multi-record
62  .false., & ! preserve case
63  .false., & ! layered
64  .false. & ! timeseries
65  )
66 
67  type(inputparamdefinitiontype), parameter :: &
68  prtfmi_filein = inputparamdefinitiontype &
69  ( &
70  'PRT', & ! component
71  'FMI', & ! subcomponent
72  'PACKAGEDATA', & ! block
73  'FILEIN', & ! tag name
74  'FILEIN', & ! fortran variable
75  'KEYWORD', & ! type
76  '', & ! shape
77  'file keyword', & ! longname
78  .true., & ! required
79  .false., & ! prerelease
80  .true., & ! multi-record
81  .false., & ! preserve case
82  .false., & ! layered
83  .false. & ! timeseries
84  )
85 
86  type(inputparamdefinitiontype), parameter :: &
87  prtfmi_fname = inputparamdefinitiontype &
88  ( &
89  'PRT', & ! component
90  'FMI', & ! subcomponent
91  'PACKAGEDATA', & ! block
92  'FNAME', & ! tag name
93  'FNAME', & ! fortran variable
94  'STRING', & ! type
95  '', & ! shape
96  'file name', & ! longname
97  .true., & ! required
98  .false., & ! prerelease
99  .true., & ! multi-record
100  .true., & ! preserve case
101  .false., & ! layered
102  .false. & ! timeseries
103  )
104 
105  type(inputparamdefinitiontype), parameter :: &
106  prt_fmi_param_definitions(*) = &
107  [ &
108  prtfmi_save_flows, &
109  prtfmi_flowtype, &
110  prtfmi_filein, &
111  prtfmi_fname &
112  ]
113 
114  type(inputparamdefinitiontype), parameter :: &
115  prtfmi_packagedata = inputparamdefinitiontype &
116  ( &
117  'PRT', & ! component
118  'FMI', & ! subcomponent
119  'PACKAGEDATA', & ! block
120  'PACKAGEDATA', & ! tag name
121  'PACKAGEDATA', & ! fortran variable
122  'RECARRAY FLOWTYPE FILEIN FNAME', & ! type
123  '', & ! shape
124  'flowtype list', & ! longname
125  .false., & ! required
126  .false., & ! prerelease
127  .false., & ! multi-record
128  .false., & ! preserve case
129  .false., & ! layered
130  .false. & ! timeseries
131  )
132 
133  type(inputparamdefinitiontype), parameter :: &
134  prt_fmi_aggregate_definitions(*) = &
135  [ &
136  prtfmi_packagedata &
137  ]
138 
139  type(inputblockdefinitiontype), parameter :: &
140  prt_fmi_block_definitions(*) = &
141  [ &
142  inputblockdefinitiontype( &
143  'OPTIONS', & ! blockname
144  .false., & ! required
145  .false., & ! aggregate
146  .false. & ! block_variable
147  ), &
148  inputblockdefinitiontype( &
149  'PACKAGEDATA', & ! blockname
150  .false., & ! required
151  .true., & ! aggregate
152  .false. & ! block_variable
153  ) &
154  ]
155 
156 end module prtfmiinputmodule
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
prtfmiinputmodule::prtfmi_save_flows
type(inputparamdefinitiontype), parameter prtfmi_save_flows
Definition: prt-fmiidm.f90:29
prtfmiinputmodule::prt_fmi_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public prt_fmi_aggregate_definitions
Definition: prt-fmiidm.f90:133
prtfmiinputmodule::prtfmi_fname
type(inputparamdefinitiontype), parameter prtfmi_fname
Definition: prt-fmiidm.f90:86
prtfmiinputmodule::prt_fmi_multi_package
logical, public prt_fmi_multi_package
Definition: prt-fmiidm.f90:21
prtfmiinputmodule::prtfmi_filein
type(inputparamdefinitiontype), parameter prtfmi_filein
Definition: prt-fmiidm.f90:67
prtfmiinputmodule::prt_fmi_subpackages
character(len=16), dimension(*), parameter, public prt_fmi_subpackages
Definition: prt-fmiidm.f90:23
prtfmiinputmodule::prtfmi_packagedata
type(inputparamdefinitiontype), parameter prtfmi_packagedata
Definition: prt-fmiidm.f90:114
prtfmiinputmodule::prt_fmi_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public prt_fmi_param_definitions
Definition: prt-fmiidm.f90:105
prtfmiinputmodule::prtfmi_flowtype
type(inputparamdefinitiontype), parameter prtfmi_flowtype
Definition: prt-fmiidm.f90:48
prtfmiinputmodule::prt_fmi_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public prt_fmi_block_definitions
Definition: prt-fmiidm.f90:139