X-Git-Url: https://git.jsancho.org/?p=dungeon-master.git;a=blobdiff_plain;f=mods%2Fdefault%2Fpoint.scm;fp=mods%2Fdefault%2Fpoint.scm;h=0000000000000000000000000000000000000000;hp=6ce8d6457d411e9b7c2cba91a45815da0ae4d44d;hb=695ecf94f5bb10ced4e66b0b4d036de9965c02ca;hpb=4e1254800a1c453aba76b8ccd5b632f38a71aed7

diff --git a/mods/default/point.scm b/mods/default/point.scm
deleted file mode 100644
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)))))