Skip to content

fossil_sdf

Source: src/lib/fossil_sdf.f90

Dependencies

Contents

Variables

NameTypeAttributesDescription
SDF_STATUS_OKinteger(kind=I4P)parameter
SDF_STATUS_BAD_INPUTinteger(kind=I4P)parameter
SDF_SENTINELreal(kind=R8P)parameter
SDF_LABEL_UNASSIGNEDinteger(kind=I4P)parameter
SDF_DEFAULT_NUM_CLUSTERSinteger(kind=I4P)parameter
SDF_DEFAULT_NUM_RAYSinteger(kind=I4P)parameter
SDF_DEFAULT_CONE_DEGreal(kind=R8P)parameter
SDF_DEFAULT_SMOOTHING_LAMBDAreal(kind=R8P)parameter
SDF_DEFAULT_SMOOTHING_ITERATIONSinteger(kind=I4P)parameter
SDF_MIN_HIT_FRACTIONreal(kind=R8P)parameter
PI_R8Preal(kind=R8P)parameter
GOLDEN_ANGLEreal(kind=R8P)parameter
ORIGIN_OFFSET_RELreal(kind=R8P)parameter

Subroutines

compute_sdf

fortran
subroutine compute_sdf(facet, tree, bmin, bmax, sdf, num_rays, cone_angle_deg, status)

Arguments

NameTypeIntentAttributesDescription
facettype(facet_object)in
treetype(aabb_tree_object)in
bmintype(vector_R8P)in
bmaxtype(vector_R8P)in
sdfreal(kind=R8P)outallocatable
num_raysinteger(kind=I4P)inoptional
cone_angle_degreal(kind=R8P)inoptional
statusinteger(kind=I4P)outoptional

Call graph

smooth_sdf

fortran
subroutine smooth_sdf(facet, sdf, lambda, iterations, status)

Arguments

NameTypeIntentAttributesDescription
facettype(facet_object)in
sdfreal(kind=R8P)inout
lambdareal(kind=R8P)inoptional
iterationsinteger(kind=I4P)inoptional
statusinteger(kind=I4P)outoptional

Call graph

segment_sdf

fortran
subroutine segment_sdf(facet, tree, bmin, bmax, facet_labels, sdf, num_clusters, smoothing_lambda, smoothing_iterations, num_rays, cone_angle_deg, status)

Arguments

NameTypeIntentAttributesDescription
facettype(facet_object)in
treetype(aabb_tree_object)in
bmintype(vector_R8P)in
bmaxtype(vector_R8P)in
facet_labelsinteger(kind=I4P)outallocatable
sdfreal(kind=R8P)outallocatable, optional
num_clustersinteger(kind=I4P)inoptional
smoothing_lambdareal(kind=R8P)inoptional
smoothing_iterationsinteger(kind=I4P)inoptional
num_raysinteger(kind=I4P)inoptional
cone_angle_degreal(kind=R8P)inoptional
statusinteger(kind=I4P)outoptional

Call graph

gmm_fit_1d

fortran
subroutine gmm_fit_1d(x, k, mean, var, weight)

Arguments

NameTypeIntentAttributesDescription
xreal(kind=R8P)in
kinteger(kind=I4P)in
meanreal(kind=R8P)outallocatable
varreal(kind=R8P)outallocatable
weightreal(kind=R8P)outallocatable

Call graph

kmeanspp_init

fortran
subroutine kmeanspp_init(x, k, centers)

Arguments

NameTypeIntentAttributesDescription
xreal(kind=R8P)in
kinteger(kind=I4P)in
centersreal(kind=R8P)out

Call graph

gmm_e_step

Attributes: pure

fortran
subroutine gmm_e_step(x, mean, var, weight, resp, ll)

Arguments

NameTypeIntentAttributesDescription
xreal(kind=R8P)in
meanreal(kind=R8P)in
varreal(kind=R8P)in
weightreal(kind=R8P)in
respreal(kind=R8P)out
llreal(kind=R8P)out

Call graph

gmm_m_step

Attributes: pure

fortran
subroutine gmm_m_step(x, resp, mean, var, weight, var_floor)

Arguments

NameTypeIntentAttributesDescription
xreal(kind=R8P)in
respreal(kind=R8P)in
meanreal(kind=R8P)inout
varreal(kind=R8P)inout
weightreal(kind=R8P)inout
var_floorreal(kind=R8P)in

Call graph

argsort_ascending

Attributes: pure

fortran
subroutine argsort_ascending(x, order)

Arguments

NameTypeIntentAttributesDescription
xreal(kind=R8P)in
orderinteger(kind=I4P)out

Call graph

cone_directions

Attributes: pure

fortran
subroutine cone_directions(axis, cone_deg, n, dirs)

Arguments

NameTypeIntentAttributesDescription
axistype(vector_R8P)in
cone_degreal(kind=R8P)in
ninteger(kind=I4P)in
dirstype(vector_R8P)outallocatable

Call graph

ortho_basis

Attributes: pure

fortran
subroutine ortho_basis(axis, e1, e2)

Arguments

NameTypeIntentAttributesDescription
axistype(vector_R8P)in
e1type(vector_R8P)out
e2type(vector_R8P)out

Call graph

Functions

gmm_argmax_posterior

Attributes: pure

Returns: integer(kind=I4P)

fortran
function gmm_argmax_posterior(x, mean, var, weight) result(j_star)

Arguments

NameTypeIntentAttributesDescription
xreal(kind=R8P)in
meanreal(kind=R8P)in
varreal(kind=R8P)in
weightreal(kind=R8P)in

Call graph

data_variance

Attributes: pure

Returns: real(kind=R8P)

fortran
function data_variance(x) result(v)

Arguments

NameTypeIntentAttributesDescription
xreal(kind=R8P)in

Call graph

inv_perm

Attributes: pure

Returns: integer(kind=I4P)

fortran
function inv_perm(order, j) result(rank)

Arguments

NameTypeIntentAttributesDescription
orderinteger(kind=I4P)in
jinteger(kind=I4P)in

Call graph

median

Attributes: pure

Returns: real(kind=R8P)

fortran
function median(x) result(m)

Arguments

NameTypeIntentAttributesDescription
xreal(kind=R8P)in

Call graph