Annotation of OpenXM_contrib/PHC/Ada/Root_Counts/Dynlift/triangulations_and_subdivisions.ads, Revision 1.1.1.1
1.1 maekawa 1: with Standard_Integer_Vectors; use Standard_Integer_Vectors;
2: with Simplices,Triangulations; use Simplices,Triangulations;
3: with Integer_Mixed_Subdivisions; use Integer_Mixed_Subdivisions;
4:
5: package Triangulations_and_Subdivisions is
6:
7: -- DESCRIPTION :
8: -- This package offers conversion operations from triangulations
9: -- into mixed subdivisions and vice versa.
10:
11: function Deep_Create ( n : natural; s : Simplex ) return Mixed_Cell;
12: function Shallow_Create ( n : natural; s : Simplex ) return Mixed_Cell;
13:
14: -- DESCRIPTION :
15: -- Creates a mixed cell from the given simplex. A deep create makes
16: -- a copy of the points in the simplex, whereas a shallow create only
17: -- copies the points to the points in the simplex.
18:
19: function Deep_Create ( n : natural; t : Triangulation )
20: return Mixed_Subdivision;
21: function Shallow_Create ( n : natural; t : Triangulation )
22: return Mixed_Subdivision;
23:
24: -- DESCRIPTION :
25: -- Creates a mixed subdivision from a given triangulation.
26:
27: function Deep_Create ( n : natural; flatnor : Vector; t : Triangulation )
28: return Mixed_Subdivision;
29: function Shallow_Create ( n : natural; flatnor : Vector; t : Triangulation )
30: return Mixed_Subdivision;
31:
32: -- DESCRIPTION :
33: -- Stops the conversion as soon as the flattening normal is encountered.
34: -- Cells with the same inner normal are merged.
35:
36: function Non_Flat_Deep_Create ( n : natural; t : Triangulation )
37: return Mixed_Subdivision;
38: function Non_Flat_Shallow_Create ( n : natural; t : Triangulation )
39: return Mixed_Subdivision;
40:
41: -- DESCRIPTION :
42: -- Converts only the cells in the triangulation that are not flat.
43:
44: function Deep_Create ( n : natural; mixsub : Mixed_Subdivision )
45: return Triangulation;
46: function Shallow_Create ( n : natural; mixsub : Mixed_Subdivision )
47: return Triangulation;
48:
49: -- DESCRIPTION :
50: -- Creates a triangulation from the mixed subdivision.
51:
52: -- REQUIRED :
53: -- The subdivision must be a triangulation!
54:
55: end Triangulations_and_Subdivisions;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>