package Nested_Subtype_Byref is
   procedure Check;
end;