英文字oの描画

 英文字oを二次近似曲線により描画します。
 //**********************************************************************************
  #local Pmax=1+2*4;
  #declare Vp[0]=< -7, -10 >; #declare Vp[1]=< -10, -10 >;
  #declare Vp[2]=< -12, -15 >; #declare Vp[3]=< -14, -21 >;
  #declare Vp[4]=< -10, -20 >; #declare Vp[5]=< -8, -19 >;
  #declare Vp[6]=< -6, -15 >; #declare Vp[7]=< -4, -10 >;
  #declare Vp[8]=Vp[0];
  #local Txt_c = union { Contact_line(Lr/Sc, 4, 4) }
  object { Txt_c pigment { Cv3 } rotate -90*x scale Sc translate 7*x }
 //**********************************************************************************