# This file is in Maple format # Numerical approximation : sol:={u[1,2] = 1.366025404-1.366025404*I, u[1,3] = -.1830127019-.6830127019*I, u[1,4] = .6339745962-.3660254038*I, u[2,1] = .5000000000-.1339745962*I, u[2,3] = -.8660254038-.5000000000*I, u[2,4] = 1.866025404-.5000000000*I, u[3,1] = 2.366025404+1.366025404*I, u[3,2] = -.3660254038+.3660254038*I, u[3,4] = .6830127019+.1830127019*I, u[4,1] = .5000000000+.5000000000*I, u[4,2] = -.2432665359e-99+1.000000000*I, u[4,3] = 1.000000000+1.000000000*I, v[1,2] = -.1830127019+.6830127019*I, v[1,3] = .6339745962+.3660254038*I, v[1,4] = 1.366025404+1.366025404*I, v[2,1] = 2.366025404-1.366025404*I, v[2,3] = .6830127019-.1830127019*I, v[2,4] = -.3660254038-.3660254038*I, v[3,1] = .5000000000-.5000000000*I, v[3,2] = 1.000000000-1.000000000*I, v[3,4] = .2432665359e-99-1.000000000*I, v[4,1] = .5000000000+.1339745962*I, v[4,2] = -.8660254038+.5000000000*I, v[4,3] = 1.866025404+.5000000000*I, w[1,2] = .5000000000-.8660254038*I, w[1,3] = .5000000000-.8660254038*I, w[1,4] = .5000000000-.8660254038*I, w[2,1] = 1.866025404-.5000000000*I, w[2,3] = .5000000000-.1339745962*I, w[2,4] = -.8660254038-.5000000000*I, w[3,1] = .5000000000+.8660254038*I, w[3,2] = .5000000000+.8660254038*I, w[3,4] = .5000000000+.8660254038*I, w[4,1] = .5000000000+.1339745962*I, w[4,2] = -.8660254038+.5000000000*I, w[4,3] = 1.866025404+.5000000000*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)=-.8660254039+.5000000001*I,(3, 1)=-.1683012702e-9-1.000000000*I,(3, 2)=-.3660254035+.3660254038*I,(2, 2)=-.1339745963+.5000000001*I,(3, 3)=-.3660254039+.3660254041*I,(1, 1)=-.1683012702e-9-1.000000000*I,(1, 2)=-.8660254039-.5000000001*I,(2, 1)=.1683012702e-9+1.000000000*I,(2, 3)=-.1339745962-.5000000000*I]), 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.+1.000000000*I,(3, 1)=-.8660254038-.5000000000*I,(3, 2)=0.,(2, 2)=.8660254039-.5000000001*I,(3, 3)=0.,(1, 1)=-1.366025404-1.366025404*I,(1, 2)=.5000000003-.8660254037*I,(2, 1)=-1.000000000-.5000000000e-10*I,(2, 3)=0.]), array(1 .. 3, 1 .. 3,[(1, 3)=1.366025404-4.098076211*I,(3, 1)=2.866025404+3.232050808*I,(3, 2)=-.3660254017-1.366025403*I,(2, 2)=-1.500000000+.8660254038*I,(3, 3)=-1.366025403-7.830127019*I,(1, 1)=.5000000000+1.866025404*I,(1, 2)=.5000000005-.8660254036*I,(2, 1)=-1.000000000+.1e-9*I,(2, 3)=1.366025404+.3660254038*I]), array(1 .. 3, 1 .. 3,[(1, 3)=2.500000001-.8660254039*I,(3, 1)=-.4999999999+.8660254037*I,(3, 2)=.5000000002-.1339745963*I,(2, 2)=.3660254036-.3660254038*I,(3, 3)=2.000000000-1.000000000*I,(1, 1)=-.4999999999+.8660254037*I,(1, 2)=.5000000001+.8660254037*I,(2, 1)=.4999999999-.8660254037*I,(2, 3)=-1.633974596+1.366025404*I])]: # Boundary Holonomy : lMb:=[array(1 .. 3, 1 .. 3,[(1, 3)=.7930870462e-8-6.464101625*I,(3, 1)=-.2080013032e-8+1.732050807*I,(3, 2)=.6339745973-.6339745944*I,(2, 2)=-.4999999949-.8660254058*I,(3, 3)=1.633974595-2.366025404*I,(1, 1)=1.866025404+3.232050809*I,(1, 2)=-.1637820322e-7+.1411473674e-8*I,(2, 1)=2.366025402+2.366025404*I,(2, 3)=-1.500000003-5.598076212*I]), array(1 .. 3, 1 .. 3,[(1, 3)=5.598076215+3.232050805*I,(3, 1)=-1.500000001+.8660254050*I,(3, 2)=.8660254049-1.500000000*I,(2, 2)=.9999999948-1.732050812*I,(3, 3)=4.232050808+.8660254003*I,(1, 1)=-2.232050808+.8660254040*I,(1, 2)=2.366025396-2.366025412*I,(2, 1)=-.8660254030+1.500000001*I,(2, 3)=3.232050809-.8660254118*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)=-.5000000000+.8660254039*I,(1, 2)=0.,(2, 1)=0.,(2, 3)=0.]):