General Program Information
Input Definitions
Inputs Needed to Call the Tee Function
origin - A 3*1 matrix with x,y,z positions corresponding to the point where the tee will be drawn.
ND - The nominal diameter of the pipe. This value along with the pipe schedule is used to determine other actual dimensions of the tee.
R1 - The inner radius of the main pipe.
R2 - The outer radius of the main pipe.
R3 - The outer radius of the sockets of the tee.
L - The length of the skinnier pipes of the tee.
H - The length (or depth) of the sockets of the tee.
EN- The enumerated pipe schedule type. Each schedule of pipe is represented by a specific number within our code.
Inputs Defined within Pipe Database
origin-A 3*1 matrix with x,y,z positions corresponding to the point where the tee will be drawn.
ND-The nominal diameter of the pipe. This value along with the pipe schedule is used to determine other actual dimensions of the tee.
outerradius(ND)-
innerD(ND,EN)/2-
ConRadius(ND)-
ShortTeeLength(ND)*2-
SocketDepth(ND)-
EN-The enumerated pipe schedule type. Each schedule of pipe is represented by a specific number within our code.
Inputs Defined within the Tee Function
p1 =
- x : origin0
- y : origin1
- z : origin2
p2 =
- x : origin0
- y : origin1
- z : origin2 + L/2
p3 =
- x : origin0 + innerD(ND, EN)/2
- y : origin1
- z : origin2 + L/2
p4 =
- x : origin0 - R1
- y : origin1
- z : origin2
p5 =
- x : origin0 + L/2
- y : origin1 + R1
- z : origin2 + L/2
p7 =
- x : origin0 - R3
- y : origin1
- z : origin2
p8 =
- x : origin0 - R1
- y : origin1
- z : origin2 \
p9 =
- x : origin0
- y : origin1 - H
- z : -origin1 - R3
p10 =
- x : origin0
- y : origin2 + L/2
p11 =
- x : origin0 + zc
- y : origin2 + L/2 - zc
p12 =
- x : origin0 + zc
- y : origin2 + L/2
ND - The nominal diameter of the pipe. This value along with the pipe schedule is used to determine other actual dimensions of the tee.
R1
R2
R3
L
H
win1 =
- x : origin0 - (L/2 + H)
- y : origin1 - R3
- z : origin2
win2 =
- x : origin0 + (L/2 + H)
- y : origin1 + R3
- z : origin2
EN-The enumerated pipe schedule type. Each schedule of pipe is represented by a specific number within our code.
Note: zc corresponds to the zoom constant used within AutoCAD, defined by the basics file.
Technical Program Outline
Note: All coordinates are referenced in top view in the program unless otherwise specified
zoomwin- zooms on a window space directly around where the tee is to be drawn. The points win1 and win2 are used to select this window size, based on including the space of the tee and a zoom constant (zc) to ensure the entire drawing will be within the frame.
zoomwin <-- zoomwina(win1,win2)
win1 =
- x : origin0 - (L/2 + H)
- y : origin1 - R3
- z : origin2
win2 =
- x : origin0 + (L/2 + H)
- y : origin1 + R3
- z : origin2
pipe1- Draws a pipe of length L, with origin at p1.
pipe1 <-- Pipe(p1,ND,L,EN)
p1 = origin
ND =
L =
EN =
pipe2 - Draws a pipe of half the length of pipe1, with it's origin starting at L/2, the middle of pipe1. All other dimensions are the same as pipe1.
pipe2 <-- Pipe(p2,ND,L/2,EN)
p2 =
- x : origin0
- y : origin1
- z : origin2 + L/2
ND =
L/2 =
EN =
rotate1- rotates pipe2 90 degrees using p2 to select pipe2, then using p3 to specify where on the y-axis to rotate.
rotate1 <-- rotate()3d(p3,p2,"y",90)
p3 =
- x : origin0 + innerD(ND, EN)/2
- y : origin1
- z : origin2 + L/2
p2 =
- x : origin0
- y : origin1
- z : origin2 + L/2
"y" - specifies which dimension to rotate in
90 - specifies how many degrees to rotate
union1 - unites pipe1 and pipe2 to act as one solid unit, instead of 2 separate pieces, using p4 to select pipe1 and p5 to select pipe2.
union1 <-- unionA(p4,p5)
p4 =
- x : origin0 - R1
- y : origin1
- z : origin2
p5 =
- x : origin0 + L/2
- y : origin1 + R1
- z : origin2 + L/2
cylinder1 - Draws a cylinder of length L and a radius of R2 at the origin
cylinder1 <-- cylinderA(p1,R2,L)
p1 = origin
R2 =
L =
subtract1- subtracts cylinder1 from the tee using p4 to select cylinder1 as the object to be subtracted, and using p3 to select the tee as the object to be subtracted from.
subtract1 <-- subtractA(p4,p3)
p4 =
- x : origin0 - R1
- y : origin1
- z : origin2
p3 =
- x : origin0 + innerD(ND, EN)/2
- y : origin1
- z : origin2 + L/2