ByoungSooPark/modeling-app
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Kwargs migration: arc/arcTo (#6334)

Browse Source
This commit is contained in:
Adam Chalmers
2025-04-18 17:40:44 -05:00
committed by GitHub
parent e4fe8a4440
commit 90acc00369
113 changed files with 17161 additions and 16314 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
public/kcl-samples/gear/main.kcl
View File

@ -63,11 +63,7 @@ fn rightInvolute(i, sg) {
start = startSketchOn(XY)
|> startProfileAt([xs[101], ys[101]], %)
teeth = reduce([0..100], start, leftInvolute)
|> arc({
angleStart = 0,
angleEnd = toothAngle,
radius = baseDiameter / 2
}, %)
|> arc(angleStart = 0, angleEnd = toothAngle, radius = baseDiameter / 2)
|> reduce([1..101], %, rightInvolute)
|> close()
|> extrude(length = gearHeight)
@ -95,15 +91,7 @@ keyWay = startSketchOn(body, face = END)
|> xLine(length = keywayDepth)
|> yLine(length = -keywayWidth)
|> xLine(length = -keywayDepth)
|> arc({
angleEnd = 180,
angleStart = -1 * toDegrees(startAngle) + 360,
radius = holeRadius
}, %)
|> arc({
angleEnd = toDegrees(startAngle),
angleStart = 180,
radius = holeRadius
}, %)
|> arc(angleStart = -1 * toDegrees(startAngle) + 360, angleEnd = 180, radius = holeRadius)
|> arc(angleStart = 180, angleEnd = toDegrees(startAngle), radius = holeRadius)
|> close()
|> extrude(length = -gearHeight)