Inheritance association occurs between components of a parent component and components inherited by type extension into an extended type.
This association is not affected by the accessibility of the inherited components.
The following example shows inheritance association:
TYPE POINT ! A base type
REAL :: X, Y
END TYPE POINT
TYPE, EXTENDS(POINT) :: COLOR_POINT ! An extension of TYPE(POINT)
! Components X and Y, and component name POINT,
! are inherited from the parent type POINT
INTEGER :: COLOR
END TYPE COLOR_POINT