AutoCAD Flocculation Tank Program - Floctankscript1

General Program Information

Inputs Needed to Call the Flocculation Tank Program

Inputs Defined Within the Flocculation Tank Program

Plant_origin

• x: 0m
• y: 0m
• z: 0m

EN_PipeSpec = 4

W_InletChannel = 0.245m

H_InletChannel = 0.3m

W_FlocChannel = W_Sed/2

L_Sed = 3.021m

W_Sed = 1m

H_Sed = 1.1m

N_FlocChannels = 2

T_PlantWall = 0.15m

T_Mp = 0.15m

N_SedTanks = 3

Amp_FlocBaffle = 0.5in

Per_FlocBaffle = 8.5

N_Baffle = 1

X_FlocBaffle = 4in

T_FlocBaffle = 4mm

AN_FlocBaffle = 90deg

N_{FlocBaffleCol} = 1

Y_FlocBaffle = 7cm

W_FlocPort = 0.379m

L_Floc = (LSed)*(N_FlocChannels)

H_Floc = H_Sed

H_FlocPort = 0.75m

totalfloc_dim =

• x: L_Floc/N_FlocChannels
• y: (N_FlocChannels*W_FlocChannel) + ((N_FlocChannels - 1)*T_PlantWall)
• z: H_Floc

wall_dim =

• x: totalfloc_dim0 + (2T_PlantWall)
• y: T_PlantWall
• z: totalfloc_dim2

flocport_dim is composed of a for loop with the range 0 to (N_FlocChannels - 2). While in the for loop:

flocport_dim0,i =

• x: W_FlocPort
• y: T_PlantWall
• z: H_FlocPort

channelopening_dim =

• x: W_InletChannel
• y: T_PlantWall
• z: H_InletChannel

floc_origin =

• x: Plant_Origin0
• y: Plant_Origin1 + N_SedTanks(W_Sed + T_PlantWall)
• z: Plant_Origin2

*wall_origin is composed of a for loop with the range 0 to (N_FlocChannels - 2). While in the for loop:

wall_origin0,i =

• x: Plant_Origin0 - totalfloc_dim0 - T_PlantWall
• y: Plant_Origin1 + N_SedTanks(W_Sed + T_PlantWall) + (W_FlocChannel*(1 + i)) + (T_PlantWall*i)
• z: Plant_Origin2

flocport_origin is composed of a for loop with an if statement embedded in the program scrip. The range of the for loop is from 0 to (N_FlocChannels - 2)

If round(round(i/2) - (i/2)) = 0 then:

flocport_origin0,i =

• x: Plant_Origin0 - W_FlocPort
• y: Plant_Origin1 + N_SedTanks(WSed~ + T_PlantWall) + (W_FlocChannel*(1 + i))
• z: Plant_Origin2

If round(round(i/2) - (i/2)) = 1

flocport_origin0,i =

• x: Plant_Origin0 - totalfloc_dim0
• y: Plant_Origin1 + N_SedTanks(WSed~ + T_PlantWall) + (W_FlocChannel*(1 + i))
• z: Plant_Origin2

*channelopening_origin =

• x: floc_origin0 - totalfloc_dim0
• y: floc_origin1 - T_PlantWall
• z: floc_origin2 + totalfloc_dim2 - H_InletChannel

*Y_FlocBaffles is composed of a for loop with the range 0 to (N_FlocChannels - 1). While in the for loop:

Y_{FlocBaffles0,j} = Plant_Origin1 + (N_SedTanks*(WSed~ + T_PlantWall)) + ((N_FlocChannels - j - 1)*(W_FlocChannel + T_PlantWall))

X_FlocBaffles =

• i(1):
• i(2):
• i(3):
• i(4):
• i(5):
• i(6):
• i(7):
• i(8):
• i(9):
• i(10):
• i(11):
• i(12):
• i(13):
• i(14):
• i(15):
• i(16):
• i(17):
• i(18):
• i(19):
• i(20):
• j(1):
• j(2):
• j(3):
• j(4):
• j(5):
• j(6):
• j(7):
• j(8):
• j(9):
• j(10):
• j(11):
• j(12):
• j(13):
• j(14):
• j(15):
• j(16):
• j(17):
• j(18):
• j(19):
• j(20):

Technical Program Outline

layer1 -

layer1 <- layer_new("floctank",dkgrey)

tank1

tank1 <- Tank(floc_origin,totalfloc_dim,tank_thick)

box1 -

box1 <- box(wall_origin,wall_origin + wall_dim)

box2 -

box2 <- box(hole_origin,hole_origin + flochole_dim)

subtract0 -

subtract0 <- subtractD(p1,hole_origin)

p1 =

• x: hole_origin0 + flochole_dim0 + tank_thick
• y: hole_origin1
• z: hole_origin2

union1 -

union1 <- unionC(p1,p2)

p1 =

• x: floc_origin0 - totalfloc_dim0 - tank_thick - zc
• y: floc_origin1 - tank_thick - zc
• z: floc_origin2

p2 =

• x: floc_origin0 + tank_thick + zc
• y: floc_origin1 + totalfloc_dim1 + tank_thick + zc
• z: floc_origin2

box3 -

box3 <- box(p1,p2)

p1 =

• x: floc_origin0 - totalfloc_dim0
• y: floc_origin1 - tank_thick
• z: floc_origin2 + totalfloc_dim2 - channel_dim2

p2 =

• x: floc_origin0 - totalfloc_dim0 + channel_dim1
• y: floc_origin1
• z: floc_origin2 + totalfloc_dim2

subtract1 -

subtract1 <- subtractD(floc_origin,p1)

p1 =

• x: floc_origin0 - floc_dim0
• y: floc_origin1 - tank_thick
• z: floc_origin2 + floc_dim2 - channel_dim2

layerset

layerset <- layer_set("0")

layerfreeze -

layerfreeze <- layer_freeze("floctank")