I think I have got myself into trouble and I would like someone to verify for me that I am in fact doing something that is illegal.
I have a type that has multiple derived type that has a pointer to another type that has multiple derived types, thus I use the
type :: child_type
class(parent_type), pointer :: cb
! other stuff including a contains and procedures
end type child_type
! several more child types derived from original child_type
type :: parent_type
class(child_type), pointer :: orb
end type parent_type
! a couple of more parent types
When I do this, it gives me an error saying that the name must have an explicit type for the "class(parent_type), pointer :: cb" line.
Is there a trick to make it work?