木の葉の形状

 木の葉の形状を定義します。
 //**********************************************************************************
  #local Leaf_org =
  difference {
   union {
   object { Leaf_Lorg pigment { P_leaf_L } }
   object { Leaf_Rorg pigment { P_leaf_R } }
   }
   sphere { < 0, 0.5, 0 > 8.65 pigment { color rgb Cv1 } }
  translate -10*cos(radians(150))*z }
  #local Handle_org =
  union {
   object {
   torus { 10,0.2 sturm rotate -90*z }
   clipped_by { plane { z, 0 } rotate (-20)*x }
   clipped_by { plane { z, 0 } rotate (90+30)*x }
   }
   cone { 0*z 0.2, 2*z 0 rotate -20*x translate < 0, 10-0.64, -3.62 > }
  pigment { color rgb Cv1 } translate < 0, -1.08, -10*cos(radians(150)) > }
  #declare Leaf_seg =
  union {
   object { Handle_org }
   object { Leaf_org }
  }
 //**********************************************************************************