RESULT = SAME_TYPE_AS(A, B)
A | Shall be an object of extensible declared type or unlimited polymorphic. |
B | Shall be an object of extensible declared type or unlimited polymorphic. |
© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-6.3.0/gfortran/SAME_005fTYPE_005fAS.html