import Text.ParserCombinators.Parsec.Number
import Control.Applicative ((<$), (<*), (*>), (<*>), liftA)
import Data.List (foldl')
import Text.ParserCombinators.Parsec.Number
import Control.Applicative ((<$), (<*), (*>), (<*>), liftA)
import Data.List (foldl')