Binary Search in a 2D Matrix - haskell | Upit