Haskell comparar precios