+ echo("RCS",l_uvec,ctr);
+ union(){
+ INREFFRAME(this_cnr, right_cnr) {
+ cube(bigr*2 + adj, center=true);
+ }
+ }
+ %translate(concat(ctr,[0])) circle(1);
+ if(0){
+ union(){
+ INREFFRAME(this_cnr, right_cnr) {
+// %translate([ -bigr,-bigr,0 ])
+// cube([bigr*2 + adj, bigr*3, bigr*2]);
+ }
+ }
+ union(){
+ INREFFRAME(this_cnr, left_cnr) {
+ %translate([ -bigr,-bigr,0 ])
+ cube(bigr*2 + adj);
+ }
+ }}