ffbe20b586
Previous: ``` startProfileAt([x, y], %) startProfileAt([x, y], sketch001) ``` New: ``` startProfile(%, at = [x, y]) startProfile(sketch001, at = [x, y]) ```
26 lines
720 B
Plaintext
26 lines
720 B
Plaintext
---
|
|
source: kcl-lib/src/simulation_tests.rs
|
|
description: Result of unparsing parametric_with_tan_arc.kcl
|
|
---
|
|
sigmaAllow = 15000 // psi
|
|
width = 11 // inch
|
|
p = 150 // Force on shelf - lbs
|
|
distance = 12 // inches
|
|
FOS = 2
|
|
thickness = sqrt(distance * p * FOS * 6 / (sigmaAllow * width))
|
|
filletR = thickness * 2
|
|
shelfMountL = 9
|
|
wallMountL = 8
|
|
|
|
bracket = startSketchOn(XY)
|
|
|> startProfile(at = [0, 0])
|
|
|> line(end = [0, wallMountL])
|
|
|> tangentialArc(radius = filletR, angle = 90)
|
|
|> line(end = [-shelfMountL, 0])
|
|
|> line(end = [0, -thickness])
|
|
|> line(end = [shelfMountL, 0])
|
|
|> tangentialArc(radius = filletR - thickness, angle = -90)
|
|
|> line(end = [0, -wallMountL])
|
|
|> close(%)
|
|
|> extrude(length = width)
|