h3. General Program Information

{float:left|border=2px solid black}
[!Segment of floc tank.PNG|width=300px!|AutoCAD Channel Program]
Segment of Floc Tank
{float}\\
\\
h3. Technical Program Outline

*local* \- [Layer{~}new~|AutoCAD Basics Layer] creates a new light purple layer, "baffle"

local <\- layer{~}new~("baffle", ltpurple)

*for loop* \- this loop counts the number of baffles per channel

x(j) - returns the number of channels in column j

*for loop* \- this loop determines the origin point of each baffle in column j and the length of each baffle

*baffle{*}{*}{~}origin i{~}* =
* x: Plant{~}Origin0~ \- L{~}Sed~ + X{~}FlocBaffles i,j~
* y: -L{~}slot~ \- Y{~}FlocBaffles 0,j~
* z: Plant{~}Origin2~ + Z{~}FlocBaffles i,j~

*baffle{*}{*}{~}length i{~}* = L{~}FlocBaffles i,j~ (Defined in Flocculator 3)

*if/otherwise statement* \- this statement determines the type of lamina that will be used to draw the baffles

local <\- stack(local(lamina(baffle{~}origin i~, Amp{~}FlocBaffle~, W{~}FlocChannel~ + 2*L{~}slot~, baffle{~}length i~, T{~}FlocBaffle~, Per{~}FlocBaffle~,AN{~}FlocBaffle~ \- 60deg, N{~}Baffle~, N{~}FlocBaffleCol~, X{~}FlocBaffle~, Y{~}FlocBaffle~)) if Baffle{~}complex~ *=* 1

local <\- stack(local(laminaplain1(baffle{~}origin i~, W{~}FlocChannel~ + 2*L{~}slot~, baffle{~}length i~, T{~}FlocBaffle~, AN{~}FlocBaffle~ \- 60deg, N{~}Baffle~, N{~}FlocBaffleCol~, X{~}FlocBaffle~)) if Baffle{~}complex~ *=* 1 otherwise