SABER
|
Public Member Functions | |
subroutine | stripack_left (x1, y1, z1, x2, y2, z2, x0, y0, z0, output) |
Determine whether a node is to the left of a plane through the origin. More... | |
Definition at line 71 of file tools_stripack.F90.
subroutine tools_stripack::left::stripack_left | ( | real(kind_real), intent(in) | x1, |
real(kind_real), intent(in) | y1, | ||
real(kind_real), intent(in) | z1, | ||
real(kind_real), intent(in) | x2, | ||
real(kind_real), intent(in) | y2, | ||
real(kind_real), intent(in) | z2, | ||
real(kind_real), intent(in) | x0, | ||
real(kind_real), intent(in) | y0, | ||
real(kind_real), intent(in) | z0, | ||
logical, intent(out) | output | ||
) |
Determine whether a node is to the left of a plane through the origin.
[in] | x1 | X-coordinate, term 1 |
[in] | y1 | Y-coordinate, term 1 |
[in] | z1 | Z-coordinate, term 1 |
[in] | x2 | X-coordinate, term 2 |
[in] | y2 | Y-coordinate, term 2 |
[in] | z2 | Z-coordinate, term 2 |
[in] | x0 | X-coordinate, term 0 |
[in] | y0 | Y-coordinate, term 0 |
[in] | z0 | Z-coordinate, term 0 |
[out] | output | TRUE if and only if N0 is in the closed left hemisphere. |
Definition at line 677 of file tools_stripack.F90.