2019-03-05 07:29:06 -05:00
|
|
|
with Dtm.Surface; use Dtm.Surface;
|
|
|
|
|
|
|
|
package Stl is
|
|
|
|
|
2019-03-15 11:30:14 -04:00
|
|
|
subtype Normal is Point;
|
|
|
|
|
2019-03-05 07:29:06 -05:00
|
|
|
procedure Write(Surface : Surface_Vector; File_Path : String);
|
2019-03-11 16:40:14 -04:00
|
|
|
procedure Write_Binary(Surface : Surface_Vector; File_Path : String);
|
2019-03-05 07:29:06 -05:00
|
|
|
|
|
|
|
end Stl;
|