Update p099.clj.