version 0.6.0
Loading...
Searching...
No Matches
mod_shape_polygon::t_shape_polygon Type Reference

Polygon shape.

+ Inheritance diagram for mod_shape_polygon::t_shape_polygon:

Public Member Functions

procedure initialize (shape)
 Initialize the shape.
 
procedure copy (shape, copy)
 Copy the shape.
 
procedure is_inside (shape, point)
 Check if a point lies inside the shape.
 
procedure get_samples_inside (shape, i, j, k, n, n_samples, samples)
 Check if a given number of point lies in a shape.
 
procedure get_distance (shape, point, distance, direction)
 Compute the distance and the direction from a point to the shape.
 
procedure ray_trace (shape, ray, has_normal, intersection_list)
 Compute the intersection between the shape and a ray.
 
- Public Member Functions inherited from type_shape::t_shape
procedure(abs_initialize_shape), deferred initialize (shape)
 Initialize the shape.
 
procedure(abs_copy_shape), deferred copy (shape, copy)
 Copy the shape.
 
procedure(abs_shape_is_inside), deferred is_inside (shape, point)
 Check if a point lies inside the shape.
 
procedure(abs_shape_get_samples_inside), deferred get_samples_inside (shape, i, j, k, n, n_samples, samples)
 Check if a given number of point lies in a shape.
 
procedure(abs_shape_get_distance), deferred get_distance (shape, point, distance, direction)
 Compute the distance and the direction from a point to the shape.
 
procedure(abs_shape_ray_trace), deferred ray_trace (shape, ray, has_normal, intersection_list)
 Compute the intersection between the shape and a ray.
 

Public Attributes

type(t_polygonpolygon
 Polygon.
 
logical odd_even_rule = .true.
 Rule to determine if a point is inside the polygon If set to .true., a point is inside the polygon if the winding number is odd. Otherwise, a point lies inside the polygon if the winding number is nonzero.
 
double precision, dimension(3, 2) bounding_box
 Aligned-axis bounding box.
 
- Public Attributes inherited from type_shape::t_shape
integer dimension = 2
 Dimension of the shape.
 
type(t_cg_transformationtransformation
 Transformation matrix.
 
logical is_reversed = .false.
 Swap interior/exterior sides of the shape.
 

Member Function/Subroutine Documentation

◆ copy()

procedure mod_shape_polygon::t_shape_polygon::copy ( class(t_shape_polygon), intent(in) shape,
class(t_shape), allocatable copy )
Parameters
[in]shapepolygon shape
[out]copycopied polygon shape

◆ get_distance()

procedure mod_shape_polygon::t_shape_polygon::get_distance ( class(t_shape_polygon), intent(in) shape,
double precision, dimension(3), intent(in) point,
double precision, intent(out) distance,
double precision, dimension(3), intent(out) direction )

If the point lies inside the polygon, the distance is negative and the direction points to the closest point on the polygon. If the point lies outiside the polygon, the distance is positive and the direction points in the opposite direction to the closest point on the polygon.

Parameters
[in]shapepolygon shape
[in]pointany point
[out]distancesigned closest distance from the point to the polygon
[out]directionsigned direction from the point to the closest point on the polygon

◆ get_samples_inside()

procedure mod_shape_polygon::t_shape_polygon::get_samples_inside ( class(t_shape_polygon), intent(inout) shape,
integer, intent(in) i,
integer, intent(in) j,
integer, intent(in) k,
integer, intent(in) n,
integer, intent(in) n_samples,
integer, dimension(:,:,:), intent(inout) samples )

Sample a cell of coordinates (i,j,k) with (2*n_samples+1)^d samples, where d denotes the dimension of the cell. Return a integer array samples containing the value n where the sample is inside the shape.

n_samples is called the sampling level and can take its value in range [0,∞].

Example of sampling for various sampling level:

   !!    n_samples = 0   n_samples = 1   n_samples = 2
   !!      ┏━━━━━━━┓       ×━━━×━━━×       ×━×━×━×━×
   !!      ┃       ┃       ┃       ┃       × × × × ×
   !!      ┃   ×   ┃       ×   ×   ×       × × × × ×    ...
   !!      ┃       ┃       ┃       ┃       × × × × ×
   !!      ┗━━━━━━━┛       ×━━━×━━━×       ×━×━×━×━×
   !! 
Parameters
[in,out]shapepolygon shape
[in]i,j,kcoordinates of the cell
[in]nvalue to put where the sample is inside the polygon
[in]n_samplessampling level (see description)
[in,out]samplesarray of the (2*n_sammples+1)^d samples

◆ initialize()

procedure mod_shape_polygon::t_shape_polygon::initialize ( class(t_shape_polygon), intent(inout) shape)
Parameters
[in,out]shapepolygon shape

◆ is_inside()

procedure mod_shape_polygon::t_shape_polygon::is_inside ( class(t_shape_polygon), intent(in) shape,
double precision, dimension(3), intent(in) point )
Parameters
[in]shapepolygon shape
[in]pointany point

◆ ray_trace()

procedure mod_shape_polygon::t_shape_polygon::ray_trace ( class(t_shape_polygon), intent(in) shape,
type(t_ray), intent(in) ray,
logical, intent(in) has_normal,
type(t_intersection_list), intent(inout) intersection_list )
Parameters
[in]shapepolygon shape
[in]rayray to intersect the polygon
[in]has_normallist of intersections between the ray and the polygon
[in,out]intersection_listlist of intersections between the ray and the polygon

The documentation for this type was generated from the following file: