className Function

public function className(self) result(s)

Class name returns a string with the name of the type of the object

### Usage:

   PRINT *,  obj % className()
   if( obj % className = "FTObject")

Type Bound

Arguments

Type	Intent	Optional	Attributes		Name
class(FTObject)				::	self

Return Value character(len=CLASS_NAME_CHARACTER_LENGTH)