tools_mesh_basics Module

Uses

- class_connectivity
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. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

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. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Contents

Variables

icylinder_ iplane_ isphere_ iunknown_

Interfaces

geom_cell geom_diff geom_face geom_hex_dihedral_angle geom_hex_quality geom_tet_center geom_tet_dihedral_angle geom_tet_quality geom_tet_volume

Variables

Type	Visibility	Attributes		Name		Initial
integer,	private,	parameter	::	icylinder_	=	2
integer,	private,	parameter	::	iplane_	=	1
integer,	private,	parameter	::	isphere_	=	3
integer,	private,	parameter	::	iunknown_	=	0

Interfaces

interface

public module subroutine geom_cell(verts, faces, cells, v2f, v2c, f2c, ncd, cell_cntr, vol, quiet)

Arguments

Type	Intent	Optional	Attributes		Name
type(vertex),	intent(in),		allocatable	::	verts(:)
type(face),	intent(in),		allocatable	::	faces(:)
type(cell),	intent(in),		allocatable	::	cells(:)
type(connectivity),	intent(in)			::	v2f
type(connectivity),	intent(in)			::	v2c
type(connectivity),	intent(in)			::	f2c
integer,	intent(in)			::	ncd
type(vector),	intent(out),		allocatable	::	cell_cntr(:)
real(kind=psb_dpk_),	intent(out),		allocatable	::	vol(:)
logical,	intent(in),	optional		::	quiet

interface

public module subroutine geom_diff(faces, f2b, face_cntr, af, cell_cntr, df, dist, int_fact)

Arguments

Type	Intent	Optional	Attributes		Name
type(face),	intent(in),		allocatable	::	faces(:)
type(connectivity),	intent(in)			::	f2b
type(vector),	intent(in),		allocatable	::	face_cntr(:)
type(vector),	intent(in),		allocatable	::	af(:)
type(vector),	intent(in),		allocatable	::	cell_cntr(:)
type(vector),	intent(out),		allocatable	::	df(:)
real(kind=psb_dpk_),	intent(out),		allocatable	::	dist(:)
real(kind=psb_dpk_),	intent(out),		allocatable	::	int_fact(:)

interface

public module subroutine geom_face(verts, v2f, ncd, face_cntr, af, area)

Arguments

Type	Intent	Optional	Attributes		Name
type(vertex),	intent(in),		allocatable	::	verts(:)
type(connectivity),	intent(in)			::	v2f
integer,	intent(in)			::	ncd
type(vector),	intent(out),		allocatable	::	face_cntr(:)
type(vector),	intent(out),		allocatable	::	af(:)
real(kind=psb_dpk_),	intent(out),		allocatable	::	area(:)

interface

public module subroutine geom_hex_dihedral_angle(af, adjacent, largest, smallest)

Arguments

Type	Intent	Optional	Attributes		Name
type(vector),	intent(in)			::	af(6)
integer,	intent(in)			::	adjacent(12,2)
real(kind=psb_dpk_),	intent(out)			::	largest
real(kind=psb_dpk_),	intent(out)			::	smallest

interface

public module function geom_hex_quality(verts, vol)

Arguments

Type Intent Optional Attributes Name

type(vertex), intent(in) :: verts(8)

real(kind=psb_dpk_), intent(in) :: vol

Return Value real(kind=psb_dpk_)

interface

public module function geom_tet_center(v1, v2, v3, v4)

Arguments

Type	Intent	Optional	Attributes		Name
type(vertex),	intent(in)			::	v1
type(vertex),	intent(in)			::	v2
type(vertex),	intent(in)			::	v3
type(vertex),	intent(in)			::	v4

Return Value type(vector)

interface

public module subroutine geom_tet_dihedral_angle(af, largest, smallest)

Arguments

Type	Intent	Optional	Attributes		Name
type(vector),	intent(in)			::	af(4)
real(kind=psb_dpk_),	intent(out)			::	largest
real(kind=psb_dpk_),	intent(out)			::	smallest

interface

public module function geom_tet_quality(v1, v2, v3, v4, vol)

Arguments

Type	Intent	Optional	Attributes		Name
type(vertex),	intent(in)			::	v1
type(vertex),	intent(in)			::	v2
type(vertex),	intent(in)			::	v3
type(vertex),	intent(in)			::	v4
real(kind=psb_dpk_),	intent(in)			::	vol

Return Value real(kind=psb_dpk_)

interface

public module function geom_tet_volume(v1, v2, v3, v4)

Arguments

Type	Intent	Optional	Attributes		Name
type(vertex),	intent(in)			::	v1
type(vertex),	intent(in)			::	v2
type(vertex),	intent(in)			::	v3
type(vertex),	intent(in)			::	v4

Return Value real(kind=psb_dpk_)