Annotation of OpenXM_contrib/PHC/Ada/Root_Counts/Symmetry/permutations_of_faces.ads, Revision 1.1.1.1
1.1 maekawa 1: with Integer_Faces_of_Polytope; use Integer_Faces_of_Polytope;
2: with Permutations,Symmetry_Group; use Permutations,Symmetry_Group;
3:
4: package Permutations_of_Faces is
5:
6: -- DESCRIPTION :
7: -- Provides elementary permutation operations on faces of polytopes.
8: -- Each time, the second operation concerns a lifted face and leaves
9: -- the lifting invariant.
10:
11: function Invariant ( f : Face; p : Permutation ) return boolean;
12: function Invariant_Lifted ( f : Face; p : Permutation ) return boolean;
13:
14: -- DESCRIPTION :
15: -- Returns true if the face is invariant under the permutation.
16:
17: function Permute ( f : Face; p : Permutation ) return Face;
18: function Permute_Lifted ( f : Face; p : Permutation ) return Face;
19:
20: -- DESCRIPTION :
21: -- Permutations the coordinates of the points which span the face.
22:
23: function Permutable ( f1,f2 : Face ) return boolean;
24: function Permutable_Lifted ( f1,f2 : Face ) return boolean;
25:
26: -- DESCRIPTION :
27: -- Returns true if there exists a permutation of face f1 into face f2.
28:
29: function Permutable ( f1 : Face; f2 : Faces ) return boolean;
30: function Permutable_Lifted ( f1 : Face; f2 : Faces ) return boolean;
31:
32: -- DESCRIPTION :
33: -- Returns true if the face f1 is permutable with one of the faces in f2.
34:
35: end Permutations_of_Faces;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>