|
The result is true if and only if the dynamic type of A is the same as, or an extension of, the dynamic type of MOLD.
Note that the dynamic type of unallocated allocatable or disassociated pointer is the same as its declared type; in the case of CLASS(*), which has no declared type, it is treated as if it is the parent type of everything, i.e. everything extends a disassociated CLASS(*) and a disassociated CLASS(*) is not an extension of anything else.
Either A or MOLD is CLASS(*) and has a dynamic type that is not extensible, the result is processor dependent.
Note that simply knowing that a type is an extension of another does not give you access to any of the extended components; to do this you need to use the SELECT TYPE construct.
|
|