SAME_TYPE_AS(A,B) (Fortran 2003)

Purpose

Inquires whether the dynamic type of A is the same as the dynamic type of B.

Class

Inquiry function

Argument type and attributes

A
An INTENT(IN) argument. The corresponding actual argument must be of extensible type. If the actual argument is a pointer, it must not have an undefined association status.
B
An INTENT(IN) argument. The corresponding actual argument must be of extensible type. If the actual argument is a pointer, it must not have an undefined association status.

Result type and attributes

Default logical scalar

Result value

The result is true if the dynamic type of A is the same as the dynamic type of B.
Note: The result depends only on the dynamic types of A and B. Differences in type parameters are ignored.

Related information