An implementation of Kata 14 in Chicken Scheme