Tank Slope Drawing Script

layerslopes - Layernew creates a new light grey layer, "slopes."

layerslopes <- layernew("slopes",ltgrey)

slopes - Calls the Sedimentation Tank Slopes Program to draw the tank slopes based on three inputs.

slopes <- sedslope(SedSlopesOrigin,p1,ANSedBottom)

Note: p1 is a dummy variable used only in the program help section to designate the matrix below.

SedSlopesOrigin =

p1 =

ANSedBottom = 10 deg

tankthaw - Layerthaw unlocks the "tank" layer so that edits can be made.

tankthaw <- layerthaw("tank")

bigunion - UnionallA selects all the objects in the workspace and unions them into a single object

bigunion <- unionallA

box1 - Creates a box based on two points.

box1 <- box(sedtankbox1origin, sedtankbox1origin + sedtankbox1dim)

sedtankbox1origin =

sedtankbox1dim =

tankthaw - Layerthaw unlocks the layer "tank" so that it can be edited.

tankthaw <- layerthaw("tank")

subtractbox - SubtractJ subtracts one object from the other based on four points.

subtractbox <- subtractJ(PlantOrigin,p1,p2,sedtankbox1origin)

Note: p1 and p2 are dummy variable used only in the program help section to designate the matrix below.

PlantOrigin =

p1 =

p2 =

sedtankbox1origin =

layerset - Layerset selects the layer "0".

layerset <- layerset("0")

layerfreezeslope - Layerfreeze locks the layer "slopes" so that it cannot be edited.

layerfreezeslope <- layerfreeze("slopes")