Function Pres-P

Part of:

package cl-uri.common-lisp.net
( pres-p < object > )