-- Informatics 2A Assignment 1, Nov 2016
-- MH test program 1

-- Absolute value for integers

abs :: Integer -> Integer ;
abs n = if 0 <= n then n else 0 - n ;

-- Test expression: abs 5 + abs (0 - 3)
-- Type should be:  Integer
-- Value should be: 8