Function Relativize

Part of:

package cl-uri.common-lisp.net
( relativize < base > < uri > )