module Calculator where

import Data.List.Split

calculate :: String -> Double
calculate exp = read $ ((splitOn "+" exp)!!0)

module Calculator where

import Data.List.Split

calculate :: String -> Double
calculate exp = read $ head (splitOn "+" exp)

Refactor calculate accordingly to compiler warnings
Refactor calculate accordingly to compiler warnings
