program Minimum_Size_Test;
{
 * test program for the Graph unit
}

uses
  Graph;

var
  grDriver,
  grMode   : Integer;
begin
  grDriver := Detect;
  InitGraph(grDriver, grMode,'');
  CloseGraph;
end.
