fossil_cut_moments
Source: src/lib/fossil_cut_moments.f90
Dependencies
Contents
- segment_green_moments
- triangle_moments
- tet_rule
- triangle_rule
- tensor_rule
- mono_count
- mono_exponents
- cell_moments
Variables
| Name | Type | Attributes | Description |
|---|---|---|---|
MOMENTS_MAX | integer(kind=I4P) | parameter | |
GX | real(kind=R8P) | parameter | |
GW | real(kind=R8P) | parameter |
Subroutines
segment_green_moments
Attributes: pure
fortran
subroutine segment_green_moments(p0, q0, e, sc, mom)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
p0 | real(kind=R8P) | in | ||
q0 | real(kind=R8P) | in | ||
e | integer(kind=I4P) | in | ||
sc | real(kind=R8P) | in | ||
mom | real(kind=R8P) | inout |
Call graph
triangle_moments
Attributes: pure
fortran
subroutine triangle_moments(t1, t2, t3, e, vc, ap, vol, wall)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
t1 | real(kind=R8P) | in | ||
t2 | real(kind=R8P) | in | ||
t3 | real(kind=R8P) | in | ||
e | integer(kind=I4P) | in | ||
vc | real(kind=R8P) | in | ||
ap | real(kind=R8P) | in | ||
vol | real(kind=R8P) | inout | ||
wall | real(kind=R8P) | inout |
tet_rule
Attributes: pure
fortran
subroutine tet_rule(a, t1, t2, t3, pt, w)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
a | real(kind=R8P) | in | ||
t1 | real(kind=R8P) | in | ||
t2 | real(kind=R8P) | in | ||
t3 | real(kind=R8P) | in | ||
pt | real(kind=R8P) | out | ||
w | real(kind=R8P) | out |
triangle_rule
Attributes: pure
fortran
subroutine triangle_rule(t1, t2, t3, pt, w, signed)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
t1 | real(kind=R8P) | in | ||
t2 | real(kind=R8P) | in | ||
t3 | real(kind=R8P) | in | ||
pt | real(kind=R8P) | out | ||
w | real(kind=R8P) | out | ||
signed | logical | in |
Call graph
tensor_rule
Attributes: pure
fortran
subroutine tensor_rule(lo, hi, pt, w)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
lo | real(kind=R8P) | in | ||
hi | real(kind=R8P) | in | ||
pt | real(kind=R8P) | out | ||
w | real(kind=R8P) | out |
Call graph
Functions
mono_count
Attributes: pure
Returns: integer(kind=i4p)
fortran
function mono_count(d, p) result(n)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
d | integer(kind=I4P) | in | ||
p | integer(kind=I4P) | in |
Call graph
mono_exponents
Attributes: pure
Returns: integer(kind=I4P)
fortran
function mono_exponents(d, p) result(e)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
d | integer(kind=I4P) | in | ||
p | integer(kind=I4P) | in |
Call graph
cell_moments
Attributes: pure
Returns: real(kind=R8P)
fortran
function cell_moments(e, vc) result(m)Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
e | integer(kind=I4P) | in | ||
vc | real(kind=R8P) | in |
Call graph