Added shared-function, and new work.clj file