Skip to content

fossil_sign_bench_bodies ​

Source: src/tests/fossil_sign_bench_bodies.f90

Dependencies

Contents ​

Variables ​

NameTypeAttributesDescription
SB_FACEinteger(kind=I4P)parameter
SB_FLAT_EDGEinteger(kind=I4P)parameter
SB_EDGE_CONVEXinteger(kind=I4P)parameter
SB_EDGE_REENTRANTinteger(kind=I4P)parameter
SB_VERTEX_CONVEXinteger(kind=I4P)parameter
SB_VERTEX_SADDLEinteger(kind=I4P)parameter
SB_KIND_NAMEcharacter(len=16)parameter
PIreal(kind=R8P)parameter

Derived Types ​

soup_t ​

Components ​

NameTypeAttributesDescription
vreal(kind=R8P)allocatable

feature_t ​

Components ​

NameTypeAttributesDescription
xreal(kind=R8P)
kindinteger(kind=I4P)
anglereal(kind=R8P)
lfsreal(kind=R8P)
dinreal(kind=R8P)allocatable
doutreal(kind=R8P)allocatable

body_t ​

Components ​

NameTypeAttributesDescription
namecharacter(len=32)
souptype(soup_t)
feattype(feature_t)allocatable
volumereal(kind=R8P)
diagreal(kind=R8P)

Subroutines ​

bench_bodies ​

fortran
subroutine bench_bodies(b)

Arguments

NameTypeIntentAttributesDescription
btype(body_t)outallocatable

Call graph

make_prism ​

fortran
subroutine make_prism(p, h, fan, name, b)

Arguments

NameTypeIntentAttributesDescription
preal(kind=R8P)in
hreal(kind=R8P)in
fanintegerin
namecharacter(len=*)in
btype(body_t)out

Call graph

make_apex_body ​

fortran
subroutine make_apex_body(n, alpha, name, b)

Arguments

NameTypeIntentAttributesDescription
nintegerin
alphareal(kind=R8P)in
namecharacter(len=*)in
btype(body_t)out

Call graph

set_lfs ​

fortran
subroutine set_lfs(b)

Arguments

NameTypeIntentAttributesDescription
btype(body_t)inout

Call graph

to_surface ​

fortran
subroutine to_surface(soup, s)

Arguments

NameTypeIntentAttributesDescription
souptype(soup_t)in
stype(surface_stl_object)inout

Call graph

make_points ​

fortran
subroutine make_points(b, decades, p, inside, kind, decade, angle, feature)

Arguments

NameTypeIntentAttributesDescription
btype(body_t)in
decadesintegerin
preal(kind=R8P)outallocatable
insidelogicaloutallocatable
kindinteger(kind=I4P)outallocatable
decadeintegeroutallocatable
anglereal(kind=R8P)outallocatable
featureintegeroutallocatable

Call graph

soup_remove ​

fortran
subroutine soup_remove(s, f)

Arguments

NameTypeIntentAttributesDescription
stype(soup_t)inout
fintegerin

soup_flip ​

fortran
subroutine soup_flip(s, f)

Arguments

NameTypeIntentAttributesDescription
stype(soup_t)inout
fintegerin

soup_duplicate ​

fortran
subroutine soup_duplicate(s, f)

Arguments

NameTypeIntentAttributesDescription
stype(soup_t)inout
fintegerin

soup_split_edge ​

fortran
subroutine soup_split_edge(s, a, b, t)

Arguments

NameTypeIntentAttributesDescription
stype(soup_t)inout
areal(kind=R8P)in
breal(kind=R8P)in
treal(kind=R8P)in

Call graph

soup_tjunction ​

fortran
subroutine soup_tjunction(s, f, t)

Arguments

NameTypeIntentAttributesDescription
stype(soup_t)inout
fintegerin
treal(kind=R8P)in

Functions ​

flat ​

Returns: type(feature_t)

fortran
function flat(x, n, kind) result(ft)

Arguments

NameTypeIntentAttributesDescription
xreal(kind=R8P)in
nreal(kind=R8P)in
kindinteger(kind=I4P)in

Call graph

edge ​

Returns: type(feature_t)

fortran
function edge(x, e, n1, q1, q2) result(ft)

Arguments

NameTypeIntentAttributesDescription
xreal(kind=R8P)in
ereal(kind=R8P)in
n1real(kind=R8P)in
q1real(kind=R8P)in
q2real(kind=R8P)in

Call graph

prism_vertex ​

Returns: type(feature_t)

fortran
function prism_vertex(fe, x, nc) result(ft)

Arguments

NameTypeIntentAttributesDescription
fetype(feature_t)in
xreal(kind=R8P)in
ncreal(kind=R8P)in

Call graph

device_sign_mismatches_3d ​

Returns: integer

fortran
function device_sign_mismatches_3d(b) result(nbad)

Arguments

NameTypeIntentAttributesDescription
btype(body_t)in

Call graph

device_sign_mismatches_2d ​

Returns: integer

fortran
function device_sign_mismatches_2d(b) result(nbad)

Arguments

NameTypeIntentAttributesDescription
btype(body_t)in

Call graph

device_line_mismatches_3d ​

Returns: integer

fortran
function device_line_mismatches_3d(b) result(nbad)

Arguments

NameTypeIntentAttributesDescription
btype(body_t)in

Call graph

device_line_mismatches_2d ​

Returns: integer

fortran
function device_line_mismatches_2d(b) result(nbad)

Arguments

NameTypeIntentAttributesDescription
btype(body_t)in

Call graph

cross ​

Attributes: pure

Returns: real(kind=R8P)

fortran
function cross(a, b) result(c)

Arguments

NameTypeIntentAttributesDescription
areal(kind=R8P)in
breal(kind=R8P)in

Call graph

point_triangle_d2 ​

Attributes: pure

Returns: real(kind=R8P)

fortran
function point_triangle_d2(p, a, b, c) result(d2)

Arguments

NameTypeIntentAttributesDescription
preal(kind=R8P)in
areal(kind=R8P)in
breal(kind=R8P)in
creal(kind=R8P)in

Call graph