procedure Second is
begin
   null;
end Second;