mod_bc_data Module

Module to set boundary conditions from user data

Uses

- mod_lookup_table
- mod_global_parameters
Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Used by

Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Variables

Type	Visibility	Attributes		Name		Initial
integer,	protected,	allocatable	::	bc_data_ix(:,:)			Integer array for indexing lookup tables per variable per direction
logical,	protected		::	bc_data_time_varying	=	.false.	Whether boundary condition data is time varying
logical,	protected		::	bc_phy_first_row	=	.false.
character(len=std_len),	protected		::	boundary_data_file_name			data file name
logical,	protected		::	boundary_data_primitive	=	.false.
logical,	protected		::	interp_phy_first_row	=	.true.
type(LT_t),	private		::	lt_1d(max_boundary_conds)
type(LT2_t),	private		::	lt_2d(max_boundary_conds)
type(LT3_t),	private		::	lt_3d(max_boundary_conds)
integer,	private,	parameter	::	max_boundary_conds	=	10

Derived Types

type, private :: bc_data_t

Components

Type	Visibility	Attributes		Name		Initial
double precision,	public		::	dx(3)
integer,	public		::	n_points(3)
integer,	public		::	n_variables
character(len=40),	public,	allocatable	::	names(:)
double precision,	public		::	origin(3)
double precision,	public,	allocatable	::	values(:,:,:,:)

Functions

public elemental function bc_data_get_2d(n_bc, x1, qt) result(val)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	n_bc
double precision,	intent(in)			::	x1
double precision,	intent(in)			::	qt

Return Value double precision

public elemental function bc_data_get_3d(n_bc, x1, x2, qt) result(val)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	n_bc
double precision,	intent(in)			::	x1
double precision,	intent(in)			::	x2
double precision,	intent(in)			::	qt

Return Value double precision

Subroutines

public subroutine bc_data_init()

Arguments

None

public subroutine bc_data_set(qt, ixImin1, ixImin2, ixImin3, ixImax1, ixImax2, ixImax3, ixOmin1, ixOmin2, ixOmin3, ixOmax1, ixOmax2, ixOmax3, iB, w, x)

Set boundary conditions according to user data

Arguments

Type	Intent	Optional	Attributes		Name
double precision,	intent(in)			::	qt
integer,	intent(in)			::	ixImin1
integer,	intent(in)			::	ixImin2
integer,	intent(in)			::	ixImin3
integer,	intent(in)			::	ixImax1
integer,	intent(in)			::	ixImax2
integer,	intent(in)			::	ixImax3
integer,	intent(in)			::	ixOmin1
integer,	intent(in)			::	ixOmin2
integer,	intent(in)			::	ixOmin3
integer,	intent(in)			::	ixOmax1
integer,	intent(in)			::	ixOmax2
integer,	intent(in)			::	ixOmax3
integer,	intent(in)			::	iB
double precision,	intent(inout)			::	w(ixImin1:ixImax1,ixImin2:ixImax2,ixImin3:ixImax3,1:nw)
double precision,	intent(in)			::	x(ixImin1:ixImax1,ixImin2:ixImax2,ixImin3:ixImax3,1:ndim)

private subroutine bc_read_params(files)

Read this module"s parameters from a file

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	files(:)

private subroutine read_vtk_structured_points(fname, bc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	fname
type(bc_data_t),	intent(out)			::	bc