Function Mid-P

Part of:

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