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

extract triangle2square

Browse Source
This commit is contained in:
Justin Lin
2019-09-24 13:43:57 +08:00
parent 3704abf382
commit 34dc0d2f3a
2 changed files with 22 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
examples/triangle2square/triangle2square.scad Normal file
View File

@@ -0,0 +1,21 @@
// https://www.cs.purdue.edu/homes/gnf/book2/trisqu.html
function triangle2square(tri_side_leng) =
let(
p0 = [0, 0],
p1 = tri_side_leng * [0.25, 0.4330125],
p2 = tri_side_leng * [0.5, 0.8660255],
p4 = tri_side_leng * [1, 0],
p3 = tri_side_leng * [0.75, 0.4330125],
p6 = tri_side_leng * [0.254508, 0],
p5 = tri_side_leng * [0.754508, 0],
p8 = tri_side_leng * [0.5380015, 0.247745],
p7 = tri_side_leng * [0.4665065, 0.1852665],
pieces = [
[p0, p6, p7, p1],
[p6, p5, p8],
[p5, p4, p3, p8],
[p1, p7, p3, p2]
],
hinged_pts = [p5, p3, p1]
)
[pieces, hinged_pts];