unit ub0380;
interface
procedure p1(i:integer);overload;
implementation
procedure p1(i:integer);overload;
begin
end;
end.