SAME_TYPE_AS (The GNU Fortran Compiler)

### 8.244 `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