Open Channel Drawing Script

layerthawtank - Layer_thaw unlocks the layer "slopes" so that it can be edited.

layerthawtank <- layer_thaw("slopes")

viewtop - Rotates the workspace so that the object is viewed from the top.

viewtop <- viewtop1

box1 - Creates a box based on two points.

box1 <- box(channelbox_origin,channelbox_origin + channelbox_dim)

channelbox_origin =

• x: tank_origin0 - L_Sed
• y: tank_origin1
• z: tank_origin2 + H_Sed - H_Channel

channelbox_dim =

• x: W_Channel
• y: N_SedTanks(WSed~ + T_PlantWall)
• z: H_Channel

subtract1 - SubtractD subtracts one object from the other based on two points.

subtract <- subtractD(Plant_Origin,channelbox_origin)

Plant_Origin =

channelbox_origin =

• x: tank_origin0 - L_Sed
• y: tank_origin1
• z: tank_origin2 + H_Sed - H_Channel

box2 - Creates a box based on two points.

box2 <- box(echannelbox_origin,echannelbox_origin + echannelbox_dim)

echannel_origin =

• if layout1:
  • x: 0
  • y: 0
  • z: 0

• if layout2:
  • x: tank_origin0
  • y: tank_origin1 - T_PlantWall
  • z: tank_origin2 + H_Sed - H_EChannel

• if layout3:
  • x: tank_origin0 - L_Sed + W_Channel + T_ChannelWall + W_EChannel
  • y: tank_origin1 - T_PlantWall
  • z: tank_origin2 + H_Sed - H_EChannel

• if layout4:
  • x: tank_origin0 - L_Sed + W_ChannelInlet + T_ChannelWall + W_EChannel
  • y: tank_origin1 - T_PlantWall
  • z: tank_origin2 + H_Sed - H_EChannel

echannelbox_dim =

• x: W_EChannel
• y: N_SedTanks(WSed~ + T_PlantWall)
• z: H_EChannel

subtract2 - SubtractD subtracts one object from the other based on two points.

subtract <- subtractD(p1,echannelbox_origin)

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

p1 =

• x: Plant_Origin0 + T_PlantWall
• y: Plant_Origin1
• z: Plant_Origin2

echannel_origin =

• if layout1:
  • x: 0
  • y: 0
  • z: 0

• if layout2:
  • x: tank_origin0
  • y: tank_origin1 - T_PlantWall
  • z: tank_origin2 + H_Sed - H_EChannel

• if layout3:
  • x: tank_origin0 - L_Sed + W_Channel + T_ChannelWall + W_EChannel
  • y: tank_origin1 - T_PlantWall
  • z: tank_origin2 + H_Sed - H_EChannel

• if layout4:
  • x: tank_origin0 - L_Sed + W_ChannelInlet + T_ChannelWall + W_EChannel
  • y: tank_origin1 - T_PlantWall
  • z: tank_origin2 + H_Sed - H_EChannel

layerset1 - Layer_set selects the layer "channel."

layerset1 <- layer_set("channel")

box3 - Creates a box based on two points.

box3 <- box(channelclosebox_origin,channelclosebox_origin + channelclosebox_dim)

channelclosebox_origin =

• x: tank_origin0 - L_Sed - T_PlantWall - W_Channel - T_ChannelWall
• y: tank_origin1 - T_PlantWall
• z: tank_origin2 + H_Sed - H_Channel - T_ChannelWall

channelclosebox_dim =

• x: W_Channel + T_ChannelWall + T{~}PlantWall
• y: T{~}PlantWall
• z: H_Channel + T_ChannelWall

bigunion - Union_allA selects all the objects visible in the workspace and joins them into one single object.

bigunion <- union_allA

layerset - Layer_set selects the layer "0".

layerset <- layer_set("0")

layerfreezech - Layer_freeze locks the layer "channel" so that it cannot be edited.

layerfreezech <- layer_freeze("channel")

layerfreezetank - Layer_freeze locks the layer "slopes" so that it cannot be edited.

layerfreezetank <- Layer_freeze("slopes")