module ModT3 interface;

export
  ModT3 = (i, DoTest);

var
  i: integer;


procedure DoTest;


end.


module ModT3 implementation;


procedure DoTest;
begin
end;


to begin do  begin
  i := -9;
end;


end.
