test : Nat -> Int
test n =
  let c = if n == Z then 0 else 1
  in c