Loading [MathJax]/extensions/tex2jax.js
Neko 0.9.99
A portable framework for high-order spectral element flow simulations
All Classes Namespaces Files Functions Variables Typedefs Enumerator Macros Pages
blasius::blasius_t Type Referenceabstract

Blasius profile for inlet (vector valued). More...

Inheritance diagram for blasius::blasius_t:
Collaboration diagram for blasius::blasius_t:

Public Member Functions

procedure, pass(thisapply_scalar (this, x, n, t, tstep, strong)
 No-op scalar apply.
 
procedure, pass(thisapply_vector (this, x, y, z, n, t, tstep, strong)
 Apply blasius conditions (vector valued)
 
procedure, pass(thisapply_scalar_dev (this, x_d, t, tstep, strong)
 No-op scalar apply (device version)
 
procedure, pass(thisapply_vector_dev (this, x_d, y_d, z_d, t, tstep, strong)
 Apply blasius conditions (vector valued) (device version)
 
procedure, pass(thisset_params (this, uinf, delta, type)
 Set Blasius parameters.
 
procedure, pass(thisinit (this, coef, json)
 Constructor.
 
procedure, pass(thisinit_from_components (this, coef, delta, uinf, approximation)
 Constructor from components.
 
procedure, pass(thisfree (this)
 Destructor.
 
procedure, pass(thisfinalize (this)
 Finalize.
 
procedure, pass(thisinit_base (this, coef)
 Constructor.
 
procedure, pass(thisfree_base (this)
 Destructor.
 
procedure, pass(thismark_facet (this, facet, el)
 Mark a facet on an element as part of the boundary condition.
 
procedure, pass(thismark_facets (this, facet_list)
 Mark all facets from a (facet, element) tuple list.
 
procedure, pass(thismark_zone (this, bc_zone)
 Mark all facets from a zone.
 
procedure, pass(thisfinalize_base (this, only_facets)
 Finalize the construction of the bc by populating the msk and facet arrays.
 
procedure, pass(thisapply_scalar_generic (this, x, n, t, tstep)
 Apply the boundary condition to a scalar field. Dispatches to the CPU or the device version.
 
procedure, pass(thisapply_vector_generic (this, x, y, z, n, t, tstep)
 Apply the boundary condition to a vector field. Dispatches to the CPU or the device version.
 
procedure, pass(thisdebug_mask_ (this, file_name)
 Write a field showing the mask of the bcs.
 
procedure(bc_apply_scalar), deferred, pass apply_scalar (this, x, n, t, tstep, strong)
 Apply the boundary condition to a scalar field on the CPU.
 
procedure(bc_apply_vector), deferred, pass apply_vector (this, x, y, z, n, t, tstep, strong)
 Apply the boundary condition to a vector field on the CPU.
 
procedure(bc_apply_scalar_dev), deferred, pass apply_scalar_dev (this, x_d, t, tstep, strong)
 Device version of apply_scalar on the device.
 
procedure(bc_apply_vector_dev), deferred, pass apply_vector_dev (this, x_d, y_d, z_d, t, tstep, strong)
 Device version of apply_vector on the device.
 
procedure(bc_destructor), deferred, pass free (this)
 Deferred destructor.
 
procedure(bc_constructor), deferred, pass init (this, coef, json)
 Deferred constructor.
 
procedure(bc_finalize), deferred, pass finalize (this)
 Deferred finalizer.
 

Public Attributes

real(kind=rp), dimension(3) uinf = [0d0, 0d0, 0d0]
 
real(kind=rp) delta
 
integer, dimension(:), allocatable msk
 The linear index of each node in each boundary facet.
 
integer, dimension(:), allocatable facet
 A list of facet ids (1 to 6), one for each element in msk.
 
type(dofmap_t), pointer dof => null()
 Map of degrees of freedom.
 
type(coef_t), pointer coef => null()
 SEM coefficients.
 
type(mesh_t), pointer msh => null()
 The mesh.
 
type(space_t), pointer xh => null()
 The function space.
 
type(stack_i4t2_t) marked_facet
 Index tuples (facet, element) marked as part of the boundary condition.
 
type(c_ptr) msk_d = C_NULL_PTR
 Device pointer for msk.
 
type(c_ptr) facet_d = C_NULL_PTR
 Device pointer for facet.
 
logical strong = .true.
 Wether the bc is strongly enforced. Essentially valid for all Dirichlet types of bcs. These need to be masked out for solvers etc, so that values are not affected. Mixed bcs are, by convention, weak.
 
logical updated = .false.
 Indicates wether the bc has been updated, for those BCs that need additional computations.
 

Static Public Attributes

procedure(blasius_profile), pointer, nopass bla => null()
 

Private Attributes

type(c_ptr), private blax_d = C_NULL_PTR
 
type(c_ptr), private blay_d = C_NULL_PTR
 
type(c_ptr), private blaz_d = C_NULL_PTR
 

Detailed Description

Warning
Works only with axis-aligned sugar-cube elements and assumes the boundary is alinged with zOy.

Definition at line 52 of file blasius.f90.

Member Function/Subroutine Documentation

◆ apply_scalar() [1/2]

procedure(bc_apply_scalar), deferred, pass bc::bc_t::apply_scalar ( class(bc_t), intent(inout this,
real(kind=rp), dimension(n), intent(inout x,
integer, intent(in n,
real(kind=rp), intent(in), optional  t,
integer, intent(in), optional  tstep,
logical, intent(in), optional  strong 
)
pure virtualinherited

Definition at line 108 of file bc.f90.

◆ apply_scalar() [2/2]

procedure, pass(this) blasius::blasius_t::apply_scalar ( class(blasius_t), intent(inout this,
real(kind=rp), dimension(n), intent(inout x,
integer, intent(in n,
real(kind=rp), intent(in), optional  t,
integer, intent(in), optional  tstep,
logical, intent(in), optional  strong 
)

Definition at line 60 of file blasius.f90.

◆ apply_scalar_dev() [1/2]

procedure(bc_apply_scalar_dev), deferred, pass bc::bc_t::apply_scalar_dev ( class(bc_t), intent(inout), target  this,
type(c_ptr)  x_d,
real(kind=rp), intent(in), optional  t,
integer, intent(in), optional  tstep,
logical, intent(in), optional  strong 
)
pure virtualinherited

Definition at line 112 of file bc.f90.

◆ apply_scalar_dev() [2/2]

procedure, pass(this) blasius::blasius_t::apply_scalar_dev ( class(blasius_t), intent(inout), target  this,
type(c_ptr)  x_d,
real(kind=rp), intent(in), optional  t,
integer, intent(in), optional  tstep,
logical, intent(in), optional  strong 
)

Definition at line 62 of file blasius.f90.

◆ apply_scalar_generic()

procedure, pass(this) bc::bc_t::apply_scalar_generic ( class(bc_t), intent(inout this,
real(kind=rp), dimension(n), intent(inout x,
integer, intent(in n,
real(kind=rp), intent(in), optional  t,
integer, intent(in), optional  tstep 
)
inherited
Parameters
xThe x comp of the field for which to apply the bc.
yThe y comp of the field for which to apply the bc.
zThe z comp of the field for which to apply the bc.
nThe size of x, y, and z.
tCurrent time.
tstepThe current time iteration.

Definition at line 101 of file bc.f90.

◆ apply_vector() [1/2]

procedure(bc_apply_vector), deferred, pass bc::bc_t::apply_vector ( class(bc_t), intent(inout this,
real(kind=rp), dimension(n), intent(inout x,
real(kind=rp), dimension(n), intent(inout y,
real(kind=rp), dimension(n), intent(inout z,
integer, intent(in n,
real(kind=rp), intent(in), optional  t,
integer, intent(in), optional  tstep,
logical, intent(in), optional  strong 
)
pure virtualinherited

Definition at line 110 of file bc.f90.

◆ apply_vector() [2/2]

procedure, pass(this) blasius::blasius_t::apply_vector ( class(blasius_t), intent(inout this,
real(kind=rp), dimension(n), intent(inout x,
real(kind=rp), dimension(n), intent(inout y,
real(kind=rp), dimension(n), intent(inout z,
integer, intent(in n,
real(kind=rp), intent(in), optional  t,
integer, intent(in), optional  tstep,
logical, intent(in), optional  strong 
)

Definition at line 61 of file blasius.f90.

◆ apply_vector_dev() [1/2]

procedure(bc_apply_vector_dev), deferred, pass bc::bc_t::apply_vector_dev ( class(bc_t), intent(inout), target  this,
type(c_ptr)  x_d,
type(c_ptr)  y_d,
type(c_ptr)  z_d,
real(kind=rp), intent(in), optional  t,
integer, intent(in), optional  tstep,
logical, intent(in), optional  strong 
)
pure virtualinherited

Definition at line 114 of file bc.f90.

◆ apply_vector_dev() [2/2]

procedure, pass(this) blasius::blasius_t::apply_vector_dev ( class(blasius_t), intent(inout), target  this,
type(c_ptr)  x_d,
type(c_ptr)  y_d,
type(c_ptr)  z_d,
real(kind=rp), intent(in), optional  t,
integer, intent(in), optional  tstep,
logical, intent(in), optional  strong 
)

Definition at line 63 of file blasius.f90.

◆ apply_vector_generic()

procedure, pass(this) bc::bc_t::apply_vector_generic ( class(bc_t), intent(inout this,
real(kind=rp), dimension(n), intent(inout x,
real(kind=rp), dimension(n), intent(inout y,
real(kind=rp), dimension(n), intent(inout z,
integer, intent(in n,
real(kind=rp), intent(in), optional  t,
integer, intent(in), optional  tstep 
)
inherited
Parameters
xThe x comp of the field for which to apply the bc.
yThe y comp of the field for which to apply the bc.
zThe z comp of the field for which to apply the bc.
nThe size of x, y, and z.
tCurrent time.
tstepThe current time iteration.

Definition at line 104 of file bc.f90.

◆ debug_mask_()

procedure, pass(this) bc::bc_t::debug_mask_ ( class(bc_t), intent(inout this,
character(len=*), intent(in file_name 
)
inherited

The mask will be marked with 1.

Parameters
file_nameThe name of the fld file.

Definition at line 106 of file bc.f90.

◆ finalize() [1/2]

procedure(bc_finalize), deferred, pass bc::bc_t::finalize ( class(bc_t), intent(inout), target  this)
pure virtualinherited

Definition at line 120 of file bc.f90.

◆ finalize() [2/2]

procedure, pass(this) blasius::blasius_t::finalize ( class(blasius_t), intent(inout), target  this)

Definition at line 73 of file blasius.f90.

◆ finalize_base()

procedure, pass(this) bc::bc_t::finalize_base ( class(bc_t), intent(inout), target  this,
logical, intent(in), optional  only_facets 
)
inherited
Parameters
only_facets,ifthe bc is only to be applied on facets. Relevant for bcs where the normal direction is important and where and shared dofs should not be included.

This will linearize the marked facet's indicies in the msk array.

Definition at line 97 of file bc.f90.

◆ free() [1/2]

procedure(bc_destructor), deferred, pass bc::bc_t::free ( class(bc_t), intent(inout), target  this)
pure virtualinherited

Definition at line 116 of file bc.f90.

◆ free() [2/2]

procedure, pass(this) blasius::blasius_t::free ( class(blasius_t), intent(inout), target  this)

Definition at line 71 of file blasius.f90.

◆ free_base()

procedure, pass(this) bc::bc_t::free_base ( class(bc_t), intent(inout this)
inherited

Definition at line 88 of file bc.f90.

◆ init() [1/2]

procedure(bc_constructor), deferred, pass bc::bc_t::init ( class(bc_t), intent(inout), target  this,
type(coef_t), intent(in coef,
type(json_file), intent(inout json 
)
pure virtualinherited

Definition at line 118 of file bc.f90.

◆ init() [2/2]

procedure, pass(this) blasius::blasius_t::init ( class(blasius_t), intent(inout), target  this,
type(coef_t), intent(in coef,
type(json_file), intent(inout json 
)
Parameters
[in]coefThe SEM coefficients.
[in,out]jsonThe JSON object configuring the boundary condition.

Definition at line 66 of file blasius.f90.

◆ init_base()

procedure, pass(this) bc::bc_t::init_base ( class(bc_t), intent(inout this,
type(coef_t), intent(in), target  coef 
)
inherited
Parameters
dofMap of degrees of freedom.

Definition at line 86 of file bc.f90.

◆ init_from_components()

procedure, pass(this) blasius::blasius_t::init_from_components ( class(blasius_t), intent(inout), target  this,
type(coef_t), intent(in coef,
real(kind=rp)  delta,
real(kind=rp), dimension(3)  uinf,
character(len=*)  approximation 
)
Parameters
[in]coefThe SEM coefficients.
[in]deltaThe boundary layer thickness.
[in]uinfThe freestream velocity.
[in]approximationThe type of approximation for the profile.

Definition at line 68 of file blasius.f90.

◆ mark_facet()

procedure, pass(this) bc::bc_t::mark_facet ( class(bc_t), intent(inout this,
integer, intent(in facet,
integer, intent(in el 
)
inherited
Parameters
facetThe index of the facet.
elThe index of the element.

Definition at line 90 of file bc.f90.

◆ mark_facets()

procedure, pass(this) bc::bc_t::mark_facets ( class(bc_t), intent(inout this,
type(stack_i4t2_t), intent(inout facet_list 
)
inherited
Parameters
facet_listThe list of tuples.

Definition at line 92 of file bc.f90.

◆ mark_zone()

procedure, pass(this) bc::bc_t::mark_zone ( class(bc_t), intent(inout this,
class(facet_zone_t), intent(in bc_zone 
)
inherited
Parameters
bc_zoneBoundary zone to be marked.

Definition at line 94 of file bc.f90.

◆ set_params()

procedure, pass(this) blasius::blasius_t::set_params ( class(blasius_t), intent(inout this,
real(kind=rp), dimension(3), intent(in uinf,
real(kind=rp), intent(in delta,
character(len=*)  type 
)

Definition at line 64 of file blasius.f90.

Member Data Documentation

◆ bla

procedure(blasius_profile), pointer, nopass blasius::blasius_t::bla => null()
static

Definition at line 55 of file blasius.f90.

◆ blax_d

type(c_ptr), private blasius::blasius_t::blax_d = C_NULL_PTR
private

Definition at line 56 of file blasius.f90.

◆ blay_d

type(c_ptr), private blasius::blasius_t::blay_d = C_NULL_PTR
private

Definition at line 57 of file blasius.f90.

◆ blaz_d

type(c_ptr), private blasius::blasius_t::blaz_d = C_NULL_PTR
private

Definition at line 58 of file blasius.f90.

◆ coef

type(coef_t), pointer bc::bc_t::coef => null()
inherited

Definition at line 65 of file bc.f90.

◆ delta

real(kind=rp) blasius::blasius_t::delta

Definition at line 54 of file blasius.f90.

◆ dof

type(dofmap_t), pointer bc::bc_t::dof => null()
inherited

Definition at line 63 of file bc.f90.

◆ facet

integer, dimension(:), allocatable bc::bc_t::facet
inherited

Definition at line 61 of file bc.f90.

◆ facet_d

type(c_ptr) bc::bc_t::facet_d = C_NULL_PTR
inherited

Definition at line 75 of file bc.f90.

◆ marked_facet

type(stack_i4t2_t) bc::bc_t::marked_facet
inherited

Definition at line 71 of file bc.f90.

◆ msh

type(mesh_t), pointer bc::bc_t::msh => null()
inherited

Definition at line 67 of file bc.f90.

◆ msk

integer, dimension(:), allocatable bc::bc_t::msk
inherited

Definition at line 59 of file bc.f90.

◆ msk_d

type(c_ptr) bc::bc_t::msk_d = C_NULL_PTR
inherited

Definition at line 73 of file bc.f90.

◆ strong

logical bc::bc_t::strong = .true.
inherited

Definition at line 80 of file bc.f90.

◆ uinf

real(kind=rp), dimension(3) blasius::blasius_t::uinf = [0d0, 0d0, 0d0]

Definition at line 53 of file blasius.f90.

◆ updated

logical bc::bc_t::updated = .false.
inherited

Definition at line 83 of file bc.f90.

◆ xh

type(space_t), pointer bc::bc_t::xh => null()
inherited

Definition at line 69 of file bc.f90.


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