let isEven :: Number -> Boolean
let isEven 0 = false
let isEven 1 = false
let isEven 2 = true
let isEven n = isEven(n-1)