39 lines
844 B
Plaintext
39 lines
844 B
Plaintext
---
|
|
source: kcl-lib/src/simulation_tests.rs
|
|
description: Result of unparsing flush_batch_on_end.kcl
|
|
---
|
|
@settings(defaultLengthUnit = in)
|
|
|
|
// Set units in inches (in)
|
|
|
|
// Define constants
|
|
innerDiameter = 0.364
|
|
outerDiameter = 35 / 64
|
|
length = 1 + 1 / 2
|
|
|
|
// create a sketch on the XY plane
|
|
sketch000 = startSketchOn(XY)
|
|
|
|
// create a profile of the outside of the pipe
|
|
outerProfile = circle(
|
|
sketch000,
|
|
center = [0.0, 0.0],
|
|
radius = outerDiameter / 2,
|
|
tag = $arc000,
|
|
)
|
|
|
|
// create a profile of the inside of the pipe
|
|
innerProfile = circle(
|
|
sketch000,
|
|
center = [0.0, 0.0],
|
|
radius = innerDiameter / 2,
|
|
tag = $arc001,
|
|
)
|
|
|
|
// create a profile with holes sketch000Profile000Holes
|
|
pipeProfile = outerProfile
|
|
|> subtract2d(tool = innerProfile)
|
|
|
|
// extrude the pipe profile to create the pipe
|
|
pipe = extrude(pipeProfile, length = length)
|