Explicit wall model based on Model-II from Cai and Sagaut (2021). More...

Inheritance diagram for cai_sagaut_model_ii::cai_sagaut_model_ii_t:

Collaboration diagram for cai_sagaut_model_ii::cai_sagaut_model_ii_t:

[legend]

Public Member Functions
procedure, pass(this)	init (this, scheme_name, coef, msk, facet, json)
	Initialise the wall model from the case file.

procedure, pass(this)	partial_init (this, coef, scheme_name, json)
	Partially initialise the wall model from the case file.

procedure, pass(this)	finalize (this, msk, facet, bc_name, user)
	Finalise allocation of derived data structures.

procedure, pass(this)	init_from_components (this, scheme_name, coef, msk, facet, sampler, kappa, b, p, s)
	Initialise the wall model from explicit components.

procedure, pass(this)	free (this)
	Destructor.

procedure, pass(this)	compute_nu_and_rho (this)
	Compute wall-node viscosity and density samples.

procedure, pass(this)	compute (this, t, tstep)
	Evaluate wall shear stresses.

procedure, pass(this)	init_base (this, scheme_name, coef, msk, facet, sampler)
	Constructor for the wall_model_t (base) class.

procedure, pass(this)	partial_init_base (this, coef, scheme_name, json)
	Base type implementation of the deferred `partial_init`.

procedure, pass(this)	finalize_base (this, msk, facet, bc_name, user)
	Base type implementation of the deferred `finilize`.

procedure, pass(this)	free_base (this)
	Destructor for the wall_model_t (base) class.

procedure, pass(this)	compute_mag_field (this)
	Compute the wall shear stress's magnitude.

procedure(wall_model_init), deferred, pass	init (this, scheme_name, coef, msk, facet, json)
	The common constructor.

procedure(wall_model_partial_init), deferred, pass	partial_init (this, coef, scheme_name, json)
	A part of the constructor that parses the JSON without initializing the base `wall_model_t` type. Used in `wall_model_bc_t` during the init stage of the bc construction. So, in this routine you cannot use the bc mask and facets. The construction can be finished by calling `finalize_base`. This generally follows the same pattern as in `bc_t`.

procedure(wall_model_finalize), deferred, pass	finalize (this, msk, facet, bc_name, user)
	Finalization of the partial construction, similar to `bc_t`.

procedure(wall_model_free), deferred, pass	free (this)
	Destructor.

procedure(wall_model_compute), deferred, pass	compute (this, t, tstep)
	Compute the wall shear stress.

procedure, pass(this)	setup_geometry (this)
	Build geometry shared by wall models and samplers.

procedure, pass(this)	validate_single_sample (this)
	Check that n_samples is one.

Public Attributes
real(kind=rp)	kappa = 0.41_rp
	The von Karman coefficient.

real(kind=rp)	b = 5.2_rp
	The log-law intercept.

real(kind=rp)	p = 1.138_rp
	Blending exponent.

real(kind=rp)	s = 217.8_rp
	Blending scale.

type(vector_t)	nu
	The kinematic viscosity.

type(vector_t)	rho_w
	The fluid density at the boundary.

type(vector_t)	u_s

type(vector_t)	v_s

type(vector_t)	w_s

type(coef_t), pointer	coef => null()
	SEM coefficients.

type(dofmap_t), pointer	dof => null()
	Map of degrees of freedom.

type(field_t), pointer	mu => null()
	The dynamic viscosity of the fluid.

type(field_t), pointer	rho => null()
	The density of the fluid.

character(len=:), allocatable	scheme_name
	The name of the scheme for which the wall model is used. This is used to identify the name of the mu an rho fields in the registry.

integer, dimension(:), pointer	msk => null()
	The boundary condition mask. Stores the array size at index zero!

type(c_ptr)	msk_d = C_NULL_PTR

integer, dimension(:), pointer	facet => null()
	The boundary condition facet ids. Stores the array size at index zero!

type(vector_t)	tau_x
	The x component of the shear stress.

type(vector_t)	tau_y
	The y component of the shear stress.

type(vector_t)	tau_z
	The z component of the shear stress.

type(vector_t)	n_x
	The x component of the normal.

type(vector_t)	n_y
	The y component of the normal.

type(vector_t)	n_z
	The z component of the normal.

class(wall_sampler_t), allocatable	sampler
	Strategy used to sample solution fields away from the wall.

integer	n_nodes = 0
	Number of nodes in the boundary.

type(field_t), pointer	tau_field => null()
	The 3D field with the computed stress magnitude at the boundary.

Detailed Description

Reference: https://doi.org/10.1063/5.0048563

Definition at line 60 of file cai_sagaut_model_ii.f90.

Member Function/Subroutine Documentation

◆ compute() [1/2]

procedure, pass(this) cai_sagaut_model_ii::cai_sagaut_model_ii_t::compute	(	class(cai_sagaut_model_ii_t), intent(inout)	this,
		real(kind=rp), intent(in)	t,
		integer, intent(in)	tstep
	)

Parameters

t	The current physical time.
tstep	The current time-step number.

Definition at line 90 of file cai_sagaut_model_ii.f90.

◆ compute() [2/2]

procedure(wall_model_compute), deferred, pass wall_model::wall_model_t::compute	(	class(wall_model_t), intent(inout)	this,
		real(kind=rp), intent(in)	t,
		integer, intent(in)	tstep
	)

pure virtualinherited

Definition at line 117 of file wall_model.f90.

◆ compute_mag_field()

procedure, pass(this) wall_model::wall_model_t::compute_mag_field ( class(wall_model_t), intent(inout) this )

inherited

Definition at line 103 of file wall_model.f90.

◆ compute_nu_and_rho()

procedure, pass(this) cai_sagaut_model_ii::cai_sagaut_model_ii_t::compute_nu_and_rho ( class(cai_sagaut_model_ii_t), intent(inout) this )

Definition at line 87 of file cai_sagaut_model_ii.f90.

◆ finalize() [1/2]

procedure, pass(this) cai_sagaut_model_ii::cai_sagaut_model_ii_t::finalize	(	class(cai_sagaut_model_ii_t), intent(inout)	this,
		integer, dimension(:), intent(in)	msk,
		integer, dimension(:), intent(in)	facet,
		character(len=*), intent(in), optional	bc_name,
		type(user_t), intent(in), optional, target	user
	)

Parameters

msk	The wall-point mask.
facet	The wall-point facet indices.

Definition at line 80 of file cai_sagaut_model_ii.f90.

◆ finalize() [2/2]

procedure(wall_model_finalize), deferred, pass wall_model::wall_model_t::finalize	(	class(wall_model_t), intent(inout)	this,
		integer, dimension(:), intent(in)	msk,
		integer, dimension(:), intent(in)	facet,
		character(len=*), intent(in), optional	bc_name,
		type(user_t), intent(in), optional, target	user
	)

pure virtualinherited

Definition at line 113 of file wall_model.f90.

◆ finalize_base()

procedure, pass(this) wall_model::wall_model_t::finalize_base	(	class(wall_model_t), intent(inout)	this,
		integer, dimension(0:), intent(in), target	msk,
		integer, dimension(:), intent(in), target	facet,
		character(len=*), intent(in), optional	bc_name,
		type(user_t), intent(in), optional, target	user
	)

inherited

Definition at line 99 of file wall_model.f90.

◆ free() [1/2]

procedure, pass(this) cai_sagaut_model_ii::cai_sagaut_model_ii_t::free ( class(cai_sagaut_model_ii_t), intent(inout) this )

Definition at line 85 of file cai_sagaut_model_ii.f90.

◆ free() [2/2]

procedure(wall_model_free), deferred, pass wall_model::wall_model_t::free ( class(wall_model_t), intent(inout) this )

pure virtualinherited

Definition at line 115 of file wall_model.f90.

◆ free_base()

procedure, pass(this) wall_model::wall_model_t::free_base ( class(wall_model_t), intent(inout) this )

inherited

Definition at line 101 of file wall_model.f90.

◆ init() [1/2]

procedure, pass(this) cai_sagaut_model_ii::cai_sagaut_model_ii_t::init	(	class(cai_sagaut_model_ii_t), intent(inout)	this,
		character(len=*), intent(in)	scheme_name,
		type(coef_t), intent(in)	coef,
		integer, dimension(:), intent(in)	msk,
		integer, dimension(:), intent(in)	facet,
		type(json_file), intent(inout)	json
	)

Parameters

scheme_name	The solver scheme name.
coef	The SEM coefficients.
msk	The wall-point mask.
facet	The wall-point facet indices.
json	The case-file parameters for this wall model.

Definition at line 76 of file cai_sagaut_model_ii.f90.

◆ init() [2/2]

procedure(wall_model_init), deferred, pass wall_model::wall_model_t::init	(	class(wall_model_t), intent(inout)	this,
		character(len=*), intent(in)	scheme_name,
		type(coef_t), intent(in)	coef,
		integer, dimension(:), intent(in)	msk,
		integer, dimension(:), intent(in)	facet,
		type(json_file), intent(inout)	json
	)

pure virtualinherited

Definition at line 105 of file wall_model.f90.

◆ init_base()

procedure, pass(this) wall_model::wall_model_t::init_base	(	class(wall_model_t), intent(inout)	this,
		character(len=*)	scheme_name,
		type(coef_t), intent(in), target	coef,
		integer, dimension(0:), intent(in), target	msk,
		integer, dimension(0:), intent(in), target	facet,
		class(wall_sampler_t), intent(inout), allocatable	sampler
	)

inherited

Parameters

coef	SEM coefficients.
msk	The underlying mask of the boundary condition.
facet,The	underlying facet index list of the boundary condition.
scheme_name	The name of the scheme for which the wall model is used.
sampler	Configured sampling strategy; ownership is transferred.

Definition at line 95 of file wall_model.f90.

◆ init_from_components()

procedure, pass(this) cai_sagaut_model_ii::cai_sagaut_model_ii_t::init_from_components	(	class(cai_sagaut_model_ii_t), intent(inout)	this,
		character(len=*), intent(in)	scheme_name,
		type(coef_t), intent(in)	coef,
		integer, dimension(:), intent(in)	msk,
		integer, dimension(:), intent(in)	facet,
		class(wall_sampler_t), intent(inout), allocatable	sampler,
		real(kind=rp), intent(in)	kappa,
		real(kind=rp), intent(in)	b,
		real(kind=rp), intent(in)	p,
		real(kind=rp), intent(in)	s
	)

Parameters

scheme_name	The solver scheme name.
coef	The SEM coefficients.
msk	The wall-point mask.
facet	The wall-point facet indices.
sampler	The sampling strategy. Ownership is transferred.
kappa	The von Karman coefficient.
B	The log-law intercept.
p	The blending exponent.
s	The blending scale.

Definition at line 82 of file cai_sagaut_model_ii.f90.

◆ partial_init() [1/2]

procedure, pass(this) cai_sagaut_model_ii::cai_sagaut_model_ii_t::partial_init	(	class(cai_sagaut_model_ii_t), intent(inout)	this,
		type(coef_t), intent(in)	coef,
		character(len=*), intent(in)	scheme_name,
		type(json_file), intent(inout)	json
	)

Parameters

coef	The SEM coefficients.
json	The case-file parameters for this wall model.

Definition at line 78 of file cai_sagaut_model_ii.f90.

◆ partial_init() [2/2]

procedure(wall_model_partial_init), deferred, pass wall_model::wall_model_t::partial_init	(	class(wall_model_t), intent(inout)	this,
		type(coef_t), intent(in)	coef,
		character(len=*), intent(in)	scheme_name,
		type(json_file), intent(inout)	json
	)

pure virtualinherited

Definition at line 111 of file wall_model.f90.

◆ partial_init_base()

procedure, pass(this) wall_model::wall_model_t::partial_init_base	(	class(wall_model_t), intent(inout)	this,
		type(coef_t), intent(in), target	coef,
		character(len=*), intent(in)	scheme_name,
		type(json_file), intent(inout)	json
	)

inherited

Parameters

coef	SEM coefficients.
The	name of the scheme for which the wall model is used.
json	A dictionary with parameters.

Definition at line 97 of file wall_model.f90.

◆ setup_geometry()

procedure, pass(this) wall_model::wall_model_t::setup_geometry ( class(wall_model_t), intent(inout) this )

inherited

Definition at line 119 of file wall_model.f90.

◆ validate_single_sample()

procedure, pass(this) wall_model::wall_model_t::validate_single_sample ( class(wall_model_t), intent(inout) this )

inherited

Definition at line 121 of file wall_model.f90.

Member Data Documentation

◆ b

real(kind=rp) cai_sagaut_model_ii::cai_sagaut_model_ii_t::b = 5.2_rp

Definition at line 64 of file cai_sagaut_model_ii.f90.

◆ coef

type(coef_t), pointer wall_model::wall_model_t::coef => null()

inherited

Definition at line 59 of file wall_model.f90.

◆ dof

type(dofmap_t), pointer wall_model::wall_model_t::dof => null()

inherited

Definition at line 61 of file wall_model.f90.

◆ facet

integer, dimension(:), pointer wall_model::wall_model_t::facet => null()

inherited

Definition at line 74 of file wall_model.f90.

◆ kappa

real(kind=rp) cai_sagaut_model_ii::cai_sagaut_model_ii_t::kappa = 0.41_rp

Definition at line 62 of file cai_sagaut_model_ii.f90.

◆ msk

integer, dimension(:), pointer wall_model::wall_model_t::msk => null()

inherited

Definition at line 71 of file wall_model.f90.

◆ msk_d

type(c_ptr) wall_model::wall_model_t::msk_d = C_NULL_PTR

inherited

Definition at line 72 of file wall_model.f90.

◆ mu

type(field_t), pointer wall_model::wall_model_t::mu => null()

inherited

Definition at line 63 of file wall_model.f90.

◆ n_nodes

integer wall_model::wall_model_t::n_nodes = 0

inherited

Definition at line 90 of file wall_model.f90.

◆ n_x

type(vector_t) wall_model::wall_model_t::n_x

inherited

Definition at line 82 of file wall_model.f90.

◆ n_y

type(vector_t) wall_model::wall_model_t::n_y

inherited

Definition at line 84 of file wall_model.f90.

◆ n_z

type(vector_t) wall_model::wall_model_t::n_z

inherited

Definition at line 86 of file wall_model.f90.

◆ nu

type(vector_t) cai_sagaut_model_ii::cai_sagaut_model_ii_t::nu

Definition at line 70 of file cai_sagaut_model_ii.f90.

◆ p

real(kind=rp) cai_sagaut_model_ii::cai_sagaut_model_ii_t::p = 1.138_rp

Definition at line 66 of file cai_sagaut_model_ii.f90.

◆ rho

type(field_t), pointer wall_model::wall_model_t::rho => null()

inherited

Definition at line 65 of file wall_model.f90.

◆ rho_w

type(vector_t) cai_sagaut_model_ii::cai_sagaut_model_ii_t::rho_w

Definition at line 72 of file cai_sagaut_model_ii.f90.

◆ s

real(kind=rp) cai_sagaut_model_ii::cai_sagaut_model_ii_t::s = 217.8_rp

Definition at line 68 of file cai_sagaut_model_ii.f90.

◆ sampler

class(wall_sampler_t), allocatable wall_model::wall_model_t::sampler

inherited

Definition at line 88 of file wall_model.f90.

◆ scheme_name

character(len=:), allocatable wall_model::wall_model_t::scheme_name

inherited

Definition at line 69 of file wall_model.f90.

◆ tau_field

type(field_t), pointer wall_model::wall_model_t::tau_field => null()

inherited

Definition at line 92 of file wall_model.f90.

◆ tau_x

type(vector_t) wall_model::wall_model_t::tau_x

inherited

Definition at line 76 of file wall_model.f90.

◆ tau_y

type(vector_t) wall_model::wall_model_t::tau_y

inherited

Definition at line 78 of file wall_model.f90.

◆ tau_z

type(vector_t) wall_model::wall_model_t::tau_z

inherited

Definition at line 80 of file wall_model.f90.

◆ u_s

type(vector_t) cai_sagaut_model_ii::cai_sagaut_model_ii_t::u_s

Definition at line 73 of file cai_sagaut_model_ii.f90.

◆ v_s

type(vector_t) cai_sagaut_model_ii::cai_sagaut_model_ii_t::v_s

Definition at line 73 of file cai_sagaut_model_ii.f90.

◆ w_s

type(vector_t) cai_sagaut_model_ii::cai_sagaut_model_ii_t::w_s

Definition at line 73 of file cai_sagaut_model_ii.f90.

The documentation for this type was generated from the following file:

/home/runner/work/neko/neko/src/wall_models/cai_sagaut_model_ii.f90

Public Member Functions

Public Attributes

Detailed Description

Member Function/Subroutine Documentation

◆ compute() [1/2]

◆ compute() [2/2]

◆ compute_mag_field()

◆ compute_nu_and_rho()

◆ finalize() [1/2]

◆ finalize() [2/2]

◆ finalize_base()

◆ free() [1/2]

◆ free() [2/2]

◆ free_base()

◆ init() [1/2]

◆ init() [2/2]

◆ init_base()

◆ init_from_components()

◆ partial_init() [1/2]

◆ partial_init() [2/2]

◆ partial_init_base()

◆ setup_geometry()

◆ validate_single_sample()

Member Data Documentation

◆ b

◆ coef

◆ dof

◆ facet

◆ kappa

◆ msk

◆ msk_d

◆ mu

◆ n_nodes

◆ n_x

◆ n_y

◆ n_z

◆ nu

◆ p

◆ rho

◆ rho_w

◆ s

◆ sampler

◆ scheme_name

◆ tau_field

◆ tau_x

◆ tau_y

◆ tau_z

◆ u_s

◆ v_s

◆ w_s