# This file is in Maple format # Numerical approximation : sol:={u[1,2] = .5698402910, u[1,3] = 2.324717957, u[1,4] = -.7548776662, u[2,1] = .5698402910, u[2,3] = -.7548776662, u[2,4] = 2.324717957, u[3,1] = 2.324717957, u[3,2] = -.7548776662, u[3,4] = .5698402910, u[4,1] = -.7548776662, u[4,2] = 2.324717957, u[4,3] = .5698402910, v[1,2] = 2.324717957, v[1,3] = -.7548776662, v[1,4] = .5698402910, v[2,1] = 2.324717957, v[2,3] = .5698402910, v[2,4] = -.7548776662, v[3,1] = -.7548776662, v[3,2] = .5698402910, v[3,4] = 2.324717957, v[4,1] = .5698402910, v[4,2] = -.7548776662, v[4,3] = 2.324717957, w[1,2] = 1.754877666, w[1,3] = -1.324717957, w[1,4] = .4301597090, w[2,1] = 1.754877666, w[2,3] = .4301597090, w[2,4] = -1.324717957, w[3,1] = -1.324717957, w[3,2] = .4301597090, w[3,4] = 1.754877666, w[4,1] = .4301597090, w[4,2] = -1.324717957, w[4,3] = 1.754877666}: # Matrix Generators : lM:=[array(1 .. 3, 1 .. 3,[(1, 3)=0.,(3, 1)=0.,(3, 2)=0.,(2, 2)=1.,(3, 3)=1.,(1, 1)=1.,(1, 2)=0.,(2, 1)=0.,(2, 3)=0.]), array(1 .. 3, 1 .. 3,[(1, 3)=0.,(3, 1)=0.,(3, 2)=0.,(2, 2)=1.,(3, 3)=1.,(1, 1)=1.,(1, 2)=0.,(2, 1)=0.,(2, 3)=0.]), array(1 .. 3, 1 .. 3,[(1, 3)=-.9999999996,(3, 1)=-.9999999997,(3, 2)=0.,(2, 2)=1.000000000,(3, 3)=0.,(1, 1)=-.1054417512,(1, 2)=.6494359139,(2, 1)=-.3247179572,(2, 3)=0.]), array(1 .. 3, 1 .. 3,[(1, 3)=.9999999998,(3, 1)=1.000000000,(3, 2)=-1.509755332,(2, 2)=-.9999999999,(3, 3)=.5698402909,(1, 1)=0.,(1, 2)=.2649435915e-9,(2, 1)=0.,(2, 3)=.7548776660]), array(1 .. 3, 1 .. 3,[(1, 3)=.5698402906,(3, 1)=.5698402910,(3, 2)=1.139680582,(2, 2)=-.1396805816,(3, 3)=.5698402906,(1, 1)=.3247179568,(1, 2)=-.8603194196,(2, 1)=.4301597086,(2, 3)=-.5698402906]), array(1 .. 3, 1 .. 3,[(1, 3)=-.3247179568,(3, 1)=-.1054417634,(3, 2)=-.2108835046,(2, 2)=.453567942e-1,(3, 3)=-.1054417516,(1, 1)=-.1850373754,(1, 2)=.4902446676,(2, 1)=-.1396805822,(2, 3)=.1850373753])]: # Boundary Holonomy : lMb:=[array(1 .. 3, 1 .. 3,[(1, 3)=.1054417537,(3, 1)=.1054417509,(3, 2)=.8603194224,(2, 2)=.7891164958,(3, 3)=1.754877665,(1, 1)=.4560058371,(1, 2)=-.4385524089,(2, 1)=.2192762057,(2, 3)=-.4301597099]), array(1 .. 3, 1 .. 3,[(1, 3)=.6008495923e-1,(3, 1)=.6008495656e-1,(3, 2)=-.3700747512,(2, 2)=.8798300847,(3, 3)=.5698402904,(1, 1)=1.550329625,(1, 2)=.6104145835,(2, 1)=-.3052072920,(2, 3)=.1850373749])]: # Basis Change fo PU(2,1) : A:=array(1 .. 3, 1 .. 3,[(1, 3)=0.,(3, 1)=0.,(3, 2)=0.,(2, 2)=-1.,(3, 3)=1.,(1, 1)=-2.000000000,(1, 2)=0.,(2, 1)=0.,(2, 3)=0.]):