include<parametros.scad>;

module soporte_bola_inf(){

translate([0,0,1]){
  difference(){
   
	union(){
	cube([10,24.2,2],true);
	sphere(6,$fn=res);}

	translate([0,0,-6]) cylinder(h=10,r=6,center=true);

       sphere(5,$fn=res);
	
	translate([0,0,6]) cylinder(h=8,r=8.5,center=true);

	//antiguos agujeros de tornillo
       //translate([0,7.5,0]) cylinder(h=4,r=r_tor,center=true,$fn=res);
       //translate([0,-7.5,0]) cylinder(h=4,r=r_tor,center=true,$fn=res);}
      }

   }
}

//soporte_bola_inf();