fossil_feature_edges

Source: src/lib/fossil_feature_edges.f90

Dependencies

Contents

• find_feature_edges
• sort_half_edges
• feature_cos
• is_sharp_dihedral

Variables

Name	Type	Attributes	Description
FEATURE_EDGE_SHARP	integer(kind=I4P)	parameter
FEATURE_EDGE_BOUNDARY	integer(kind=I4P)	parameter
FEATURE_EDGE_NONMANIFOLD	integer(kind=I4P)	parameter
FEATURE_EDGE_DEFAULT_ANGLE	real(kind=R8P)	parameter

Subroutines

find_feature_edges

subroutine find_feature_edges(f_v, vcoord, angle, corner_angle, include_boundary, include_nonmanifold, edges, kinds, corners, polyline_start, polyline_vertices, degenerate)

Arguments

Name	Type	Intent	Attributes	Description
f_v	integer(kind=I4P)	in
vcoord	real(kind=R8P)	in
angle	real(kind=R8P)	in
corner_angle	real(kind=R8P)	in
include_boundary	logical	in
include_nonmanifold	logical	in
edges	integer(kind=I4P)	out	allocatable
kinds	integer(kind=I4P)	out	allocatable
corners	integer(kind=I4P)	out	allocatable
polyline_start	integer(kind=I4P)	out	allocatable
polyline_vertices	integer(kind=I4P)	out	allocatable
degenerate	integer(kind=I4P)	out

Call graph

sort_half_edges

subroutine sort_half_edges(lo, hi, fac, order)

Arguments

Name	Type	Intent	Attributes	Description
lo	integer(kind=I4P)	in
hi	integer(kind=I4P)	in
fac	integer(kind=I4P)	in
order	integer(kind=I4P)	inout

Call graph

Functions

feature_cos

Attributes: pure

Returns: real(kind=R8P)

function feature_cos(angle) result(c)

Arguments

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

Call graph

is_sharp_dihedral

Attributes: pure

Returns: logical

function is_sharp_dihedral(n1, n2, cos_threshold) result(sharp)

Arguments

Name	Type	Intent	Attributes	Description
n1	real(kind=R8P)	in
n2	real(kind=R8P)	in
cos_threshold	real(kind=R8P)	in

Call graph