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 -

box1 <- box(channelbox_origin,channelbox_origin + channelbox_dim)

subtract1 -

subtract <- subtractD(Plant_Origin,channelbox_origin)

box2 -

box2 <- box(echannelbox_origin,echannelbox_origin + echannelbox_dim)

subtract2 -

subtract <- subtactD(p1,echannelbox_origin)

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

layerset1 -

layerset1 <- layer_set("channel")

box3 -

box3 <- box(channelclosebox_origin,channelclosebox_origin + channelclosebox_dim)

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")