package body P is
   protected body PT1 is
      procedure Proc1 is
      begin
         null;
      end;
   end;

   protected body PT2 is
      procedure Proc2 is
      begin
         null;
      end;
   end;

   protected body PT3 is
      procedure Proc3 is
      begin
         null;
      end;
   end;

end;
