src/StlTransfer/StlTransfer.cdl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34

-- File: StlTransfer.cdl 
-- Created:  Mon Nov 14  10:11:39 1994  
-- Author: Jean Claude VAUTHIER 
-- ---Copyright: Matra Datavision 1994


package StlTransfer 

	---Purpose: The  package   Algorithm  for Meshing   implements
	--          facilities to compute  the Mesh data-structure, as
	--          defined in package StlMesh, from a shape of package
	--          TopoDS.  The triangulation  is  computed  with the
	--          Delaunay      algorithm   implemented in   package
	--          BRepMesh.  The  result   is  stored  in  the  mesh
	--          data-structure Mesh from package StlMesh.
	--          

uses  

    StlMesh,
    TopoDS

is
    BuildIncrementalMesh (Shape      : in      Shape from TopoDS; 
    	       	    	  Deflection : in      Real  from Standard; 
    	       	          Mesh       : Mesh  from StlMesh)
     raises ConstructionError;
end StlTransfer;