Function Cdr-Safe

Part of:

package metabang.utilities
( cdr-safe < x > )
Returns the cdr of `x' if it's a cons, NIL otherwise.