with Main_Vertex_Points;                 use Main_Vertex_Points;

procedure ts_mainvpts is

-- DESCRIPTION :
--   Calls the main procedure to extract vertex points.

begin
  Main_Vertex_Points.Main;
end ts_mainvpts;
