ピーマンの形状

 ピーマンの形状を定義します。
 //**********************************************************************************
  #local Paprika_obj =
  union {
   object { Paprika_seg scale 4 }
   object { Calyx_seg texture { T_calyx } scale <1.5,1,1.5> rotate 180*z translate 3.6*y }
   object { Twig_seg texture { T_twig } scale 0.5 translate 5*y }
  scale <1,2.5,1> }
 //**********************************************************************************