Added labour and floor shape for Lisp implementation