花の形状

 茎と花びらの形状を用いて、花の形状を定義します。
 //**********************************************************************************
  #local Flower_obj =
  union {
   object { Stem_seg texture { T_stem } }
   object { Petal_seg texture { T_petal } }
  translate 38*y }
 //**********************************************************************************