I have parent derived-type TypeA and a child derived-type TypeB that extends TypeA:
type TypeA
...
end type TypeA
type,extends(TypeA) :: TypeB
...
end type TypeB
I would like to have the inner components of TypeB to be PRIVATE. I add the PRIVATE attribute to TypeB the usual way:
type,extends(TypeA) :: TypeB
PRIVATE
...
end type TypeB
This gives me the following error:
error #6817: The PRIVATE statement is incorrectly positioned within the derived-type definition.
Is this not allowed in Fortran 2003 or is there a different syntax? Thanks for any help.
Jon
