4)髪の毛の線

 髪の毛の線を、ブロブ曲線で造ります。
 //***************************************************************
 #local Lr=1/15;
 #local Hair_org = union {
  object { Blob_line(Lr,<0,pi/3,pi/16>,<40,40>,1) translate 0.5*y }
  object { Blob_line(Lr,<0,pi/3,pi/16>,<40,40>,1) rotate 180*y translate 0.5*y }
  object { Blob_line(Lr,<1.5,2,1/6>,<40,40>,3) rotate 180*y translate 3*y }
  object { Blob_line(Lr,<-pi/3,pi,pi/16>,<4,40>,2) }
 }
 //***************************************************************
 例) object { Hair_org texture { T_hair } scale 45 translate 26*y }