４）帽子の下部

　トーラスを円錐で削り取って、帽子の下部を造ります。
//****************************************************************
#local Hat_org3 =
difference {
　torus { 14 5 }
　cone { (5+1)*y 19+8, -(5+1)*y 12.8 }
}
//****************************************************************
　例）　#local Ut=34;
　　　　 object { Hat_org1 texture { T_hat }
　　　 　　scale 1.5*4 rotate 7*x translate <0,Ut*0.4+35,Ut/30> }
　　　　 object { Hat_org2 texture { T_hat }
　　　　 　scale 1.5*4 rotate 7*x translate <0,Ut*0.4-18,Ut/30> }
　　　　 object { Hat_org3 texture { T_hat }
　　　　 　scale 1.5*4 rotate 7*x translate <0,Ut*0.4-85,Ut/30> }