fossil_thickness
Source: src/lib/fossil_thickness.f90
Dependencies
Contents
Variables
| Name | Type | Attributes | Description |
|---|---|---|---|
THICKNESS_RAY | integer(kind=I4P) | parameter | |
THICKNESS_MEDIAL | integer(kind=I4P) | parameter | |
THICKNESS_DEFAULT_CONE | real(kind=R8P) | parameter | |
THICKNESS_DEFAULT_RAYS | integer(kind=I4P) | parameter | |
THICKNESS_DEFAULT_SEPARATION | real(kind=R8P) | parameter | |
PI | real(kind=R8P) | parameter | |
GOLDEN_ANGLE | real(kind=R8P) | parameter |
Subroutines
cone_directions
Attributes: pure
fortran
subroutine cone_directions(axis, cone_angle, m, dirs)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
axis | real(kind=R8P) | in | ||
cone_angle | real(kind=R8P) | in | ||
m | integer(kind=I4P) | in | ||
dirs | real(kind=R8P) | out |
Call graph
Functions
cone_cosines
Attributes: pure
Returns: real(kind=R8P)
fortran
function cone_cosines(cone_angle, m) result(c)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
cone_angle | real(kind=R8P) | in | ||
m | integer(kind=I4P) | in |
Call graph
lower_median
Attributes: pure
Returns: real(kind=R8P)
fortran
function lower_median(x) result(med)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
x | real(kind=R8P) | in |
ball_radius
Attributes: pure
Returns: real(kind=R8P)
fortran
function ball_radius(p, a, q) result(r)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
p | real(kind=R8P) | in | ||
a | real(kind=R8P) | in | ||
q | real(kind=R8P) | in |