Concat deux entiers Haskell
addDigit a b | a < 0 = a * 10 - b
| otherwise = a * 10 + b
Frightened Ferret
addDigit a b | a < 0 = a * 10 - b
| otherwise = a * 10 + b