Model in Clojure of a Universal Basic Income