moved pr to clamp.lisp
added pr and prn