99clj; problem 21 - insert-at