試験管の形状を定義します。
//**********************************************************************************
#local Test_tube =
merge {
torus { 12, 1.5 translate 180*y }
cylinder { 0*y, 180*y, 12 }
sphere { < 0, 0, 0 > 12 }
}
//**********************************************************************************
試験管は透明なガラスなので、CSGの merge により形状を生成します。