package body Main_Package is
   procedure Foo
     (A, B : Integer;
      C, D, E, F : Integer;
      G, H, I : out Integer;
      J, K : in out Integer;
      L : in out Integer) is
   begin
      null;
   end Foo;

   procedure Qux
     (M, N, O : Integer; P : Integer)
   is
   begin
      null;
   end Qux;
end Main_Package;
