module Exercise where

timeToSave :: Double -> Double -> Double -> Maybe Int
timeToSave goal income expenses =
    let
      laske
       |income < expenses = Nothing
       |income > expenses = Just(ceiling(goal/(income-expenses)))
    in laske