---
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)
