Intel® Fortran Compiler 17.0 Developer Guide and Reference
Inquiry Intrinsic Function (Generic): Inquires whether the dynamic type of one object is the same as the dynamic type of another object.
result = SAME_TYPE_AS (a , b)
a |
(Input) Is an object of extensible type. If it is a pointer, it must not have an undefined association status. |
b |
(Input) Is an object of extensible type. If it is a pointer, it must not have an undefined association status. |
The result type is default logical scalar. The result is true only if the dynamic type of a is the same as the dynamic type of b.