CCCPaste

Draw Arc based on Square

/*
 Draw Arc based on Square
 */
innerRad=80;  // [1:1:300]
outerRad=100; // [1:1:300]
arcstart=20;  // [-360:1:360]
arcdegre=120; // [-360:1:360]
height=1;     // [1:1:300]
debugOn = true;
debugVis= true;
debugColor="green"; // ["red","green","blue"]
/* [Hidden] */
// visualiztion controls set to good defaults
//  for smooth curved surfaces
$fs = 0.5;
$fa = 1.0;

sqSize = [outerRad-innerRad,height];
if( debugOn )
   translate( [innerRad,0,0] )
   color( debugColor)
        if( debugVis )
            %square( sqSize );
        else
            square( sqSize );

rotate_extrude(arcdegre, arcstart){
    translate( [innerRad,0,0] )
        square( sqSize );
    };