X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=blobdiff_plain;f=funcs.scad.cpp;h=5857c933a837f888bf22faedda5b455e6df0e973;hp=7bcd414a46cddec1071a13cd48db6e2a8a6800c8;hb=HEAD;hpb=94c38417c195ad9c990c5b9d3bae428421ac5e1c diff --git a/funcs.scad.cpp b/funcs.scad.cpp deleted file mode 100644 index 7bcd414..0000000 --- a/funcs.scad.cpp +++ /dev/null @@ -1,37 +0,0 @@ -// -*- C -*- - -function vecdiff2d(a,b) = [b[0]-a[0], b[1]-a[1]]; -function vecdiff(a,b) = [b[0]-a[0], b[1]-a[1], b[2]-a[2]]; - -#define dsq(i) (a[i]-b[i])*(a[i]-b[i]) -function dist2d(a,b) = sqrt(dsq(0) + dsq(1)); -function dist(a,b) = sqrt(dsq(0) + dsq(1) + dsq(2)); -#undef dsq - -function circle_point(c, r, alpha) = [ c[0] + r * cos(alpha), - c[1] + r * sin(alpha) ]; - -#define d (dist2d(a,c)) -#define alpha (atan2(a[1]-c[1],a[0]-c[0])) -#define gamma (asin(r / d)) -#define beta (alpha + 90 - gamma) - -function tangent_intersect_beta(c,r,a) = - beta; - -function tangent_intersect_b(c,r,a) = - circle_point(c, r, beta); -#undef d -#undef alpha -#undef gamma -#undef beta - -function tangents_intersect_beta(cbig,rbig,csmall,rsmall) = - tangent_intersect_beta(cbig,rbig-rsmall,csmall); - -function reflect_in_y(p) = [-p[0], p[1]]; - -function angle_map_range(in,base) = - in < base ? in + 360 : - in >= base + 360 ? in - 360 : - in;