Core.cljs: started writing free-pile-for.