with Foo; use Foo;

procedure Playground_0 is
begin
   Bar (1, 1.0);
   Bar (1, 1.0);
end Playground_0;
