bugfixed: precure.lisp