[Haskell-iPhone] Screwy Float values (Double fine, not rounding errors)