Function Class-For-Type

Part of:

package asdf
( class-for-type < parent > < type > )