equality1.pwqp 70 Bytes Raw Blame History Permalink 1 [n] -> { [x] -> 1 + [(x+1)/3] : exists a : x = 3a +1 && 0 <= x <= n }