Class name returns a string with the name of the type of the object
PRINT *, obj % className() if( obj % className = "FTStringSet")
FTStringSet