Add intersection with cylinders

src/Geometry.hs

@@ -32,7 +32,6 @@ import Geometry.Triangulate
 import Geometry.Vector
 import Geometry.Vector3D
 import ListHelp
-import Linear.Metric
 
 {- | Return a point a distance away from a first point towards a second point.
  Does not go past the second point.
@@ -137,8 +136,6 @@ difference x y
 reflectIn :: Point2 -> Point2 -> Point2
 reflectIn line vec = rotateV (2 * angleBetween line vec) vec
 
-reflectInNormal :: Point3 -> Point3 -> Point3
-reflectInNormal n v = v - (2 * project n v)
 
 -- takes an angle of entry (measured from x axis) and two wall points and gives a
 -- reflected angle (from x axis)