試験管の描画

 液体の入った試験管を描画します。
 //**********************************************************************************
  union {
   object { Test_tube texture { T_Frasco } interior { ior 1.0 } hollow }
   difference {
   object { Test_tube }
   box { < -14, 50, -14 > < 14, 180+1, 14 > }
   texture { pigment { color rgbt < 0.034, 0.966, 0.034, 0.6 > } }
   scale 0.98 }
  translate < 240-60, -80, 0 > }
 //**********************************************************************************