1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
-- pats ----- _ = 2 -- ----- x = 2 -- ----- (z@(x:y)) = z -- ----- ~(x,y) = x -- ----- f True = 1 f False = 0 -----