openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-08-12 17:54:18 +02:00
Code Issues Releases Wiki Activity

refactor

Browse Source
This commit is contained in:
Justin Lin
2019-05-27 17:28:34 +08:00
parent 9f0693c3ae
commit 8457bd403c
2 changed files with 8 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/__private__/__in_line.scad Normal file
View File

@@ -0,0 +1,6 @@
function __in_line(line_pts, pt) =
let(
v1 = line_pts[0] - pt,
v2 = line_pts[1] - pt
)
(cross(v1, v2) == 0) && ((v1 * v2) <= 0);

10
src/in_shape.scad
View File

@@ -1,4 +1,5 @@
include <__private__/__edges_from.scad>;
include <__private__/__in_line.scad>;
function _in_shape_in_line_equation(edge, pt) =
let(
@@ -10,17 +11,10 @@ function _in_shape_in_line_equation(edge, pt) =
b = y1 - a * x1
)
(pt[1] == a * pt[0] + b);
function _in_shape_in_edge(edge, pt) =
let(
v1 = edge[0] - pt,
v2 = edge[1] - pt
)
(cross(v1, v2) == 0) && ((v1 * v2) <= 0);
function _in_shape_in_any_edges_sub(edges, leng, pt, i) =
leng == i ? false : (
_in_shape_in_edge(edges[i], pt) ? true : _in_shape_in_any_edges_sub(edges, leng, pt, i + 1)
__in_line(edges[i], pt) ? true : _in_shape_in_any_edges_sub(edges, leng, pt, i + 1)
);
function _in_shape_in_any_edges(edges, pt) = _in_shape_in_any_edges_sub(edges, len(edges), pt, 0);