with Package1, Package2, Package3, Package4, Package5, Package6, Package6, Package7, Package8, Package9, Package10,
  Package11, Package12, Package13, Package14, Package15, Package16, Package17, Package18, Package19, Package20,
  Package21, Package22, Package23;
use Package1, Package2, Package3, Package4, Package5, Package6, Package6, Package7, Package8, Package9, Package10,
  Package11, Package12, Package13, Package14, Package15, Package16, Package17, Package18, Package19, Package20,
  Package21, Package22, Package23;

procedure Simple is

begin
   null;
end Simple;
