Function Ti-Null-Subtype-P

Part of:

package cl-perec
( ti-null-subtype-p < instance > )