1generic
2package Interface9_Root.Child is
3    type Base_Type is abstract new Base_Interface with null record;
4
5    type Derived_Type is abstract new Base_Type and Derived_Interface
6      with null record; --  Test
7end Interface9_Root.Child;
8