parseIntAsDouble :: Parser Double
parseIntAsDouble = parseInt >>= (\v -> return (fromIntegral v :: Double))
parseIntAsDouble :: Parser Double
parseIntAsDouble = parseInt >>= (\v -> return (fromIntegral v :: Double))
parseIntAsDouble = parseInt >>= (\v -> return (fromIntegral v :: Double))