FooCAD Source Codeinclude General.foocad
/*
I plan on adding a plastic container inside, and growing tall plant, such as squashes. The stems will poke out
of the back.
Take off the seat lid to water it.
*/
class SeatPlanter : General() {
var length = 640
var width = 440
var ringCount = 3
fun height() = (ww + gap) * ringCount - gap
override fun build() : Shape3d {
return expandingRings( lumber, length, width, gap, ringCount ) +
slattedFloor( length, width ) +
feet( length, width ) +
lid( length + 80, width + 80, height() )
}
}