Inheritance Association

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.

Example

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

See Also