Voronoi meshes (uncompleted)

[dungeon-master.git] / mods / default / point.scm

diff --git a/mods/default/point.scm b/mods/default/point.scm
deleted file mode 100644 (file)
index 6ce8d64..0000000
--- a/mods/default/point.scm
+++ /dev/null
@@ -1,17 +0,0 @@
-(define-module (dungeon-master geom point)
-  #:use-module (srfi srfi-9)
-  #:export (make-point
-            point?
-            point-x
-            point-y))
-
-(define-record-type <point>
-  (make-point x y)
-  point?
-  (x point-x)
-  (y point-y))
-
-(define (points-distance p1 p2)
-  (abs
-   (sqrt (+ (expt (- (point-x p1) (point-x p2)) 2)
-            (expt (- (point-y p1) (point-y p2)) 2)))))