+module RoundedProfile(sz, cnr_rad){
+ hull(){
+ for (x=[ cnr_rad, sz[0]-cnr_rad ])
+ for (y=[ cnr_rad, sz[1]-cnr_rad ])
+ translate([x,y])
+ circle(r= cnr_rad, $fn=20);
+ }
+}
+
+module RoundedCube(sz, cnr_rad){
+ hull(){
+ for (x=[ cnr_rad, sz[0]-cnr_rad ])
+ for (y=[ cnr_rad, sz[1]-cnr_rad ])
+ for (z=[ cnr_rad, sz[2]-cnr_rad ])
+ translate([x,y,z])
+ sphere(r= cnr_rad, $fn=20);
+ }
+}
+