read-nums
dup2
sum
3
%
power-of-2
get
diff #(list-elem)
unwords