#debug "\nCreation du Vase ............\n"
#declare Z_Position = Z_Piece / 1.75;
#declare X_Position = 0;

#declare Vase =
union{
   cylinder{<0,0,0>,<0,1,0>,Dia_Pied texture{Tex_Vase}}
   sor{9 <10,1>,<1,1>,<6,1.5>,<8,1.75>,<6,2>,<15,20>,<6,35>,<8,70>,<10,70> sturm texture{Tex_Vase}}
   translate<X_Position + V_Lar_Etagere * 1.6,Haut_Etagere + Bord_Etagere + E_Etagere,Z_Position + Bord_Etagere * 3>
     }
