1 with Generic_Inst13_Pkg
.Ops_G
;
4 package Generic_Inst13_Pkg
.Nested_G
is
6 type T
is new Generic_Inst13_Pkg
.T
;
8 package My_Operations
is new Generic_Inst13_Pkg
.Ops_G
(T
);
10 subtype List_T
is My_Operations
.List_T
;
12 function "or" (Left
, Right
: T
) return List_T
renames My_Operations
."or";
14 end Generic_Inst13_Pkg
.Nested_G
;