Implements a point.
More...
|
type(point_t) function | point_init (x, id) |
| Initialize a point from an array x of \( (x,y,z) \) coordinates. More...
|
|
type(point_t) function | point_init_xyz (x, y, z, id) |
| Initialize a point from \( (x,y,z) \) coordinates. More...
|
|
subroutine | point_assign (this, x) |
| Assigns coordinates x to a point. More...
|
|
pure logical function | point_eq (p1, p2) |
| Check if \( p_{1} = p_{2} \). More...
|
|
pure logical function | point_ne (p1, p2) |
| Check if \( p_{1} \neq p_{2} \). More...
|
|
pure logical function | point_lt (p1, p2) |
| Check if \( p_{1} < p_{2} \). More...
|
|
pure logical function | point_gt (p1, p2) |
| Check if \( p_{1} > p_{2} \). More...
|
|
type(point_t) function | point_add (p1, p2) |
| Returns the addition of 2 points \( p_{1} + p_{2} \). More...
|
|
type(point_t) function | point_subtract (p1, p2) |
| Returns the subtraction of 2 points \( p_{1} - p_{2} \). More...
|
|
type(point_t) function | point_scalar_mult (p, a) |
| Returns the multiplication of a point by a scalar \( a*p_{1} \). More...
|
|
pure real(kind=rp) function | point_euclid_dist (p1, p2) |
| Returns the Euclidean distance between two points \( \mid p_1 - p_2 \mid \). More...
|
|
type(point_t) function | point_mat_mult (A, x) |
| Computes matrix-vector product in \( \mathbb{R}^3 \): \( b = Ax \). More...
|
|
◆ point_add()
Returns the addition of 2 points \( p_{1} + p_{2} \).
Definition at line 190 of file point.f90.
◆ point_assign()
subroutine point::point_assign |
( |
class(point_t), intent(inout) |
this, |
|
|
real(kind=dp), dimension(3), intent(in) |
x |
|
) |
| |
|
private |
Assigns coordinates x to a point.
Definition at line 114 of file point.f90.
◆ point_eq()
pure logical function point::point_eq |
( |
class(point_t), intent(in) |
p1, |
|
|
class(point_t), intent(in) |
p2 |
|
) |
| |
|
private |
Check if \( p_{1} = p_{2} \).
- Note
- this only checks coordinates.
Definition at line 124 of file point.f90.
◆ point_euclid_dist()
pure real(kind=rp) function point::point_euclid_dist |
( |
class(point_t), intent(in) |
p1, |
|
|
type(point_t), intent(in) |
p2 |
|
) |
| |
|
private |
Returns the Euclidean distance between two points \( \mid p_1 - p_2 \mid \).
Definition at line 226 of file point.f90.
◆ point_gt()
pure logical function point::point_gt |
( |
class(point_t), intent(in) |
p1, |
|
|
class(point_t), intent(in) |
p2 |
|
) |
| |
|
private |
Check if \( p_{1} > p_{2} \).
- Note
- this only checks coordinates.
Definition at line 176 of file point.f90.
◆ point_init()
type(point_t) function point::point_init |
( |
real(kind=dp), dimension(3), intent(in) |
x, |
|
|
integer, intent(inout), optional |
id |
|
) |
| |
|
private |
Initialize a point from an array x of \( (x,y,z) \) coordinates.
Definition at line 78 of file point.f90.
◆ point_init_xyz()
type(point_t) function point::point_init_xyz |
( |
real(kind=dp), intent(in) |
x, |
|
|
real(kind=dp), intent(in) |
y, |
|
|
real(kind=dp), intent(in) |
z, |
|
|
integer, intent(inout), optional |
id |
|
) |
| |
|
private |
Initialize a point from \( (x,y,z) \) coordinates.
Definition at line 94 of file point.f90.
◆ point_lt()
pure logical function point::point_lt |
( |
class(point_t), intent(in) |
p1, |
|
|
class(point_t), intent(in) |
p2 |
|
) |
| |
|
private |
Check if \( p_{1} < p_{2} \).
- Note
- this only checks coordinates.
Definition at line 158 of file point.f90.
◆ point_mat_mult()
type(point_t) function point::point_mat_mult |
( |
real(kind=rp), dimension(3,3), intent(in) |
A, |
|
|
class(point_t), intent(in) |
x |
|
) |
| |
|
private |
Computes matrix-vector product in \( \mathbb{R}^3 \): \( b = Ax \).
Definition at line 237 of file point.f90.
◆ point_ne()
pure logical function point::point_ne |
( |
class(point_t), intent(in) |
p1, |
|
|
class(point_t), intent(in) |
p2 |
|
) |
| |
|
private |
Check if \( p_{1} \neq p_{2} \).
- Note
- this only checks coordinates.
Definition at line 141 of file point.f90.
◆ point_scalar_mult()
type(point_t) function point::point_scalar_mult |
( |
class(point_t), intent(in) |
p, |
|
|
real(kind=rp), intent(in) |
a |
|
) |
| |
|
private |
Returns the multiplication of a point by a scalar \( a*p_{1} \).
Definition at line 214 of file point.f90.
◆ point_subtract()
type(point_t) function point::point_subtract |
( |
class(point_t), intent(in) |
p1, |
|
|
class(point_t), intent(in) |
p2 |
|
) |
| |
|
private |
Returns the subtraction of 2 points \( p_{1} - p_{2} \).
Definition at line 202 of file point.f90.