[Haskell-iPhone] Up dateing the phone