1
0
Fork 0
mirror of https://gitlab.com/mfocko/CodeWars.git synced 2024-11-22 16:43:46 +01:00
CodeWars/8kyu/return_negative/solution.hs

5 lines
103 B
Haskell
Raw Normal View History

module Codewars.Kata.Negative where
makeNegative :: (Num a, Ord a) => a -> a
makeNegative n = - abs n