MODFLOW 6  version 6.7.0.dev3
USGS Modular Hydrologic Model
utl-hpcidm.f90
Go to the documentation of this file.
1 ! ** Do Not Modify! MODFLOW 6 system generated file. **
2 module utlhpcinputmodule
3  use constantsmodule, only: lenvarname
4  use inputdefinitionmodule, only: inputparamdefinitiontype, &
5  inputblockdefinitiontype
6  private
7  public utl_hpc_param_definitions
8  public utl_hpc_aggregate_definitions
9  public utl_hpc_block_definitions
10  public utlhpcparamfoundtype
11  public utl_hpc_multi_package
12  public utl_hpc_subpackages
13 
14  type utlhpcparamfoundtype
15  logical :: print_table = .false.
16  logical :: dev_log_mpi = .false.
17  logical :: mname = .false.
18  logical :: mrank = .false.
19  end type utlhpcparamfoundtype
20 
21  logical :: utl_hpc_multi_package = .false.
22 
23  character(len=16), parameter :: &
24  utl_hpc_subpackages(*) = &
25  [ &
26  ' ' &
27  ]
28 
29  type(inputparamdefinitiontype), parameter :: &
30  utlhpc_print_table = inputparamdefinitiontype &
31  ( &
32  'UTL', & ! component
33  'HPC', & ! subcomponent
34  'OPTIONS', & ! block
35  'PRINT_TABLE', & ! tag name
36  'PRINT_TABLE', & ! fortran variable
37  'KEYWORD', & ! type
38  '', & ! shape
39  'model print table to listing 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  utlhpc_dev_log_mpi = inputparamdefinitiontype &
50  ( &
51  'UTL', & ! component
52  'HPC', & ! subcomponent
53  'OPTIONS', & ! block
54  'DEV_LOG_MPI', & ! tag name
55  'DEV_LOG_MPI', & ! fortran variable
56  'KEYWORD', & ! type
57  '', & ! shape
58  'log mpi traffic', & ! longname
59  .false., & ! required
60  .false., & ! prerelease
61  .false., & ! multi-record
62  .false., & ! preserve case
63  .false., & ! layered
64  .false. & ! timeseries
65  )
66 
67  type(inputparamdefinitiontype), parameter :: &
68  utlhpc_mname = inputparamdefinitiontype &
69  ( &
70  'UTL', & ! component
71  'HPC', & ! subcomponent
72  'PARTITIONS', & ! block
73  'MNAME', & ! tag name
74  'MNAME', & ! fortran variable
75  'STRING', & ! type
76  '', & ! shape
77  'model name', & ! 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  utlhpc_mrank = inputparamdefinitiontype &
88  ( &
89  'UTL', & ! component
90  'HPC', & ! subcomponent
91  'PARTITIONS', & ! block
92  'MRANK', & ! tag name
93  'MRANK', & ! fortran variable
94  'INTEGER', & ! type
95  '', & ! shape
96  'model rank', & ! longname
97  .true., & ! required
98  .false., & ! prerelease
99  .true., & ! multi-record
100  .false., & ! preserve case
101  .false., & ! layered
102  .false. & ! timeseries
103  )
104 
105  type(inputparamdefinitiontype), parameter :: &
106  utl_hpc_param_definitions(*) = &
107  [ &
108  utlhpc_print_table, &
109  utlhpc_dev_log_mpi, &
110  utlhpc_mname, &
111  utlhpc_mrank &
112  ]
113 
114  type(inputparamdefinitiontype), parameter :: &
115  utlhpc_partitions = inputparamdefinitiontype &
116  ( &
117  'UTL', & ! component
118  'HPC', & ! subcomponent
119  'PARTITIONS', & ! block
120  'PARTITIONS', & ! tag name
121  'PARTITIONS', & ! fortran variable
122  'RECARRAY MNAME MRANK', & ! type
123  '', & ! shape
124  'list of partition numbers', & ! 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  utl_hpc_aggregate_definitions(*) = &
135  [ &
136  utlhpc_partitions &
137  ]
138 
139  type(inputblockdefinitiontype), parameter :: &
140  utl_hpc_block_definitions(*) = &
141  [ &
142  inputblockdefinitiontype( &
143  'OPTIONS', & ! blockname
144  .false., & ! required
145  .false., & ! aggregate
146  .false. & ! block_variable
147  ), &
148  inputblockdefinitiontype( &
149  'PARTITIONS', & ! blockname
150  .false., & ! required
151  .true., & ! aggregate
152  .false. & ! block_variable
153  ) &
154  ]
155 
156 end module utlhpcinputmodule
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
utlhpcinputmodule::utl_hpc_block_definitions
type(inputblockdefinitiontype), dimension(*), parameter, public utl_hpc_block_definitions
Definition: utl-hpcidm.f90:139
utlhpcinputmodule::utlhpc_mrank
type(inputparamdefinitiontype), parameter utlhpc_mrank
Definition: utl-hpcidm.f90:86
utlhpcinputmodule::utlhpc_print_table
type(inputparamdefinitiontype), parameter utlhpc_print_table
Definition: utl-hpcidm.f90:29
utlhpcinputmodule::utlhpc_partitions
type(inputparamdefinitiontype), parameter utlhpc_partitions
Definition: utl-hpcidm.f90:114
utlhpcinputmodule::utlhpc_dev_log_mpi
type(inputparamdefinitiontype), parameter utlhpc_dev_log_mpi
Definition: utl-hpcidm.f90:48
utlhpcinputmodule::utl_hpc_multi_package
logical, public utl_hpc_multi_package
Definition: utl-hpcidm.f90:21
utlhpcinputmodule::utlhpc_mname
type(inputparamdefinitiontype), parameter utlhpc_mname
Definition: utl-hpcidm.f90:67
utlhpcinputmodule::utl_hpc_subpackages
character(len=16), dimension(*), parameter, public utl_hpc_subpackages
Definition: utl-hpcidm.f90:23
utlhpcinputmodule::utl_hpc_aggregate_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public utl_hpc_aggregate_definitions
Definition: utl-hpcidm.f90:133
utlhpcinputmodule::utl_hpc_param_definitions
type(inputparamdefinitiontype), dimension(*), parameter, public utl_hpc_param_definitions
Definition: utl-hpcidm.f90:105