Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference

ID 767251
Date 3/22/2024
Public
Document Table of Contents

EXTENDS_TYPE_OF

Inquiry Intrinsic Function (Generic): Inquires whether the dynamic type of an object is an extension type of the dynamic type of another object.

result = EXTENDS_TYPE_OF (a , mold)

a

(Input) Is an object of extensible type. If it is a pointer, it must not have an undefined association status.

mold

(Input) Is an object of extensible type. If it is a polymorphic pointer, it must not have an undefined association status.

Results

The result type is default logical scalar.

The following determines the result value:

  • If mold is unlimited polymorphic and is a disassociated pointer or an unallocated allocatable, the result is .TRUE..

  • If a is unlimited polymorphic and is a disassociated pointer or an unallocated allocatable, the result is .FALSE..

  • If the dynamic type of a or mold is extensible, the result is true only if the dynamic type of a is an extension type of the dynamic type of mold.

Otherwise, the result is processor dependent.