extends_type_of(a, mold) determines whether the dynamic type of a is an extension of the dynamic type of mold.
Fortran 2003 and later
extends_type_of(a, mold)a - An object of extensible type.mold - An object of extensible type.A default logical scalar is returned. The value is .true. if the dynamic type of a is an extension type of the dynamic type of mold and .false. otherwise. Note that the return value is .true. whenever mold is an unlimited polymorphic and is either a disassociated pointer or an unallocated allocatable. Differences in type parameters are ignored.