Skip to content

fossil_boolean_harness ​

Source: src/tests/fossil_boolean_harness.f90

Dependencies

Contents ​

Variables ​

NameTypeAttributesDescription
OPSinteger(kind=I4P)parameter
OPNcharacter(len=1)parameter
TOL_IDENTITYreal(kind=R8P)parameter
TOL_FOLDreal(kind=R8P)parameter

Derived Types ​

boolean_report_t ​

Components ​

NameTypeAttributesDescription
statusinteger(kind=I4P)
facetsinteger(kind=I4P)
volumereal(kind=R8P)
vareal(kind=R8P)
vbreal(kind=R8P)
vol_resreal(kind=R8P)
mom_resreal(kind=R8P)
area_resreal(kind=R8P)
dev_lowerreal(kind=R8P)
dev_upperreal(kind=R8P)
member_badinteger(kind=I4P)
member_ninteger(kind=I4P)
validity_checkedlogical
watertightlogical
manifoldlogical
self_pairsinteger(kind=I4P)
fold_depthreal(kind=R8P)

Subroutines ​

check_boolean ​

fortran
subroutine check_boolean(a, b, rep, npoints, seed, area_identity, contact, corrupt, weld)

Arguments

NameTypeIntentAttributesDescription
atype(surface_stl_object)in
btype(surface_stl_object)in
reptype(boolean_report_t)out
npointsinteger(kind=I4P)in
seedinteger(kind=I8P)in
area_identitylogicalin
contactlogicalin
corruptinteger(kind=I4P)inoptional
weldreal(kind=R8P)inoptional

Call graph

fortran
subroutine print_report(label, rep)

Arguments

NameTypeIntentAttributesDescription
labelcharacter(len=*)in
reptype(boolean_report_t)in

Call graph

joint_box ​

fortran
subroutine joint_box(a, b, bmin, bmax)

Arguments

NameTypeIntentAttributesDescription
atype(surface_stl_object)in
btype(surface_stl_object)in
bmintype(vector_R8P)out
bmaxtype(vector_R8P)out

Call graph

moments ​

fortran
subroutine moments(s, o, v, c)

Arguments

NameTypeIntentAttributesDescription
stype(surface_stl_object)in
oreal(kind=R8P)in
vreal(kind=R8P)out
creal(kind=R8P)out

Call graph

drop_first_facet ​

fortran
subroutine drop_first_facet(r)

Arguments

NameTypeIntentAttributesDescription
rtype(surface_stl_object)inout

Call graph

merge_surfaces ​

fortran
subroutine merge_surfaces(a, b, ab)

Arguments

NameTypeIntentAttributesDescription
atype(surface_stl_object)in
btype(surface_stl_object)in
abtype(surface_stl_object)out

Call graph

Functions ​

boolean_pass ​

Attributes: pure

Returns: logical

fortran
function boolean_pass(rep) result(ok)

Arguments

NameTypeIntentAttributesDescription
reptype(boolean_report_t)in

Call graph

pair_depth ​

Returns: real(kind=R8P)

fortran
function pair_depth(r, ia, ib) result(d)

Arguments

NameTypeIntentAttributesDescription
rtype(surface_stl_object)in
iainteger(kind=I4P)in
ibinteger(kind=I4P)in

Call graph