fossil_predicates

Source: src/lib/fossil_predicates.f90

Dependencies

Contents

• predicates_initialize
• two_product
• split3
• split4
• grow_expansion
• two_sum
• orient3d
• orient3d_xyz
• round26
• orient2d
• orient2d_xy
• truncate17
• truncate18
• incircle
• insphere

Variables

Name	Type	Attributes	Description
splitter	real(kind=R8P)	save
epsilon_	real(kind=R8P)	save
o3derrboundA	real(kind=R8P)	save
o3derrboundB	real(kind=R8P)	save
o3derrboundC	real(kind=R8P)	save
is_initialized	logical	save

Subroutines

predicates_initialize

subroutine predicates_initialize()

two_product

Attributes: pure

subroutine two_product(a, b, p, e)

Arguments

Name	Type	Intent	Attributes	Description
a	real(kind=R8P)	in
b	real(kind=R8P)	in
p	real(kind=R8P)	out
e	real(kind=R8P)	out

Call graph

split3

Attributes: pure

subroutine split3(x, piece)

Arguments

Name	Type	Intent	Attributes	Description
x	real(kind=R8P)	in
piece	real(kind=R8P)	out

Call graph

split4

Attributes: pure

subroutine split4(x, piece)

Arguments

Name	Type	Intent	Attributes	Description
x	real(kind=R8P)	in
piece	real(kind=R8P)	out

Call graph

grow_expansion

Attributes: pure

subroutine grow_expansion(e, n, b)

Arguments

Name	Type	Intent	Attributes	Description
e	real(kind=R8P)	inout
n	integer(kind=I4P)	inout
b	real(kind=R8P)	in

Call graph

two_sum

Attributes: pure

subroutine two_sum(a, b, s, err)

Arguments

Name	Type	Intent	Attributes	Description
a	real(kind=R8P)	in
b	real(kind=R8P)	in
s	real(kind=R8P)	out
err	real(kind=R8P)	out

Call graph

Functions

orient3d

Attributes: pure

Returns: real(kind=R8P)

function orient3d(a, b, c, d) result(sign_volume)

Arguments

Name	Type	Intent	Attributes	Description
a	type(vector_R8P)	in
b	type(vector_R8P)	in
c	type(vector_R8P)	in
d	type(vector_R8P)	in

Call graph

orient3d_xyz

Attributes: pure

Returns: real(kind=R8P)

function orient3d_xyz(a, b, c, d) result(sign_volume)

Arguments

Name	Type	Intent	Attributes	Description
a	real(kind=R8P)	in
b	real(kind=R8P)	in
c	real(kind=R8P)	in
d	real(kind=R8P)	in

Call graph

round26

Attributes: pure

Returns: real(kind=R8P)

function round26(x) result(t)

Arguments

Name	Type	Intent	Attributes	Description
x	real(kind=R8P)	in

Call graph

orient2d

Attributes: pure

Returns: real(kind=R8P)

function orient2d(a, b, c) result(sign_area)

Arguments

Name	Type	Intent	Attributes	Description
a	type(vector_R8P)	in
b	type(vector_R8P)	in
c	type(vector_R8P)	in

Call graph

orient2d_xy

Attributes: pure

Returns: real(kind=R8P)

function orient2d_xy(ax, ay, bx, by, cx, cy) result(sign_area)

Arguments

Name	Type	Intent	Attributes	Description
ax	real(kind=R8P)	in
ay	real(kind=R8P)	in
bx	real(kind=R8P)	in
by	real(kind=R8P)	in
cx	real(kind=R8P)	in
cy	real(kind=R8P)	in

Call graph

truncate17

Attributes: pure

Returns: real(kind=R8P)

function truncate17(x) result(t)

Arguments

Name	Type	Intent	Attributes	Description
x	real(kind=R8P)	in

Call graph

truncate18

Attributes: pure

Returns: real(kind=R8P)

function truncate18(x) result(t)

Arguments

Name	Type	Intent	Attributes	Description
x	real(kind=R8P)	in

Call graph

incircle

Attributes: pure

Returns: real(kind=R8P)

function incircle(a, b, c, d) result(in_or_out)

Arguments

Name	Type	Intent	Attributes	Description
a	type(vector_R8P)	in
b	type(vector_R8P)	in
c	type(vector_R8P)	in
d	type(vector_R8P)	in

Call graph

insphere

Attributes: pure

Returns: real(kind=R8P)

function insphere(a, b, c, d, e) result(in_or_out)

Arguments

Name	Type	Intent	Attributes	Description
a	type(vector_R8P)	in
b	type(vector_R8P)	in
c	type(vector_R8P)	in
d	type(vector_R8P)	in
e	type(vector_R8P)	in