General Program Information

{float:left|border=2px solid black}
[!1.bmp|width=280px!|AutoCAD Sedimentation Tank Inlet Slopes Trapezoid Program][!1b.bmp|width=380px!|AutoCAD Sedimentation Tank Inlet Slopes Trapezoid Program]
Southwest Isometric View
{float}



Input Definitions

Inputs Needed to Call the Inlet Slope Trapezoid Function

origin - A 3*1 matrix with x,y,z positions corresponding to the point where the inlet slope will be drawn.

Length - length of the slopes, generally the length of the sedimentation tank

WSed - width of the sedimentation tank

lorifice - length of the opening that will allow inlet flow

horifice - height of the opening that will allow inlet flow

borifice -

thick - thickness of the slopes

n - number of orifices and sections, one section contains one orifice

bigslope - slope of the inlet in degrees

little slope -

HTrapezoid -

Inputs Defined within the Inlet Slope Trapezoid Function

verticalorigin =

verticaldim =

slopeorigin =

dim =

verticalorigindim = verticalorigin + verticaldim

boxdim = slopeorigin + dim

sideorigin =

sideoriginrotate =

orificeorigin =

orificedim =

nrow = l

ncol = n

dist = length/2

mirrorpoint1 =

mirrorpoint2 =

win1 =

win2 =

Technical Program Outline

viewtop - sets the workspace so that the user is viewing the top of the object.

viewtop <-- viewtop1

{float:left|border=2px solid black}
[!2.bmp|width=520px!|AutoCAD Sedimentation Tank Inlet Slopes Trapezoid Program]
{float}

zoomwin - zooms on a window space directly around where the inlet slope is to be drawn.

zoomwin <-- zoomwin(win1, win2)

win1 =

win2 =

{float:left|border=2px solid black}
[!3.bmp|width=420px!|AutoCAD Sedimentation Tank Inlet Slopes Trapezoid Program] 
{float}

verticalbox - draws a box using verticalorigin to select the first corner, and verticalorigindim to select the opposite corner. This box will serve as the vertical part of the inlet slopes.

verticalbox <-- box(verticalorigin, verticalorigindim)

verticalorigin =

verticaldim =

{float:left|border=2px solid black}
[!4.bmp|width=280px!|AutoCAD Sedimentation Tank Inlet Slopes Trapezoid Program] 
Southwest Isometric View
{float}

bigslopebox - draws on top of the vertical box, using slopeorigin to select the first corner, and boxdim to select the opposite corner. This box will serve as the slope of the inlet slopes.

bigslopebox <-- box(slopeorigin, boxdim)

slopeorigin =

boxdim = slopeorigin + dim



{float:left|border=2px solid black}
[!5a.bmp|width=300px!|AutoCAD Sedimentation Tank Inlet Slopes Trapezoid Program][!5.bmp|width=60px!|AutoCAD Sedimentation Tank Inlet Slopes Trapezoid Program]
Before sideview
{float}

sideview - changes the view from topview to side view

sideview <-- viewrightside1



{float:left|border=2px solid black}
[!6.bmp|width=280px!|AutoCAD Sedimentation Tank Inlet Slopes Trapezoid Program]
{float}

rotate - rotates the bigslopebox by 90 - biglope*(180/pi) degrees along the z-axis.

rotate <-- rotate3d(sideorigin, sideoriginrotate, "z", 90 - bigslope*(180/pi))

sideorigin =

sideoriginrotate =

"z" =

90 - bigslope*(180/pi) =

orificebox -

orificebox <-- box(orificeorigin, orificedim)

orificeorigin =

orificedim =

subtractorifice - subtracts orificebox to create an orifice, using the verticalorigin to select orificebox as the object to be subtracted.
subtractorifice <-- subtractDall(verticalorigin)

verticalorigin =

array - creates an array to replicate the slab n times, by using the origin to select the slab as the item to put into an array, then specifies that a rectangular array with one row and "n" columns with a displacement of "dist" is to be used to place the slabs one next to the other.

array <-- arrayB(verticalorigin, nrow, ncol, dist)

verticalorigin =

nrow = l

ncol = n

dist = length/2

union - Unites all the individual components of the inlet slope to act as a single unit

union <-- unionallA

mirror - replicates the original inlet slope drawn by selecting the original inlet slope using the origin, then reflecting it over a mirror line created using mirrorpoint1 and mirrorpoint2.

mirror <-- mirrorall(mirrorpoint1, mirrorpoint2)

win1 =

win2 =

bigunion -

bigunion <--unionallA