(#(or(println %)(if(> % 1)(recur(if(even? %)(/ % 2)(+(* % 3)1)))))(read))