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

compare to [0, 0]

Browse Source
This commit is contained in:
Justin Lin
2022-05-15 09:42:53 +08:00
parent 9e74b763e6
commit 762c8b6859
1 changed files with 3 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/ptf/ptf_circle.scad
View File

@@ -9,13 +9,10 @@
**/ **/
function ptf_circle(size, point) = function ptf_circle(size, point) =
let( let(p = point - size / 2)
p = point - size / 2, p == [0, 0] ? p :
leng = norm(p)
)
leng == 0 ? [0, 0] :
let( let(
n = max(abs(p.x), abs(p.y)), n = max(abs(p.x), abs(p.y)),
r = n * 1.41421356237 r = n * 1.41421356237
) )
[p.y, p.x] * (r / leng); [p.y, p.x] * (r / norm(p));