Defines a tetrahedral element.
|
subroutine | tet_init (this, id, p1, p2, p3, p4) |
| Create a tetrahedral element based upon four points.
|
|
subroutine | tet_facet_id (this, t, side) |
| Return the facet id for face i as a 3-tuple t.
|
|
subroutine | tet_facet_order (this, t, side) |
| Return the ordered points for face i as a 3-tuple t.
|
|
subroutine | tet_edge_id (this, t, side) |
| Return the edge id for an edge i as a 2-tuple t.
|
|
real(kind=dp) function | tet_diameter (this) |
| Compute the diameter of a tetrahedral element.
|
|
type(point_t) function | tet_centroid (this) |
| Compute the centroid of a tetrahedral element.
|
|
pure logical function | tet_equal (this, other) |
| Check if two tet elements are equal.
|
|
|
integer, parameter, public | neko_tet_npts = 4 |
| Number of points.
|
|
integer, parameter, public | neko_tet_nfcs = 4 |
| Number of faces.
|
|
integer, parameter, public | neko_tet_neds = 6 |
| Number of edges.
|
|
integer, parameter, public | neko_tet_gdim = 3 |
| Geometric dimension.
|
|
integer, dimension(3, 4), parameter | face_nodes = reshape((/1,3,4, 2,3,4, 1,2,4, 1,2,3/), (/3,4/)) |
| Face node ids.
|
|
integer, dimension(2, 6), parameter | edge_nodes = reshape((/1,2, 1,3, 2,3, 3,4, 1,4, 2,4/), (/2,6/)) |
| Edge node ids.
|
|
◆ tet_centroid()
◆ tet_diameter()
◆ tet_edge_id()
◆ tet_equal()
- Note
- Based on coordinates not global ids
Definition at line 268 of file tet.f90.
◆ tet_facet_id()
◆ tet_facet_order()
◆ tet_init()
subroutine tet::tet_init |
( |
class(tet_t), intent(inout) |
this, |
|
|
integer, intent(inout) |
id, |
|
|
type(point_t), intent(in), target |
p1, |
|
|
type(point_t), intent(in), target |
p2, |
|
|
type(point_t), intent(in), target |
p3, |
|
|
type(point_t), intent(in), target |
p4 |
|
) |
| |
|
private |
◆ edge_nodes
integer, dimension(2, 6), parameter tet::edge_nodes = reshape((/1,2, 1,3, 2,3, 3,4, 1,4, 2,4/), (/2,6/)) |
|
private |
Edge numbering
2 + 3 ^ s
\ /|\ / |
/ | \ |
/ | \ |
+.1.|...+ +----> r
\ 4 / /
5--> \ | / <--6 /
\|/ /
+ t
Definition at line 114 of file tet.f90.
◆ face_nodes
integer, dimension(3, 4), parameter tet::face_nodes = reshape((/1,3,4, 2,3,4, 1,2,4, 1,2,3/), (/3,4/)) |
Face numbering
+ 4 ^ s
/|\ / |
/ | \ |
/ 1|2 \ |
+...|...+ +----> r
\ |3 / /
\ | / /
\|/ /
+ t
- Note
- Local node numbering (points)
Definition at line 92 of file tet.f90.
◆ neko_tet_gdim
◆ neko_tet_neds
◆ neko_tet_nfcs
◆ neko_tet_npts