---

8.241 SAME_TYPE_AS — Query dynamic types for equality ¶

Synopsis:

RESULT = SAME_TYPE_AS(A, B)

Description:

Query dynamic types for equality.

Class:

Inquiry function

Arguments:

A	Shall be an object of extensible declared type or unlimited polymorphic.
B	Shall be an object of extensible declared type or unlimited polymorphic.

Return value:

The return value is a scalar of type default logical. It is true if and only if the dynamic type of A is the same as the dynamic type of B.

Standard:

Fortran 2003 and later

See also:

EXTENDS_TYPE_OF — Query dynamic type for extension