Add a new implementation of problem one with letfn syntax