ビーカーの形状を定義します。
//**********************************************************************************
#local Beaker =
merge {
torus { 40, 1.5 translate 100*y }
cylinder { 0*y, 100*y, 40 }
torus { 40-8, 8 }
disc { < 0, -8, 0 > y, 40-8 }
}
//**********************************************************************************