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:             2.1
+version:             2.2
 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
@@ -32,7 +32,7 @@
   tlong :: Long,
   tx :: X,
   ty :: Y,
-  tz :: ZLevel } deriving (Read, Eq)
+  tz :: ZLevel } 
 
 instance Show Tile where
   show (Tile lat long x y z) = "http://tile.openstreetmap.org/" ++ show z ++ "/" ++ show x ++ "/" ++ show y ++ ".png"
@@ -43,7 +43,7 @@
     where
       txmax = tx max
       txmin = tx min
-      tymax = ty min
+      tymax = ty max
       tymin = ty min     
       z = tz min
 
diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -3,6 +3,26 @@
 
 http://wiki.openstreetmap.org/wiki/Slippy_map_tilenames#Haskell
 
+GHCI
+----
+
+```
+ja@x220:~/codaz/HSlippyMap$ ghci
+GHCi, version 7.6.3: http://www.haskell.org/ghc/  :? for help
+Loading package ghc-prim ... linking ... done.
+Loading package integer-gmp ... linking ... done.
+Loading package base ... linking ... done.
+[1 of 1] Compiling HSlippyMap       ( HSlippyMap.hs, interpreted )
+Ok, modules loaded: HSlippyMap.
+*HSlippyMap> :load HSlippyMap
+*HSlippyMap> let max = tileFromLatLong 48.9031 2.5214 12
+*HSlippyMap> let min = tileFromLatLong 48.8146 2.1732 12
+*HSlippyMap> :t max
+max :: Tile
+*HSlippyMap> tilesFromBBox min max
+[http://tile.openstreetmap.org/12/2072/1409.png,http://tile.openstreetmap.org/12/2073/1409.png,http://tile.openstreetmap.org/12/2074/1409.png,http://tile.openstreetmap.org/12/2075/1409.png,http://tile.openstreetmap.org/12/2076/1409.png]
+```
+
 Exemple
 -------
 
@@ -22,13 +42,13 @@
       tymax = ty min
       tymin = ty max
       z = tz min
-
-̀`
+```
 
 Result :
 
-$ ./hsl | xargs wget -nv -O NULL --output-file osm.asi.log 
-$ cat osm.asi.log 
+```bash
+ja@x220 ~ $ ./hsl | xargs wget -nv -O NULL --output-file osm.asi.log 
+ja@x220 ~ $ cat osm.asi.log 
 2013-12-24 22:04:46 URL:http://tile.openstreetmap.org/8/129/87.png [37753/37753] -> "NULL" [1]
 2013-12-24 22:04:46 URL:http://tile.openstreetmap.org/8/129/88.png [36997/36997] -> "NULL" [1]
 2013-12-24 22:04:46 URL:http://tile.openstreetmap.org/8/130/87.png [36749/36749] -> "NULL" [1]
@@ -36,7 +56,7 @@
 FINISHED --2013-12-24 22:04:47--
 Total wall clock time: 0,7s
 Downloaded: 4 files, 144K in 0,4s (364 KB/s)
-
+```
 
 Other exemple
 -------------
diff --git a/hsl.hs b/hsl.hs
--- a/hsl.hs
+++ b/hsl.hs
@@ -14,7 +14,7 @@
   mapM (\(x,y) -> mapM (\y'-> print $ "http://tile.openstreetmap.org/" ++ show z ++ "/" ++ show x ++ "/" ++ show y' ++ ".png") y) [(x,[(minimum [tymin, tymax])..(maximum [tymin,tymax])]) | x <- [(minimum [txmin, txmax])..(maximum [txmin, txmax])]]
   where
       min = tileFromLatLong 49.13 3.05 8
-      max = tileFromLatLong 48.57 1.66 8
+      max = tileFromLatLong -48.57 1.66 8
       txmin = tx min
       txmax = tx max
       tymax = ty min