42 use json_module,
only : json_file
91 type(json_file),
pointer :: params
92 type(
mesh_t),
pointer :: msh => null()
96 character(len=NEKO_MSH_MAX_ZLBL_LEN),
allocatable :: bc_labels(:)
105 logical :: variable_material_properties = .false.
107 logical :: freeze = .false.
132 kspp_init, scheme, user)
140 type(
mesh_t),
target,
intent(inout) :: msh
141 integer,
intent(inout) :: lx
142 type(json_file),
target,
intent(inout) :: params
143 type(
user_t),
target,
intent(in) :: user
146 character(len=*),
intent(in) :: scheme
147 real(kind=
rp) :: abs_tol
148 integer :: integer_val, ierr
149 logical :: logical_val
150 character(len=:),
allocatable :: solver_type, precon_type
151 character(len=LOG_SIZE) :: log_buf
152 real(kind=
rp) :: gjp_param_a, gjp_param_b
168 type(
mesh_t),
target,
intent(inout) :: msh
169 integer,
intent(inout) :: lx
170 character(len=*),
intent(in) :: scheme
171 type(json_file),
target,
intent(inout) :: params
172 type(
user_t),
target,
intent(in) :: user
173 logical,
intent(in) :: kspv_init
175 character(len=LOG_SIZE) :: log_buf
176 real(kind=
rp),
allocatable :: real_vec(:)
177 real(kind=
rp) :: real_val, kappa, b, z0
178 logical :: logical_val
179 integer :: integer_val, ierr
180 type(json_file) :: wm_json
181 character(len=:),
allocatable :: string_val1, string_val2
202 type(
mesh_t),
target,
intent(inout) :: msh
203 integer,
intent(in) :: lx
204 type(json_file),
target,
intent(inout) :: params
205 type(
user_t),
target,
intent(in) :: user
226 real(kind=
rp),
intent(in) :: t
227 integer,
intent(in) :: tstep
228 real(kind=
rp),
intent(in) :: dt
240 real(kind=
rp) :: dtlag(10), tlag(10)
250 type(
user_t),
target,
intent(in) :: user
251 type(json_file),
intent(inout) :: params
279 real(kind=
rp),
intent(in) :: dt
286 module subroutine fluid_scheme_base_factory(object, type_name)
287 class(fluid_scheme_base_t),
intent(inout),
allocatable :: object
288 character(len=*) :: type_name
289 end subroutine fluid_scheme_base_factory
Deallocate a fluid formulation.
Initialize common data for the current scheme.
Abstract interface to dealocate a fluid formulation.
Abstract interface to initialize a fluid formulation.
Abstract interface to restart a fluid scheme.
Abstract interface to compute a time-step.
Abstract interface to setup boundary conditions.
Abstract interface to sets rho and mu.
Abstract interface to validate the user inflow.
Abstract interface defining a user defined inflow condition (pointwise)
Defines a boundary condition.
Defines a dirichlet boundary condition.
Defines a mapping of the degrees of freedom.
integer, parameter, public log_size
integer, parameter, public neko_msh_max_zlbl_len
Max length of a zone label.
integer, parameter, public rp
Global precision used in computations.
Defines a function space.
integer, parameter, public gll
Compound scheme for the advection and diffusion operators in a transport equation.
Implements type time_step_controller.
Interfaces for user interaction with NEKO.
Defines inflow dirichlet conditions.
Base type for a boundary condition.
A list of allocatable `bc_t`. Follows the standard interface of lists.
Coefficients defined on a given (mesh, ) tuple. Arrays use indices (i,j,k,e): element e,...
Generic Dirichlet boundary condition on .
Base type of all fluid formulations.
The function space for the SEM solution fields.
Implements the logic to compute the time coefficients for the advection and diffusion operators in a ...
Provides a tool to set time step dt.