Origin - a 3*1 matrix with x,y,z positions corresponding to the point where the pipe will be drawn
Pipeinr - the inner radius of the pipe
Pipelength - the length of the pipe
p2 =
p3 =
win1 =
win2 =
Pipeoutr - the outer radius of the pipe, found from the pipe database using the outerradius(2*Pipeinr) function
Note: All coordinates are referenced in top view in the program unless otherwise specified

zoomwin- zooms on a window space directly around where the pipe is to be draw (as shown above - actual window size relative to pipe that is to be drawn).
zoomwin <-- zoomwin(win1,win2)
win1 =
win2 =


cylinder1 - Draws the larger of the two cylinders needed to create a pipe. The cylinder has pipeoutr as the radius. From topview, the cylinder draws up towards the viewer with the pipe origin at the bottom base.
cylinder1 <-- cylinder(origin,pipeoutr,pipelength)
origin =
pipeoutr : outerradius(2*pipeinr)
pipelength : pipelength


cylinder2 - Draws the smaller of the two cylinders needed to create the pipe. The cylinder has pipeinr as the radius. From topview, the cylinder draws up towards the viewer with the pipe origin at the bottom base. This inner cylinder will then be subtracted to create the hollow pipe
cylinder2 <-- cylinder(origin,pipeinr,pipelength)
origin =
pipeinr : pipeinr
pipelength : pipelength

subtract1 - In order to create the hollow pipe, the inner cylinder must be subtracted from the outer cylinder. The subtract function selects p2, on the edge of the inner cylinder, to select the inner cylinder as the piece to be subtracted. The subtract function selects p3, on the edge of the outer cylinder, to select the outer cylinder to subtract from.
subtract <-- subtract(p2,p3)
p2 =
p3 =