added square?

local change on laptop in util.lisp.