create 0039.clj
modify 0039.clj (increase readability)