chiark / gitweb /
Move a lot of files into the utils tree
[reprap-play.git] / funcs.scad.cpp
deleted file mode 100644 (file)
index 0d589ac9ecd3fe89a9201ed2c0a8da0a5dcb0a36..0000000000000000000000000000000000000000
+++ /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
new file mode 120000 (symlink)
index 0000000000000000000000000000000000000000..d6ea1996e351665e8a8fe67ee2392bd0fe10dbba
--- /dev/null
@@ -0,0 +1 @@
+diziet-utils/funcs.scad.cpp
\ No newline at end of file