30 lines
813 B
Plaintext
30 lines
813 B
Plaintext
|
---
|
||
|
|
source: kcl-lib/src/simulation_tests.rs
|
||
|
|
description: Result of unparsing clone_w_fillets.kcl
|
||
|
|
---
|
||
|
|
width = 20
|
||
|
|
length = 10
|
||
|
|
thickness = 1
|
||
|
|
filletRadius = 2
|
||
|
|
|
||
|
|
mountingPlateSketch = startSketchOn(XY)
|
||
|
|
|> startProfile(at = [-width / 2, -length / 2])
|
||
|
|
|> line(endAbsolute = [width / 2, -length / 2], tag = $edge1)
|
||
|
|
|> line(endAbsolute = [width / 2, length / 2], tag = $edge2)
|
||
|
|
|> line(endAbsolute = [-width / 2, length / 2], tag = $edge3)
|
||
|
|
|> close(tag = $edge4)
|
||
|
|
|
||
|
|
mountingPlate = extrude(mountingPlateSketch, length = thickness)
|
||
|
|
|> fillet(
|
||
|
|
radius = filletRadius,
|
||
|
|
tags = [
|
||
|
|
getNextAdjacentEdge(edge1),
|
||
|
|
getNextAdjacentEdge(edge2),
|
||
|
|
getNextAdjacentEdge(edge3),
|
||
|
|
getNextAdjacentEdge(edge4)
|
||
|
|
],
|
||
|
|
)
|
||
|
|
|
||
|
|
mountingPlate2 = clone(mountingPlate)
|
||
|
|
|> translate(z = 20)
|