aad583be2e
Move axes to std constants; move helix, revolve, and mirror2d to be declated in KCL Signed-off-by: Nick Cameron <nrc@ncameron.org>
26 lines
811 B
Plaintext
26 lines
811 B
Plaintext
// I-beam
|
|
// A structural metal beam with an I shaped cross section. Often used in construction and architecture
|
|
|
|
// Set Units
|
|
@settings(defaultLengthUnit = in)
|
|
|
|
// Define Beam Dimensions
|
|
beamLength = 6 * ft()
|
|
beamHeight = 4
|
|
flangeWidth = 2.663
|
|
flangeThickness = 0.293
|
|
webThickness = 0.193
|
|
rootRadius = 0.457
|
|
|
|
// Sketch a quadrant of the beam cross section, then mirror for symmetry across each axis. Extrude to the appropriate length
|
|
sketch001 = startSketchOn(-XZ)
|
|
|> startProfileAt([0, beamHeight / 2], %)
|
|
|> xLine(length = flangeWidth / 2)
|
|
|> yLine(length = -flangeThickness)
|
|
|> xLine(endAbsolute = webThickness / 2 + rootRadius)
|
|
|> tangentialArc({ radius = rootRadius, offset = 90 }, %)
|
|
|> yLine(endAbsolute = 0)
|
|
|> mirror2d(axis = X)
|
|
|> mirror2d(axis = Y)
|
|
|> extrude(length = beamLength)
|