plusone :: Int -> Int
plusone x = x + 1


difference :: Int -> Int -> Int
difference x y = if x <= y then y-x else x - y