Public Member Functions
procedure	init (this)

procedure	final (this)

procedure	setbcinfo (this, mesh)

procedure	applybc_progvars_lc (this, domid, ddens, momx, momy, momz, therm, dens_hyd, pres_hyd, gsqrt, gsqrth, g11, g12, g22, g13, g23, nx, ny, nz, vmapm, vmapp, vmapb, lmesh, elem, lmesh2d, elem2d)
	Set exterior values at element boundaries to evaluate inviscid numerical fluxes.

procedure	applybc_numdiff_odd_lc (this, gxvar, gyvar, gzvar, is_bound, varid, domid, nx, ny, nz, vmapm, vmapp, vmapb, lmesh, elem)

procedure	applybc_numdiff_even_lc (this, var, is_bound, varid, domid, nx, ny, nz, vmapm, vmapp, vmapb, lmesh, elem)

procedure	applybc_grad_tbvars_lc (this, domid, ddens, momx, momy, momz, pt, pres, dens_hyd, pres_hyd, rtot, cptot, gsqrt, gsqrth, g11, g12, g22, g13, g23, nx, ny, nz, vmapm, vmapp, vmapb, lmesh, elem, lmesh2d, elem2d)
	Set exterior values at boundaries for the turbulent schemes.

procedure	applybc_grad_tbstress_lc (this, domid, t11, t12, t13, t21, t22, t23, t31, t32, t33, df1, df2, df3, gsqrt, gsqrth, g11, g12, g22, g13, g23, nx, ny, nz, vmapm, vmapp, vmapb, lmesh, elem, lmesh2d, elem2d)
	Set exterior shear-stress tensor and heat flux at boundaries for the turbulent schemes.

procedure	inquire_bound_flag (this, is_bound, domid, vmapm, vmapp, vmapb, lmesh, elem)

Public Attributes
type(meshbndinfo), dimension(:), allocatable	velbc_list

type(meshbndinfo), dimension(:), allocatable	thermalbc_list

integer, dimension(:), allocatable	velbc_ids

integer, dimension(:), allocatable	thermalbc_ids

real(rp), dimension(:), allocatable	thermal_fixval

Detailed Description

Definition at line 55 of file scale_atm_dyn_dgm_bnd.F90.

Member Function/Subroutine Documentation

◆ init()

procedure scale_atm_dyn_dgm_bnd::atmdynbnd::init ( class(atmdynbnd), intent(inout) this )

Definition at line 63 of file scale_atm_dyn_dgm_bnd.F90.

◆ final()

procedure scale_atm_dyn_dgm_bnd::atmdynbnd::final ( class(atmdynbnd), intent(inout) this )

Definition at line 64 of file scale_atm_dyn_dgm_bnd.F90.

◆ setbcinfo()

procedure scale_atm_dyn_dgm_bnd::atmdynbnd::setbcinfo	(	class(atmdynbnd), intent(inout)	this,
		class(meshbase), intent(in), target	mesh )

Definition at line 65 of file scale_atm_dyn_dgm_bnd.F90.

◆ applybc_progvars_lc()

procedure scale_atm_dyn_dgm_bnd::atmdynbnd::applybc_progvars_lc	(	class(atmdynbnd), intent(in)	this,
		integer, intent(in)	domid,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	ddens,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	momx,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	momy,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	momz,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	therm,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	dens_hyd,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	pres_hyd,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	gsqrt,
		real(rp), dimension(elem2d%np,lmesh2d%ne), intent(in)	gsqrth,
		real(rp), dimension(elem2d%np,lmesh2d%ne), intent(in)	g11,
		real(rp), dimension(elem2d%np,lmesh2d%ne), intent(in)	g12,
		real(rp), dimension(elem2d%np,lmesh2d%ne), intent(in)	g22,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	g13,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	g23,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	nx,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	ny,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	nz,
		integer, dimension(elem%nfptot*lmesh%ne), intent(in)	vmapm,
		integer, dimension(elem%nfptot*lmesh%ne), intent(in)	vmapp,
		integer, dimension(:), intent(in)	vmapb,
		class(localmesh3d), intent(in)	lmesh,
		class(elementbase3d), intent(in)	elem,
		class(localmesh2d), intent(in)	lmesh2d,
		class(elementbase2d), intent(in)	elem2d )

Set exterior values at element boundaries to evaluate inviscid numerical fluxes.

Definition at line 66 of file scale_atm_dyn_dgm_bnd.F90.

◆ applybc_numdiff_odd_lc()

procedure scale_atm_dyn_dgm_bnd::atmdynbnd::applybc_numdiff_odd_lc	(	class(atmdynbnd), intent(in)	this,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	gxvar,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	gyvar,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	gzvar,
		logical, dimension(elem%nfptot*lmesh%ne), intent(out)	is_bound,
		integer, intent(in)	varid,
		integer, intent(in)	domid,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	nx,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	ny,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	nz,
		integer, dimension(elem%nfptot*lmesh%ne), intent(in)	vmapm,
		integer, dimension(elem%nfptot*lmesh%ne), intent(in)	vmapp,
		integer, dimension(:), intent(in)	vmapb,
		class(localmesh3d), intent(in)	lmesh,
		class(elementbase3d), intent(in)	elem )

Definition at line 67 of file scale_atm_dyn_dgm_bnd.F90.

◆ applybc_numdiff_even_lc()

procedure scale_atm_dyn_dgm_bnd::atmdynbnd::applybc_numdiff_even_lc	(	class(atmdynbnd), intent(in)	this,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	var,
		logical, dimension(elem%nfptot*lmesh%ne), intent(out)	is_bound,
		integer, intent(in)	varid,
		integer, intent(in)	domid,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	nx,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	ny,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	nz,
		integer, dimension(elem%nfptot*lmesh%ne), intent(in)	vmapm,
		integer, dimension(elem%nfptot*lmesh%ne), intent(in)	vmapp,
		integer, dimension(:), intent(in)	vmapb,
		class(localmesh3d), intent(in)	lmesh,
		class(elementbase3d), intent(in)	elem )

Definition at line 68 of file scale_atm_dyn_dgm_bnd.F90.

◆ applybc_grad_tbvars_lc()

procedure scale_atm_dyn_dgm_bnd::atmdynbnd::applybc_grad_tbvars_lc	(	class(atmdynbnd), intent(in)	this,
		integer, intent(in)	domid,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	ddens,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	momx,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	momy,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	momz,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	pt,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	pres,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	dens_hyd,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	pres_hyd,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	rtot,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	cptot,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	gsqrt,
		real(rp), dimension(elem2d%np,lmesh2d%ne), intent(in)	gsqrth,
		real(rp), dimension(elem2d%np,lmesh2d%ne), intent(in)	g11,
		real(rp), dimension(elem2d%np,lmesh2d%ne), intent(in)	g12,
		real(rp), dimension(elem2d%np,lmesh2d%ne), intent(in)	g22,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	g13,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	g23,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	nx,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	ny,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	nz,
		integer, dimension(elem%nfptot*lmesh%ne), intent(in)	vmapm,
		integer, dimension(elem%nfptot*lmesh%ne), intent(in)	vmapp,
		integer, dimension(:), intent(in)	vmapb,
		class(localmesh3d), intent(in)	lmesh,
		class(elementbase3d), intent(in)	elem,
		class(localmesh2d), intent(in)	lmesh2d,
		class(elementbase2d), intent(in)	elem2d )

Set exterior values at boundaries for the turbulent schemes.

Definition at line 69 of file scale_atm_dyn_dgm_bnd.F90.

◆ applybc_grad_tbstress_lc()

procedure scale_atm_dyn_dgm_bnd::atmdynbnd::applybc_grad_tbstress_lc	(	class(atmdynbnd), intent(in)	this,
		integer, intent(in)	domid,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	t11,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	t12,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	t13,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	t21,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	t22,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	t23,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	t31,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	t32,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	t33,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	df1,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	df2,
		real(rp), dimension(elem%np*lmesh%nea), intent(inout)	df3,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	gsqrt,
		real(rp), dimension(elem2d%np,lmesh2d%ne), intent(in)	gsqrth,
		real(rp), dimension(elem2d%np,lmesh2d%ne), intent(in)	g11,
		real(rp), dimension(elem2d%np,lmesh2d%ne), intent(in)	g12,
		real(rp), dimension(elem2d%np,lmesh2d%ne), intent(in)	g22,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	g13,
		real(rp), dimension(elem%np*lmesh%nea), intent(in)	g23,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	nx,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	ny,
		real(rp), dimension(elem%nfptot*lmesh%ne), intent(in)	nz,
		integer, dimension(elem%nfptot*lmesh%ne), intent(in)	vmapm,
		integer, dimension(elem%nfptot*lmesh%ne), intent(in)	vmapp,
		integer, dimension(:), intent(in)	vmapb,
		class(localmesh3d), intent(in)	lmesh,
		class(elementbase3d), intent(in)	elem,
		class(localmesh2d), intent(in)	lmesh2d,
		class(elementbase2d), intent(in)	elem2d )

Set exterior shear-stress tensor and heat flux at boundaries for the turbulent schemes.

Note: This codes are tentatively implementated. We need to check whether the formulations is valid for the case when general vertical coordinate is introduced.

Definition at line 70 of file scale_atm_dyn_dgm_bnd.F90.

◆ inquire_bound_flag()

procedure scale_atm_dyn_dgm_bnd::atmdynbnd::inquire_bound_flag	(	class(atmdynbnd), intent(in)	this,
		logical, dimension(elem%nfptot*lmesh%ne), intent(out)	is_bound,
		integer, intent(in)	domid,
		integer, dimension(elem%nfptot*lmesh%ne), intent(in)	vmapm,
		integer, dimension(elem%nfptot*lmesh%ne), intent(in)	vmapp,
		integer, dimension(:), intent(in)	vmapb,
		class(localmesh3d), intent(in)	lmesh,
		class(elementbase3d), intent(in)	elem )

Definition at line 71 of file scale_atm_dyn_dgm_bnd.F90.

Member Data Documentation

◆ velbc_list

type(meshbndinfo), dimension(:), allocatable scale_atm_dyn_dgm_bnd::atmdynbnd::velbc_list

Definition at line 56 of file scale_atm_dyn_dgm_bnd.F90.

56 type(MeshBndInfo), allocatable :: VelBC_list(:)

◆ thermalbc_list

type(meshbndinfo), dimension(:), allocatable scale_atm_dyn_dgm_bnd::atmdynbnd::thermalbc_list

Definition at line 57 of file scale_atm_dyn_dgm_bnd.F90.

57 type(MeshBndInfo), allocatable :: ThermalBC_list(:)

◆ velbc_ids

integer, dimension(:), allocatable scale_atm_dyn_dgm_bnd::atmdynbnd::velbc_ids

Definition at line 59 of file scale_atm_dyn_dgm_bnd.F90.

59 integer, allocatable:: velBC_ids(:)

◆ thermalbc_ids

integer, dimension(:), allocatable scale_atm_dyn_dgm_bnd::atmdynbnd::thermalbc_ids

Definition at line 60 of file scale_atm_dyn_dgm_bnd.F90.

60 integer, allocatable :: thermalBC_ids(:)

◆ thermal_fixval

real(rp), dimension(:), allocatable scale_atm_dyn_dgm_bnd::atmdynbnd::thermal_fixval

Definition at line 61 of file scale_atm_dyn_dgm_bnd.F90.

61 real(RP), allocatable :: thermal_fixval(:)

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

scale_atm_dyn_dgm_bnd.F90

Public Member Functions

Public Attributes