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
Derived type question Help	4	489	October 20, 2021
Verifying the dynamic status of actual argument	9	427	November 30, 2023
Polymorphic array in a derived type Help	5	732	March 22, 2022
How to use derived type in a derived type? Help	2	483	April 15, 2023
Parameterized derived types Help	4	461	April 19, 2022