Skip to content

fossil_winding_number

Source: src/lib/fossil_winding_number.f90

Dependencies

Contents

Variables

NameTypeAttributesDescription
FOUR_PIreal(kind=R8P)parameter
DEFAULT_BETAreal(kind=R8P)parameter
MAX_CHILDRENinteger(kind=I4P)parameter

Derived Types

dipole_cache_t

Components

NameTypeAttributesDescription
centretype(vector_R8P)
dipoletype(vector_R8P)
diag2real(kind=R8P)
readylogical

Subroutines

build_cache

Attributes: recursive

fortran
subroutine build_cache(facet, tree, n, cache)

Arguments

NameTypeIntentAttributesDescription
facettype(facet_object)in
treetype(aabb_tree_object)in
ninteger(kind=I4P)in
cachetype(dipole_cache_t)inout

Call graph

traverse

Attributes: recursive

fortran
subroutine traverse(facet, tree, n, point, beta2, cache, omega)

Arguments

NameTypeIntentAttributesDescription
facettype(facet_object)in
treetype(aabb_tree_object)in
ninteger(kind=I4P)in
pointtype(vector_R8P)in
beta2real(kind=R8P)in
cachetype(dipole_cache_t)in
omegareal(kind=R8P)inout

Call graph

Functions

winding_number

Returns: real(kind=R8P)

fortran
function winding_number(facet, tree, point, beta) result(w)

Arguments

NameTypeIntentAttributesDescription
facettype(facet_object)in
treetype(aabb_tree_object)intarget
pointtype(vector_R8P)in
betareal(kind=R8P)inoptional

Call graph

exact_solid_angle_sum

Attributes: pure

Returns: real(kind=R8P)

fortran
function exact_solid_angle_sum(facet, point) result(omega)

Arguments

NameTypeIntentAttributesDescription
facettype(facet_object)in
pointtype(vector_R8P)in

Call graph