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

ID 767251
Date 9/08/2022
Public

A newer version of this document is available. Customers should click here to go to the newest version.

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.