Changes path to sample data
This commit is contained in:
parent
0418c7706b
commit
9ec3ccbdb7
|
@ -12,7 +12,7 @@ procedure Tess is
|
||||||
Input : File_Type;
|
Input : File_Type;
|
||||||
begin
|
begin
|
||||||
Ada.Text_IO.Put_Line("Tess started.");
|
Ada.Text_IO.Put_Line("Tess started.");
|
||||||
Open(Input, In_File, "inelev.dat");
|
Open(Input, In_File, "sample-data/katie.dat");
|
||||||
Info := Dtm.Katie.Get_Info(Input);
|
Info := Dtm.Katie.Get_Info(Input);
|
||||||
|
|
||||||
Put_Line(Get_X(Info)'Image);
|
Put_Line(Get_X(Info)'Image);
|
||||||
|
|
Loading…
Reference in New Issue