diff --git a/HSlippyMap.cabal b/HSlippyMap.cabal
--- a/HSlippyMap.cabal
+++ b/HSlippyMap.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                HSlippyMap
-version:             1.6
+version:             1.8
 synopsis:            OpenStreetMap Slippy Map
 -- description:
 homepage:            https://github.com/j4/HSlippyMap
diff --git a/HSlippyMap.hs b/HSlippyMap.hs
--- a/HSlippyMap.hs
+++ b/HSlippyMap.hs
@@ -1,7 +1,7 @@
 module HSlippyMap (
     Tile,
     tileFromLatLong,
-    tileFromGPS
+    tileFromXY
 ) where
 
 type Lat = Float
diff --git a/hsl.hs b/hsl.hs
--- a/hsl.hs
+++ b/hsl.hs
@@ -2,7 +2,7 @@
 
 main = do
   putStrLn $ show $ tileFromLatLong lat long z
-  putStrLn $ show $ tileFromGPS x y z
+  putStrLn $ show $ tileFromXY x y z
   where
       lat = 48.8152
       long = 2.2712
