# This file is in Maple format # Numerical approximation : sol:={u[1,2] = .4340169944+.2482523889*I, u[1,3] = 1.481762746+.6499331919*I, u[1,4] = -.7360679775+.9930095556*I, u[2,1] = .9270509831+.6137136565*I, u[2,3] = .2500000000+.4965047778*I, u[2,4] = .1909830056+1.606723212*I, u[3,1] = 1.481762746-.6499331919*I, u[3,2] = -.7360679775-.9930095556*I, u[3,4] = .4340169944-.2482523889*I, u[4,1] = .2500000000-.4965047778*I, u[4,2] = .1909830056-1.606723212*I, u[4,3] = .9270509831-.6137136565*I, v[1,2] = .9270509831-.6137136565*I, v[1,3] = .1909830056-1.606723212*I, v[1,4] = .2500000000-.4965047778*I, v[2,1] = .9270509831+.6137136565*I, v[2,3] = .2500000000+.4965047778*I, v[2,4] = .1909830056+1.606723212*I, v[3,1] = .1909830056+1.606723212*I, v[3,2] = .2500000000+.4965047778*I, v[3,4] = .9270509831+.6137136565*I, v[4,1] = .2500000000-.4965047778*I, v[4,2] = .1909830056-1.606723212*I, v[4,3] = .9270509831-.6137136565*I, w[1,2] = .4340169944+.2482523889*I, w[1,3] = 1.481762746+.6499331919*I, w[1,4] = -.7360679775+.9930095556*I, w[2,1] = .9270509831+.6137136565*I, w[2,3] = .2500000000+.4965047778*I, w[2,4] = .1909830056+1.606723212*I, w[3,1] = 1.481762746-.6499331919*I, w[3,2] = -.7360679775-.9930095556*I, w[3,4] = .4340169944-.2482523889*I, w[4,1] = .2500000000-.4965047778*I, w[4,2] = .1909830056-1.606723212*I, w[4,3] = .9270509831-.6137136565*I}: # 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)=-.6545084982+1.299866384*I,(3, 1)=0.,(3, 2)=0.,(2, 2)=.5954915028+.8033616060*I,(3, 3)=.5954915024+.8033616057*I,(1, 1)=.5954915029+.8033616060*I,(1, 2)=1.618033989+.1271572654e-8*I,(2, 1)=0.,(2, 3)=-1.772542486+.3068568283*I]), array(1 .. 3, 1 .. 3,[(1, 3)=.1250000005+2.351480379*I,(3, 1)=1.814652615-1.500706786*I,(3, 2)=-.3806356217+1.252454396*I,(2, 2)=-2.445288238-1.949799576*I,(3, 3)=.4774575143e-1+.8981855808*I,(1, 1)=1.481762746+.6499331909*I,(1, 2)=-2.272542485+1.299866384*I,(2, 1)=.1545084981+2.906589596*I,(2, 3)=-1.434016994+.2482523893*I]), array(1 .. 3, 1 .. 3,[(1, 3)=0.,(3, 1)=.6545085014+1.299866385*I,(3, 2)=-1.618033990-.4980729181e-8*I,(2, 2)=-.5954915029+.8033616051*I,(3, 3)=-.5954915027+.8033616060*I,(1, 1)=-.5954915023+.8033616060*I,(1, 2)=.1676392788e-9+.8622605522e-10*I,(2, 1)=1.772542486+.3068568280*I,(2, 3)=0.]), array(1 .. 3, 1 .. 3,[(1, 3)=.5954915031-.8033616060*I,(3, 1)=-.9999999998-.8090169944e-10*I,(3, 2)=-.1716052851e-19-.6303431047e-10*I,(2, 2)=-.5954915029-.8033616062*I,(3, 3)=0.,(1, 1)=-2.404508497+.8033616063*I,(1, 2)=.8090169941+.2932902921e-9*I,(2, 1)=-.4045084971+.8033616058*I,(2, 3)=0.])]: # Boundary Holonomy : lMb:=[array(1 .. 3, 1 .. 3,[(1, 3)=.6545084975+1.299866385*I,(3, 1)=0.,(3, 2)=0.,(2, 2)=1.,(3, 3)=1.000000000+0.*I,(1, 1)=1.000000000+0.*I,(1, 2)=-.9635254909+1.299866384*I,(2, 1)=0.,(2, 3)=.8090169943-1.606723212*I]), array(1 .. 3, 1 .. 3,[(1, 3)=.6545084876+1.299866386*I,(3, 1)=0.,(3, 2)=0.,(2, 2)=1.,(3, 3)=.9999999991-.5320937728e-10*I,(1, 1)=1.000000000-.7944076445e-10*I,(1, 2)=-.9635254913+1.299866383*I,(2, 1)=0.,(2, 3)=.8090169936-1.606723211*I])]: # 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)=-.4045084971-.8033616061*I,(1, 2)=0.,(2, 1)=0.,(2, 3)=0.]):