Hi, I have a sample following code in which I am trying to test whether a certain object is extended from an abstract derived type. Here is the module: module my_module implicit none ! Abstract parent type type, abstract :: abstract_parent integer :: common_member end type abstract_p…

[image] nedanator: Here is the program: .. select type(obj2) type is(special_type) Try .. class is ( special_type )

Type is(extended from abstract)

alozada August 18, 2023, 11:16am 2

Perhaps this post might be useful.

1 Like

Topic		Replies	Views
Abstract type and derived types - a problem with sample code Help	6	987	March 27, 2022
Call overridden procedure of abstract parent type Help	23	2975	January 30, 2021
A couple of (probably trivial) OOP questions	8	477	April 30, 2023
Extending derived bind(c) types	20	1218	September 25, 2023
Custom operators in extended type Help	3	689	April 21, 2021