Skip to content

fossil_facet_object

Source: src/lib/fossil_facet_object.f90

Dependencies

Contents

Derived Types

facet_object

Components

NameTypeAttributesDescription
normaltype(vector_R8P)
vertextype(vector_R8P)
centroidtype(vector_R8P)
E12type(vector_R8P)
E13type(vector_R8P)
areal(kind=R8P)
breal(kind=R8P)
creal(kind=R8P)
detreal(kind=R8P)
dreal(kind=R8P)
bbtype(vector_R8P)
idinteger(kind=I4P)
fcon_edge_12integer(kind=I4P)
fcon_edge_23integer(kind=I4P)
fcon_edge_31integer(kind=I4P)
vertex_occurrencetype(list_id_object)
vertex_nearbytype(list_id_object)
edge_12_pnormaltype(vector_R8P)
edge_23_pnormaltype(vector_R8P)
edge_31_pnormaltype(vector_R8P)
vertex_pnormaltype(vector_R8P)

Type-Bound Procedures

NameAttributesDescription
centroid_partpass(self)
check_normalpass(self)
compute_distancepass(self)
compute_metrixpass(self)
compute_normalpass(self)
compute_pseudo_normalspass(self)
compute_vertices_nearbypass(self)
connect_nearby_verticespass(self)
destroypass(self)
destroy_connectivitypass(self)
do_ray_intersectpass(self)
initializepass(self)
largest_edge_lenpass(self)
load_from_file_asciipass(self)
load_from_file_binarypass(self)
make_normal_consistentpass(self)
mirror
reverse_normalpass(self)
resizepass(self)
rotate
save_into_file_asciipass(self)
save_into_file_binarypass(self)
smallest_edge_lenpass(self)
solid_anglepass(self)
tetrahedron_volumepass(self)
translatepass(self)
update_connectivitypass(self)
vertex_anglepass(self)
vertex_global_idpass(self)
assignment(=)
edge_connection_in_other_refpass(self)
facet_assign_facetpass(lhs)
flip_edgepass(self)
mirror_by_normalpass(self)
mirror_by_matrixpass(self)
rotate_by_axis_anglepass(self)
rotate_by_matrixpass(self)

Interfaces

load_from_file_interface

load_from_file_interface

fortran
subroutine load_from_file_interface(self, file_unit)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
file_unitinteger(kind=I4P)in

save_into_file_interface

save_into_file_interface

fortran
subroutine save_into_file_interface(self, file_unit)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in
file_unitinteger(kind=I4P)in

Subroutines

compute_distance

Attributes: pure

fortran
subroutine compute_distance(self, point, distance)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in
pointtype(vector_R8P)in
distancereal(kind=R8P)out

Call graph

compute_metrix

Attributes: elemental

fortran
subroutine compute_metrix(self)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout

Call graph

compute_normal

Attributes: elemental

fortran
subroutine compute_normal(self)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout

Call graph

compute_pseudo_normals

Attributes: pure

fortran
subroutine compute_pseudo_normals(self, facet)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
facettype(facet_object)in

Call graph

compute_vertices_nearby

Attributes: pure

fortran
subroutine compute_vertices_nearby(self, other, tolerance_to_be_identical, tolerance_to_be_nearby)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
othertype(facet_object)inout
tolerance_to_be_identicalreal(kind=R8P)in
tolerance_to_be_nearbyreal(kind=R8P)in

Call graph

connect_nearby_vertices

Attributes: pure

fortran
subroutine connect_nearby_vertices(self, facet)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
facettype(facet_object)inout

Call graph

destroy

Attributes: elemental

fortran
subroutine destroy(self)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout

Call graph

destroy_connectivity

Attributes: elemental

fortran
subroutine destroy_connectivity(self)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout

Call graph

initialize

Attributes: elemental

fortran
subroutine initialize(self)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout

Call graph

load_from_file_ascii

fortran
subroutine load_from_file_ascii(self, file_unit)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
file_unitinteger(kind=I4P)in

Call graph

load_from_file_binary

fortran
subroutine load_from_file_binary(self, file_unit)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
file_unitinteger(kind=I4P)in

Call graph

make_normal_consistent

Attributes: pure

fortran
subroutine make_normal_consistent(self, edge_dir, other)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in
edge_dircharacter(len=*)in
othertype(facet_object)inout

Call graph

resize

Attributes: elemental

fortran
subroutine resize(self, factor, center)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
factortype(vector_R8P)in
centertype(vector_R8P)in

Call graph

reverse_normal

Attributes: elemental

fortran
subroutine reverse_normal(self)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout

Call graph

save_into_file_ascii

fortran
subroutine save_into_file_ascii(self, file_unit)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in
file_unitinteger(kind=I4P)in

Call graph

save_into_file_binary

fortran
subroutine save_into_file_binary(self, file_unit)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in
file_unitinteger(kind=I4P)in

Call graph

translate

Attributes: elemental

fortran
subroutine translate(self, delta, recompute_metrix)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
deltatype(vector_R8P)in
recompute_metrixlogicalinoptional

Call graph

update_connectivity

Attributes: pure

fortran
subroutine update_connectivity(self)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout

Call graph

flip_edge

Attributes: pure

fortran
subroutine flip_edge(self, edge_dir)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
edge_dircharacter(len=*)in

Call graph

mirror_by_normal

Attributes: pure

fortran
subroutine mirror_by_normal(self, normal, recompute_metrix)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
normaltype(vector_R8P)in
recompute_metrixlogicalinoptional

Call graph

mirror_by_matrix

Attributes: pure

fortran
subroutine mirror_by_matrix(self, matrix, recompute_metrix)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
matrixreal(kind=R8P)in
recompute_metrixlogicalinoptional

Call graph

rotate_by_axis_angle

Attributes: pure

fortran
subroutine rotate_by_axis_angle(self, axis, angle, recompute_metrix)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
axistype(vector_R8P)in
anglereal(kind=R8P)in
recompute_metrixlogicalinoptional

Call graph

rotate_by_matrix

Attributes: pure

fortran
subroutine rotate_by_matrix(self, matrix, recompute_metrix)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)inout
matrixreal(kind=R8P)in
recompute_metrixlogicalinoptional

Call graph

edge_connection_in_other_ref

Attributes: pure

fortran
subroutine edge_connection_in_other_ref(self, other, edge_dir, edge)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in
othertype(facet_object)in
edge_dircharacter(len=*)out
edgetype(vector_R8P)out

Call graph

facet_assign_facet

Attributes: pure

fortran
subroutine facet_assign_facet(lhs, rhs)

Arguments

NameTypeIntentAttributesDescription
lhsclass(facet_object)inout
rhstype(facet_object)in

merge_vertices

Attributes: pure

fortran
subroutine merge_vertices(vertex, facet, nearby)

Arguments

NameTypeIntentAttributesDescription
vertextype(vector_R8P)inout
facettype(facet_object)inout
nearbytype(list_id_object)inout

Call graph

put_in_list

Attributes: pure

fortran
subroutine put_in_list(id, list)

Arguments

NameTypeIntentAttributesDescription
idinteger(kind=I4P)in
listinteger(kind=I4P)inoutallocatable

Functions

centroid_part

Attributes: pure

Returns: type(vector_R8P)

fortran
function centroid_part(self)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in

Call graph

check_normal

Attributes: elemental

Returns: logical

fortran
function check_normal(self) result(is_consistent)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in

Call graph

do_ray_intersect

Attributes: pure

Returns: logical

fortran
function do_ray_intersect(self, ray_origin, ray_direction) result(intersect)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in
ray_origintype(vector_R8P)in
ray_directiontype(vector_R8P)in

Call graph

largest_edge_len

Attributes: pure

Returns: real(kind=R8P)

fortran
function largest_edge_len(self) result(largest)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in

Call graph

smallest_edge_len

Attributes: pure

Returns: real(kind=R8P)

fortran
function smallest_edge_len(self) result(smallest)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in

Call graph

solid_angle

Attributes: pure

Returns: real(kind=R8P)

fortran
function solid_angle(self, point)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in
pointtype(vector_R8P)in

Call graph

tetrahedron_volume

Attributes: pure

Returns: real(kind=R8P)

fortran
function tetrahedron_volume(self, apex) result(volume)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in
apextype(vector_R8P)in

Call graph

vertex_angle

Attributes: pure

Returns: real(kind=R8P)

fortran
function vertex_angle(self, vertex_id)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in
vertex_idinteger(kind=I4P)in

Call graph

vertex_global_id

Attributes: pure

Returns: integer(kind=I4P)

fortran
function vertex_global_id(self, vertex_id)

Arguments

NameTypeIntentAttributesDescription
selfclass(facet_object)in
vertex_idinteger(kind=I4P)in

Call graph

face_id

Attributes: pure

Returns: integer(kind=I4P)

fortran
function face_id(vertex_global_id)

Arguments

NameTypeIntentAttributesDescription
vertex_global_idinteger(kind=I4P)in

Call graph

vertex_local_id

Attributes: pure

Returns: integer(kind=I4P)

fortran
function vertex_local_id(face_id, vertex_global_id)

Arguments

NameTypeIntentAttributesDescription
face_idinteger(kind=I4P)in
vertex_global_idinteger(kind=I4P)in

Call graph