unit WorkspaceUnit;
interface

type
  WorkspaceUnitClass = class
  public
    function Create();
    function Work(): integer;
  end;

function WorkspaceUnitFunc(): integer;

implementation

function WorkspaceUnitClass.Create();
begin
end;

function WorkspaceUnitClass.Work(): integer;
begin
  return 9;
end;

function WorkspaceUnitFunc(): integer;
begin
  return 7;
end;

end.