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=0d589ac9ecd3fe89a9201ed2c0a8da0a5dcb0a36;hb=HEAD;hpb=3f431f5e5f72cc88127a70888575f9a18d2c871a diff --git a/funcs.scad.cpp b/funcs.scad.cpp deleted file mode 100644 index 0d589ac..0000000 --- a/funcs.scad.cpp +++ /dev/null @@ -1,20 +0,0 @@ -// -*- C -*- - -function dist(a,b) = -#define dsq(i) (a[i]-b[i])*(a[i]-b[i]) - sqrt(dsq(0) + dsq(1)); -#undef dsq - -function circle_point(c, r, alpha) = [ c[0] + r * cos(alpha), - c[1] + r * sin(alpha) ]; - -function tangent_intersect(a,c,r) = -#define d (dist(a,c)) -#define alpha (atan2(a[1]-c[1],a[0]-c[0])) -#define gamma (asin(r / d)) -#define beta (alpha + 90 - gamma) - circle_point(c, r, beta); -#undef d -#undef alpha -#undef gamma -#undef beta