40 use json_module,
only : json_file
56 type(json_file),
intent(inout) :: json
58 type(
coef_t),
intent(inout) :: coef
59 character(len=:),
allocatable :: source_type
61 call json_get(json,
"type", source_type)
63 if (trim(source_type) .eq.
"constant")
then
65 else if (trim(source_type) .eq.
"boussinesq")
then
67 else if (trim(source_type) .eq.
"brinkman")
then
70 call neko_error(
'Unknown source term '//trim(source_type))
Retrieves a parameter by name or throws an error.
Implements the boussinesq_source_term_t type.
Implements the brinkman_source_term_t type.
Implements the const_source_term_t type.
Utilities for retrieving parameters from the case files.
Defines a factory subroutine for source terms.
subroutine, public source_term_factory(source_term, json, fields, coef)
Source term factory. Both constructs and initializes the object.
Implements the source_term_t type and a wrapper source_term_wrapper_t.
Bouyancy source term accroding to the Boussinesq approximation.
A Brinkman source term. The region and strength are controlled by assigning regions types and brinkma...
Coefficients defined on a given (mesh, ) tuple. Arrays use indices (i,j,k,e): element e,...
A constant source term. The strength is specified with the values keyword, which should be an array,...
field_list_t, To be able to group fields together
Base abstract type for source terms.