Go to the source code of this file.
 | 
| module   | point | 
|   | Implements a point. 
  | 
|   | 
 | 
| type(point_t) function  | point::point_init (x, id) | 
|   | Initialize a point from an array x of \( (x,y,z) \) coordinates.  
  | 
|   | 
| type(point_t) function  | point::point_init_xyz (x, y, z, id) | 
|   | Initialize a point from \( (x,y,z) \) coordinates.  
  | 
|   | 
| subroutine  | point::point_assign (this, x) | 
|   | Assigns coordinates x to a point.  
  | 
|   | 
| pure logical function  | point::point_eq (p1, p2) | 
|   | Check if \( p_{1} = p_{2} \).  
  | 
|   | 
| pure logical function  | point::point_ne (p1, p2) | 
|   | Check if \( p_{1} \neq p_{2} \).  
  | 
|   | 
| pure logical function  | point::point_lt (p1, p2) | 
|   | Check if \( p_{1} < p_{2} \).  
  | 
|   | 
| pure logical function  | point::point_gt (p1, p2) | 
|   | Check if \( p_{1} > p_{2} \).  
  | 
|   | 
| type(point_t) function  | point::point_add (p1, p2) | 
|   | Returns the addition of 2 points \( p_{1} + p_{2} \).  
  | 
|   | 
| type(point_t) function  | point::point_subtract (p1, p2) | 
|   | Returns the subtraction of 2 points \( p_{1} - p_{2} \).  
  | 
|   | 
| type(point_t) function  | point::point_scalar_mult (p, a) | 
|   | Returns the multiplication of a point by a scalar \( a*p_{1} \).  
  | 
|   | 
| pure real(kind=rp) function  | point::point_euclid_dist (p1, p2) | 
|   | Returns the Euclidean distance between two points \( \mid p_1 -  p_2 \mid \).  
  | 
|   | 
| type(point_t) function  | point::point_mat_mult (a, x) | 
|   | Computes matrix-vector product in \( \mathbb{R}^3 \): \( b = Ax \).  
  | 
|   |