HAP_GCOMPLEX_SETUP:=[false];
if IsBound(x) then HAP_GCOMPLEX_SETUP[2]:=x;fi;
x:=(-1+Sqrt(-67))/2;

HAP_GCOMPLEX_LIST := [
[
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 1 ],[ -1, 0]]
,
[[ -1, -1 ],[ 1, 0]]
,
[[ 0, 1 ],[ -1, -1]]
,
[[ 0, -1 ],[ 1, 1]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 1 ],[ -1, 0]]
,
[[ -1, -1 ],[ 1, 0]]
,
[[ 0, 1 ],[ -1, -1]]
,
[[ 0, -1 ],[ 1, 1]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 1 ],[ -1, 0]]
,
[[ -1, -1 ],[ 1, 0]]
,
[[ 0, 1 ],[ -1, -1]]
,
[[ 0, -1 ],[ 1, 1]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 1 ],[ -1, 0]]
,
[[ -1, -1 ],[ 1, 0]]
,
[[ 0, 1 ],[ -1, -1]]
,
[[ 0, -1 ],[ 1, 1]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 2*x - 4, -x - 17 ],[ -x - 4, -2*x + 4]]
,
[[ -2*x + 4, x + 17 ],[ x + 4, 2*x - 4]]
,
[[ x + 2, x - 4 ],[ -3, -x - 2]]
,
[[ -x - 2, -x + 4 ],[ 3, x + 2]]
,
[[ x + 9, 4*x - 1 ],[ x - 3, -x - 9]]
,
[[ -x - 9, -4*x + 1 ],[ -x + 3, x + 9]]
,
[[ 2*x + 4, 2*x - 11 ],[ -5, -2*x - 3]]
,
[[ -2*x - 4, -2*x + 11 ],[ 5, 2*x + 3]]
,
[[ -7, -3*x - 6 ],[ -x + 1, 8]]
,
[[ 7, 3*x + 6 ],[ x - 1, -8]]
,
[[ -x - 1, -x + 7 ],[ 2, x + 2]]
,
[[ x + 1, x - 7 ],[ -2, -x - 2]]
,
[[ -x + 6, 2*x + 10 ],[ x + 2, x - 5]]
,
[[ x - 6, -2*x - 10 ],[ -x - 2, -x + 5]]
,
[[ 2*x + 3, 2*x - 11 ],[ -5, -2*x - 4]]
,
[[ -2*x - 3, -2*x + 11 ],[ 5, 2*x + 4]]
,
[[ x - 5, -2*x - 10 ],[ -x - 2, -x + 6]]
,
[[ -x + 5, 2*x + 10 ],[ x + 2, x - 6]]
,
[[ x + 2, x - 7 ],[ -2, -x - 1]]
,
[[ -x - 2, -x + 7 ],[ 2, x + 1]]
,
[[ 8, 3*x + 6 ],[ x - 1, -7]]
,
[[ -8, -3*x - 6 ],[ -x + 1, 7]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 2*x - 4, -x - 17 ],[ -x - 4, -2*x + 4]]
,
[[ -2*x + 4, x + 17 ],[ x + 4, 2*x - 4]]
,
[[ x + 2, x - 4 ],[ -3, -x - 2]]
,
[[ -x - 2, -x + 4 ],[ 3, x + 2]]
,
[[ x + 9, 4*x - 1 ],[ x - 3, -x - 9]]
,
[[ -x - 9, -4*x + 1 ],[ -x + 3, x + 9]]
,
[[ 2*x + 4, 2*x - 11 ],[ -5, -2*x - 3]]
,
[[ -2*x - 4, -2*x + 11 ],[ 5, 2*x + 3]]
,
[[ -7, -3*x - 6 ],[ -x + 1, 8]]
,
[[ 7, 3*x + 6 ],[ x - 1, -8]]
,
[[ -x - 1, -x + 7 ],[ 2, x + 2]]
,
[[ x + 1, x - 7 ],[ -2, -x - 2]]
,
[[ -x + 6, 2*x + 10 ],[ x + 2, x - 5]]
,
[[ x - 6, -2*x - 10 ],[ -x - 2, -x + 5]]
,
[[ 2*x + 3, 2*x - 11 ],[ -5, -2*x - 4]]
,
[[ -2*x - 3, -2*x + 11 ],[ 5, 2*x + 4]]
,
[[ x - 5, -2*x - 10 ],[ -x - 2, -x + 6]]
,
[[ -x + 5, 2*x + 10 ],[ x + 2, x - 6]]
,
[[ x + 2, x - 7 ],[ -2, -x - 1]]
,
[[ -x - 2, -x + 7 ],[ 2, x + 1]]
,
[[ 8, 3*x + 6 ],[ x - 1, -7]]
,
[[ -8, -3*x - 6 ],[ -x + 1, 7]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ x - 5, -2*x - 10 ],[ -x - 2, -x + 6]]
,
[[ -x + 5, 2*x + 10 ],[ x + 2, x - 6]]
,
[[ x - 6, -2*x - 10 ],[ -x - 2, -x + 5]]
,
[[ -x + 6, 2*x + 10 ],[ x + 2, x - 5]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ x - 5, -2*x - 10 ],[ -x - 2, -x + 6]]
,
[[ -x + 5, 2*x + 10 ],[ x + 2, x - 6]]
,
[[ x - 6, -2*x - 10 ],[ -x - 2, -x + 5]]
,
[[ -x + 6, 2*x + 10 ],[ x + 2, x - 5]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ x + 2, x - 4 ],[ -3, -x - 2]]
,
[[ -x - 2, -x + 4 ],[ 3, x + 2]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ x + 2, x - 4 ],[ -3, -x - 2]]
,
[[ -x - 2, -x + 4 ],[ 3, x + 2]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ x + 2, x - 7 ],[ -2, -x - 1]]
,
[[ -x - 2, -x + 7 ],[ 2, x + 1]]
,
[[ x + 1, x - 7 ],[ -2, -x - 2]]
,
[[ -x - 1, -x + 7 ],[ 2, x + 2]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ x + 2, x - 7 ],[ -2, -x - 1]]
,
[[ -x - 2, -x + 7 ],[ 2, x + 1]]
,
[[ x + 1, x - 7 ],[ -2, -x - 2]]
,
[[ -x - 1, -x + 7 ],[ 2, x + 2]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 3*x + 4, 3*x - 35 ],[ -4, -3*x - 3]]
,
[[ -3*x - 4, -3*x + 35 ],[ 4, 3*x + 3]]
,
[[ 3*x + 3, 3*x - 35 ],[ -4, -3*x - 4]]
,
[[ -3*x - 3, -3*x + 35 ],[ 4, 3*x + 4]]
,
[[ x - 12, -9*x - 25 ],[ -x - 1, -x + 12]]
,
[[ -x + 12, 9*x + 25 ],[ x + 1, x - 12]]
,
[[ x + 1, x - 15 ],[ -1, -x - 1]]
,
[[ -x - 1, -x + 15 ],[ 1, x + 1]]
,
[[ -13, -10*x - 10 ],[ -x, 13]]
,
[[ 13, 10*x + 10 ],[ x, -13]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 3*x + 4, 3*x - 35 ],[ -4, -3*x - 3]]
,
[[ -3*x - 4, -3*x + 35 ],[ 4, 3*x + 3]]
,
[[ 3*x + 3, 3*x - 35 ],[ -4, -3*x - 4]]
,
[[ -3*x - 3, -3*x + 35 ],[ 4, 3*x + 4]]
,
[[ x - 12, -9*x - 25 ],[ -x - 1, -x + 12]]
,
[[ -x + 12, 9*x + 25 ],[ x + 1, x - 12]]
,
[[ x + 1, x - 15 ],[ -1, -x - 1]]
,
[[ -x - 1, -x + 15 ],[ 1, x + 1]]
,
[[ -13, -10*x - 10 ],[ -x, 13]]
,
[[ 13, 10*x + 10 ],[ x, -13]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ -4, -x - 1 ],[ -x, 4]]
,
[[ 4, x + 1 ],[ x, -4]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ -4, -x - 1 ],[ -x, 4]]
,
[[ 4, x + 1 ],[ x, -4]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 0, 1 ],[ -1, 0]]
,
[[ 0, -1 ],[ 1, 0]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 0, 1 ],[ -1, 0]]
,
[[ 0, -1 ],[ 1, 0]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 2*x - 9, -6*x - 22 ],[ -x - 4, -2*x + 9]]
,
[[ -2*x + 9, 6*x + 22 ],[ x + 4, 2*x - 9]]
,
[[ 2*x + 1, -22 ],[ -3, -2*x - 1]]
,
[[ -2*x - 1, 22 ],[ 3, 2*x + 1]]
,
[[ 2*x + 11, 6*x - 16 ],[ x - 3, -2*x - 11]]
,
[[ -2*x - 11, -6*x + 16 ],[ -x + 3, 2*x + 11]]
,
[[ 3*x + 2, -30 ],[ -5, -3*x - 1]]
,
[[ -3*x - 2, 30 ],[ 5, 3*x + 1]]
,
[[ -x - 10, -6*x + 8 ],[ -x + 1, x + 11]]
,
[[ x + 10, 6*x - 8 ],[ x - 1, -x - 11]]
,
[[ -x, 8 ],[ 2, x + 1]]
,
[[ x, -8 ],[ -2, -x - 1]]
,
[[ -x + 10, 6*x + 14 ],[ x + 2, x - 9]]
,
[[ x - 10, -6*x - 14 ],[ -x - 2, -x + 9]]
,
[[ 3*x + 1, -30 ],[ -5, -3*x - 2]]
,
[[ -3*x - 1, 30 ],[ 5, 3*x + 2]]
,
[[ x - 9, -6*x - 14 ],[ -x - 2, -x + 10]]
,
[[ -x + 9, 6*x + 14 ],[ x + 2, x - 10]]
,
[[ x + 1, -8 ],[ -2, -x]]
,
[[ -x - 1, 8 ],[ 2, x]]
,
[[ x + 11, 6*x - 8 ],[ x - 1, -x - 10]]
,
[[ -x - 11, -6*x + 8 ],[ -x + 1, x + 10]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 2*x - 9, -6*x - 22 ],[ -x - 4, -2*x + 9]]
,
[[ -2*x + 9, 6*x + 22 ],[ x + 4, 2*x - 9]]
,
[[ 2*x + 1, -22 ],[ -3, -2*x - 1]]
,
[[ -2*x - 1, 22 ],[ 3, 2*x + 1]]
,
[[ 2*x + 11, 6*x - 16 ],[ x - 3, -2*x - 11]]
,
[[ -2*x - 11, -6*x + 16 ],[ -x + 3, 2*x + 11]]
,
[[ 3*x + 2, -30 ],[ -5, -3*x - 1]]
,
[[ -3*x - 2, 30 ],[ 5, 3*x + 1]]
,
[[ -x - 10, -6*x + 8 ],[ -x + 1, x + 11]]
,
[[ x + 10, 6*x - 8 ],[ x - 1, -x - 11]]
,
[[ -x, 8 ],[ 2, x + 1]]
,
[[ x, -8 ],[ -2, -x - 1]]
,
[[ -x + 10, 6*x + 14 ],[ x + 2, x - 9]]
,
[[ x - 10, -6*x - 14 ],[ -x - 2, -x + 9]]
,
[[ 3*x + 1, -30 ],[ -5, -3*x - 2]]
,
[[ -3*x - 1, 30 ],[ 5, 3*x + 2]]
,
[[ x - 9, -6*x - 14 ],[ -x - 2, -x + 10]]
,
[[ -x + 9, 6*x + 14 ],[ x + 2, x - 10]]
,
[[ x + 1, -8 ],[ -2, -x]]
,
[[ -x - 1, 8 ],[ 2, x]]
,
[[ x + 11, 6*x - 8 ],[ x - 1, -x - 10]]
,
[[ -x - 11, -6*x + 8 ],[ -x + 1, x + 10]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ x + 1, -4 ],[ -4, -x]]
,
[[ -x - 1, 4 ],[ 4, x]]
,
[[ x, -4 ],[ -4, -x - 1]]
,
[[ -x, 4 ],[ 4, x + 1]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ x + 1, -4 ],[ -4, -x]]
,
[[ -x - 1, 4 ],[ 4, x]]
,
[[ x, -4 ],[ -4, -x - 1]]
,
[[ -x, 4 ],[ 4, x + 1]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
rec( TheMatrixStab := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ x + 1, -4 ],[ -4, -x]]
,
[[ -x - 1, 4 ],[ 4, x]]
,
[[ x, -4 ],[ -4, -x - 1]]
,
[[ -x, 4 ],[ 4, x + 1]]
,
[[ -4, -x ],[ -x - 1, 4]]
,
[[ 4, x ],[ x + 1, -4]]
,
[[ 0, 1 ],[ -1, 0]]
,
[[ 0, -1 ],[ 1, 0]]
,
[[ -4, -x - 1 ],[ -x, 4]]
,
[[ 4, x + 1 ],[ x, -4]]
]),
TheRotSubgroup := Group([
[[ 1, 0 ],[ 0, 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ x + 1, -4 ],[ -4, -x]]
,
[[ -x - 1, 4 ],[ 4, x]]
,
[[ x, -4 ],[ -4, -x - 1]]
,
[[ -x, 4 ],[ 4, x + 1]]
,
[[ -4, -x ],[ -x - 1, 4]]
,
[[ 4, x ],[ x + 1, -4]]
,
[[ 0, 1 ],[ -1, 0]]
,
[[ 0, -1 ],[ 1, 0]]
,
[[ -4, -x - 1 ],[ -x, 4]]
,
[[ 4, x + 1 ],[ x, -4]]
]),
BoundaryImage := rec( ListIFace:=[], ListSign:=[], ListElt:=[])
),
],
[
rec( TheMatrixStab := Group([
[[ -1, -1 ],[ 1, 0]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 0, -1 ],[ 1, 1]]
,
[[ 0, 1 ],[ -1, -1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ 1, 1 ],[ -1, 0]]
]),
TheRotSubgroup := Group([
[[ -1, -1 ],[ 1, 0]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 0, -1 ],[ 1, 1]]
,
[[ 0, 1 ],[ -1, -1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ 1, 1 ],[ -1, 0]]
]),
BoundaryImage := rec(
ListIFace:=[ 1, 2],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 13, 1],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 2, 3],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 2, 8],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 3, 7],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 8, 3],
 ListSign := [-1,1],
ListElt := [[[ -x - 13, -3*x - 2 ],[ -x + 1, 4]], [[ -3*x - 2, -2*x + 11 ],[ 4, x + 3]]])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ x - 5, -2*x - 10 ],[ -x - 2, -x + 6]]
,
[[ x - 6, -2*x - 10 ],[ -x - 2, -x + 5]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ -x + 5, 2*x + 10 ],[ x + 2, x - 6]]
,
[[ -x + 6, 2*x + 10 ],[ x + 2, x - 5]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ x - 5, -2*x - 10 ],[ -x - 2, -x + 6]]
,
[[ x - 6, -2*x - 10 ],[ -x - 2, -x + 5]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ -x + 5, 2*x + 10 ],[ x + 2, x - 6]]
,
[[ -x + 6, 2*x + 10 ],[ x + 2, x - 5]]
]),
BoundaryImage := rec(
ListIFace:=[ 6, 4],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ -x - 2, -x + 4 ],[ 3, x + 2]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ x + 2, x - 4 ],[ -3, -x - 2]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ -x - 2, -x + 4 ],[ 3, x + 2]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ x + 2, x - 4 ],[ -3, -x - 2]]
]),
BoundaryImage := rec(
ListIFace:=[ 4, 7],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -x - 1, -x + 7 ],[ 2, x + 2]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ -x - 2, -x + 7 ],[ 2, x + 1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ x + 1, x - 7 ],[ -2, -x - 2]]
,
[[ x + 2, x - 7 ],[ -2, -x - 1]]
]),
TheRotSubgroup := Group([
[[ -x - 1, -x + 7 ],[ 2, x + 2]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ -x - 2, -x + 7 ],[ 2, x + 1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ x + 1, x - 7 ],[ -2, -x - 2]]
,
[[ x + 2, x - 7 ],[ -2, -x - 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 9, 4],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 5, 10],
 ListSign := [-1,1],
ListElt := [[[ -10, -3*x - 3 ],[ -x, 5]], [[ -2*x - 3, -x + 10 ],[ 3, x + 1]]])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 5, 12],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 5, 15],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 9, 5],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), [[ -10, -3*x - 3 ],[ -x, 5]]])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 5, 10],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 6, 10],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ -3*x - 3, -3*x + 35 ],[ 4, 3*x + 4]]
,
[[ -3*x - 4, -3*x + 35 ],[ 4, 3*x + 3]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ 3*x + 3, 3*x - 35 ],[ -4, -3*x - 4]]
,
[[ 3*x + 4, 3*x - 35 ],[ -4, -3*x - 3]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ -3*x - 3, -3*x + 35 ],[ 4, 3*x + 4]]
,
[[ -3*x - 4, -3*x + 35 ],[ 4, 3*x + 3]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ 3*x + 3, 3*x - 35 ],[ -4, -3*x - 4]]
,
[[ 3*x + 4, 3*x - 35 ],[ -4, -3*x - 3]]
]),
BoundaryImage := rec(
ListIFace:=[ 6, 11],
 ListSign := [-1,1],
ListElt := [[[ -12, -5*x - 5 ],[ -x, 7]], IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 6, 3],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), [[ x - 6, -x - 7 ],[ -x - 3, -x + 2]]])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 10, 7],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 8, 12],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 9, 10],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), [[ -2*x - 3, -x + 10 ],[ 3, x + 1]]])
),
rec( TheMatrixStab := Group([
[[ -x - 1, -x + 15 ],[ 1, x + 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ x + 1, x - 15 ],[ -1, -x - 1]]
]),
TheRotSubgroup := Group([
[[ -x - 1, -x + 15 ],[ 1, x + 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ x + 1, x - 15 ],[ -1, -x - 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 13, 11],
 ListSign := [-1,1],
ListElt := [[[ -x - 1, -1 ],[ 1, 0]], IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ -13, -10*x - 10 ],[ -x, 13]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ 13, 10*x + 10 ],[ x, -13]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ -13, -10*x - 10 ],[ -x, 13]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ 13, 10*x + 10 ],[ x, -13]]
]),
BoundaryImage := rec(
ListIFace:=[ 11, 7],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), [[ -x - 14, -4*x - 3 ],[ -x + 1, 5]]])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ -4, -x - 1 ],[ -x, 4]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ 4, x + 1 ],[ x, -4]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ -4, -x - 1 ],[ -x, 4]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ 4, x + 1 ],[ x, -4]]
]),
BoundaryImage := rec(
ListIFace:=[ 12, 16],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 0, -1 ],[ 1, 0]]
,
[[ 0, 1 ],[ -1, 0]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 0, -1 ],[ 1, 0]]
,
[[ 0, 1 ],[ -1, 0]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 13, 16],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -x - 1, 16 ],[ 1, x]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ -x, 16 ],[ 1, x + 1]]
,
[[ x, -16 ],[ -1, -x - 1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ x + 1, -16 ],[ -1, -x]]
]),
TheRotSubgroup := Group([
[[ -x - 1, 16 ],[ 1, x]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ -x, 16 ],[ 1, x + 1]]
,
[[ x, -16 ],[ -1, -x - 1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ x + 1, -16 ],[ -1, -x]]
]),
BoundaryImage := rec(
ListIFace:=[ 1, 9],
 ListSign := [-1,1],
ListElt := [[[ -x - 1, -1 ],[ 1, 0]], [[ 2*x - 12, -7*x - 30 ],[ -x - 3, -2*x + 8]]])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 8, 3],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ x - 10, -6*x - 14 ],[ -x - 2, -x + 9]]
,
[[ x - 9, -6*x - 14 ],[ -x - 2, -x + 10]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ -x + 10, 6*x + 14 ],[ x + 2, x - 9]]
,
[[ -x + 9, 6*x + 14 ],[ x + 2, x - 10]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ x - 10, -6*x - 14 ],[ -x - 2, -x + 9]]
,
[[ x - 9, -6*x - 14 ],[ -x - 2, -x + 10]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ -x + 10, 6*x + 14 ],[ x + 2, x - 9]]
,
[[ -x + 9, 6*x + 14 ],[ x + 2, x - 10]]
]),
BoundaryImage := rec(
ListIFace:=[ 14, 15],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), [[ -10, -3*x - 3 ],[ -x, 5]]])
),
rec( TheMatrixStab := Group([
[[ -2*x - 1, 22 ],[ 3, 2*x + 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ 2*x + 1, -22 ],[ -3, -2*x - 1]]
]),
TheRotSubgroup := Group([
[[ -2*x - 1, 22 ],[ 3, 2*x + 1]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ 2*x + 1, -22 ],[ -3, -2*x - 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 14, 12],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), [[ -3*x - 1, -x + 12 ],[ 4, x + 2]]])
),
rec( TheMatrixStab := Group([
[[ -x - 1, 8 ],[ 2, x]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ -x, 8 ],[ 2, x + 1]]
,
[[ x, -8 ],[ -2, -x - 1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ x + 1, -8 ],[ -2, -x]]
]),
TheRotSubgroup := Group([
[[ -x - 1, 8 ],[ 2, x]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ -x, 8 ],[ 2, x + 1]]
,
[[ x, -8 ],[ -2, -x - 1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ x + 1, -8 ],[ -2, -x]]
]),
BoundaryImage := rec(
ListIFace:=[ 14, 2],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), [[ -2*x - 1, -x + 6 ],[ 5, x + 3]]])
),
rec( TheMatrixStab := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
TheRotSubgroup := Group([
[[ -1, 0 ],[ 0, -1]]
,
[[ 1, 0 ],[ 0, 1]]
]),
BoundaryImage := rec(
ListIFace:=[ 15, 8],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), [[ x - 6, -x - 7 ],[ -x - 3, -x + 2]]])
),
rec( TheMatrixStab := Group([
[[ -x - 1, 4 ],[ 4, x]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ -x, 4 ],[ 4, x + 1]]
,
[[ x, -4 ],[ -4, -x - 1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ x + 1, -4 ],[ -4, -x]]
]),
TheRotSubgroup := Group([
[[ -x - 1, 4 ],[ 4, x]]
,
[[ -1, 0 ],[ 0, -1]]
,
[[ -x, 4 ],[ 4, x + 1]]
,
[[ x, -4 ],[ -4, -x - 1]]
,
[[ 1, 0 ],[ 0, 1]]
,
[[ x + 1, -4 ],[ -4, -x]]
]),
BoundaryImage := rec(
ListIFace:=[ 15, 16],
 ListSign := [-1,1],
ListElt := [IdentityMat(2), IdentityMat(2)])
),
],
[
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
23
,
19
,
4
,
1
,
2
,
24
], ListSign := [
1
, 
1
, 
1
, 
1
, 
1
, 
-1
 ],
ListElt := [
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
25
,
18
,
22
,
20
,
21
,
2
], ListSign := [
1
, 
1
, 
-1
, 
1
, 
-1
, 
1
 ],
ListElt := [
IdentityMat(2)
, 
[[ -x - 14, -4*x - 3 ],[ -x + 1, 5]]
, 
IdentityMat(2)
, 
[[ 2*x - 12, -7*x - 30 ],[ -x - 3, -2*x + 8]]
, 
IdentityMat(2)
, 
[[ -x - 1, -1 ],[ 1, 0]]
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
29
,
17
,
27
,
7
,
12
,
13
,
3
,
9
], ListSign := [
1
, 
-1
, 
-1
, 
1
, 
1
, 
1
, 
1
, 
-1
 ],
ListElt := [
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
[[ -10, -3*x - 3 ],[ -x, 5]]
, 
IdentityMat(2)
, 
[[ x - 6, -x - 7 ],[ -x - 3, -x + 2]]
, 
IdentityMat(2)
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
17
,
30
,
15
,
12
,
14
,
26
], ListSign := [
1
, 
-1
, 
-1
, 
-1
, 
1
, 
-1
 ],
ListElt := [
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
[[ x - 6, -x - 7 ],[ -x - 3, -x + 2]]
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
27
,
30
,
19
,
28
], ListSign := [
1
, 
1
, 
1
, 
-1
 ],
ListElt := [
IdentityMat(2)
, 
[[ -2*x - 2, 11 ],[ 3, x]]
, 
[[ -x - 13, -3*x - 2 ],[ -x + 1, 4]]
, 
IdentityMat(2)
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
7
,
15
,
18
,
8
], ListSign := [
-1
, 
1
, 
1
, 
-1
 ],
ListElt := [
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
12
,
30
,
6
,
17
,
10
,
15
], ListSign := [
-1
, 
-1
, 
-1
, 
1
, 
1
, 
-1
 ],
ListElt := [
[[ -10, -3*x - 3 ],[ -x, 5]]
, 
[[ -2*x - 2, 11 ],[ 3, x]]
, 
IdentityMat(2)
, 
[[ -12, -5*x - 5 ],[ -x, 7]]
, 
IdentityMat(2)
, 
[[ -2*x - 3, -x + 10 ],[ 3, x + 1]]
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
23
,
12
,
31
,
11
], ListSign := [
-1
, 
1
, 
1
, 
-1
 ],
ListElt := [
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
19
,
14
,
18
,
11
,
26
,
5
], ListSign := [
-1
, 
-1
, 
-1
, 
1
, 
1
, 
1
 ],
ListElt := [
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
, 
IdentityMat(2)
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
18
,
19
,
6
,
11
,
5
,
10
], ListSign := [
-1
, 
-1
, 
1
, 
1
, 
1
, 
-1
 ],
ListElt := [
[[ -x - 14, -4*x - 3 ],[ -x + 1, 5]]
, 
[[ -x - 13, -3*x - 2 ],[ -x + 1, 4]]
, 
IdentityMat(2)
, 
[[ -3*x - 1, -x + 12 ],[ 4, x + 2]]
, 
[[ -3*x - 2, -2*x + 11 ],[ 4, x + 3]]
, 
[[ 2*x - 12, -7*x - 30 ],[ -x - 3, -2*x + 8]]
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
22
,
17
,
5
,
16
], ListSign := [
1
, 
-1
, 
-1
, 
1
 ],
ListElt := [
IdentityMat(2)
, 
[[ -12, -5*x - 5 ],[ -x, 7]]
, 
[[ -3*x - 2, -2*x + 11 ],[ 4, x + 3]]
, 
IdentityMat(2)
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
3
,
6
,
4
], ListSign := [
1
, 
-1
, 
-1
 ],
ListElt := [
[[ -x - 7, -2*x - 1 ],[ -x + 2, 5]]
, 
[[ -x, 11 ],[ 3, 2*x + 2]]
, 
[[ x - 6, -x - 7 ],[ -x - 3, -x + 2]]
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
20
,
14
,
13
], ListSign := [
1
, 
-1
, 
-1
 ],
ListElt := [
[[ -2*x - 14, -9*x + 9 ],[ -x + 2, x + 12]]
, 
[[ -3*x - 1, -x + 12 ],[ 4, x + 2]]
, 
[[ 2*x - 12, -7*x - 30 ],[ -x - 3, -2*x + 8]]
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
20
,
10
,
13
], ListSign := [
-1
, 
1
, 
1
 ],
ListElt := [
[[ 2*x - 12, -7*x - 30 ],[ -x - 3, -2*x + 8]]
, 
[[ 2*x - 12, -7*x - 30 ],[ -x - 3, -2*x + 8]]
, 
[[ 2*x - 12, -7*x - 30 ],[ -x - 3, -2*x + 8]]
]))
, 
rec( TheMatrixStab := Group([-IdentityMat(2)]),
TheRotSubgroup := Group([-IdentityMat(2)]),
BoundaryImage := rec(
ListIFace:=[ 
3
,
26
,
4
], ListSign := [
-1
, 
1
, 
1
 ],
ListElt := [
[[ x - 6, -x - 7 ],[ -x - 3, -x + 2]]
, 
[[ x - 6, -x - 7 ],[ -x - 3, -x + 2]]
, 
[[ x - 6, -x - 7 ],[ -x - 3, -x + 2]]
]))
],
];

if IsBound(HAP_GCOMPLEX_SETUP[2]) then x:=HAP_GCOMPLEX_SETUP[2];
else Unbind(x); fi;

