package Inline11_Pkg is

  procedure Trace (I : Integer);
  pragma Inline (Trace);

end Inline11_Pkg;