# This file is in Maple format # Numerical approximation : sol:={u[1,2] = -.3660254038-.3660254038*I, u[1,3] = .6830127019-.1830127019*I, u[1,4] = 2.366025404-1.366025404*I, u[2,1] = .5000000000+1.866025404*I, u[2,3] = .8660254038+.5000000000*I, u[2,4] = .1339745962+.5000000000*I, u[3,1] = .6339745962+.3660254038*I, u[3,2] = 1.366025404+1.366025404*I, u[3,4] = -.1830127019+.6830127019*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] = .5000000000+.8660254038*I, v[1,3] = .5000000000+.8660254038*I, v[1,4] = .5000000000+.8660254038*I, v[2,1] = .5000000000+1.866025404*I, v[2,3] = .8660254038+.5000000000*I, v[2,4] = .1339745962+.5000000000*I, v[3,1] = .1339745962-.5000000000*I, v[3,2] = .8660254038-.5000000000*I, v[3,4] = .5000000000-1.866025404*I, v[4,1] = .5000000000-.8660254038*I, v[4,2] = .5000000000-.8660254038*I, v[4,3] = .5000000000-.8660254038*I, w[1,2] = -.3660254038+.3660254038*I, w[1,3] = .6830127019+.1830127019*I, w[1,4] = 2.366025404+1.366025404*I, w[2,1] = .5000000000-1.866025404*I, w[2,3] = .8660254038-.5000000000*I, w[2,4] = .1339745962-.5000000000*I, w[3,1] = .6339745962-.3660254038*I, w[3,2] = 1.366025404-1.366025404*I, w[3,4] = -.1830127019-.6830127019*I, w[4,1] = .5000000000+.5000000000*I, w[4,2] = -.2432665359e-99+1.000000000*I, w[4,3] = 1.000000000+1.000000000*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)=-.3660254038-.3660254037*I,(3, 1)=0.,(3, 2)=0.,(2, 2)=.4999999999-.8660254037*I,(3, 3)=.4999999998-.8660254037*I,(1, 1)=.5000000000-.8660254038*I,(1, 2)=-.4999999999e-10+1.000000000*I,(2, 1)=0.,(2, 3)=0.+1.000000000*I]), array(1 .. 3, 1 .. 3,[(1, 3)=-.9997881389e-10-.3660254038*I,(3, 1)=-.2223198277e-9+1.366025405*I,(3, 2)=.1191865230e-9+1.366025404*I,(2, 2)=-.1366025404e-9-.3660254039e-10*I,(3, 3)=.5000000000+.4999999999*I,(1, 1)=.5000000001-.5000000005*I,(1, 2)=.1830127017-.6830127020*I,(2, 1)=-.6830127025+.1830127021*I,(2, 3)=.5007906760e-10-.3660254039*I]), array(1 .. 3, 1 .. 3,[(1, 3)=0.,(3, 1)=-1.366025404-1.366025404*I,(3, 2)=-.5499999999e-9-.9999999999*I,(2, 2)=-.4999999998-.8660254036*I,(3, 3)=-.5000000000-.8660254038*I,(1, 1)=-.4999999998-.8660254039*I,(1, 2)=.3654465885e-10-.1363865236e-9*I,(2, 1)=-.9999999998e-10-.9999999999*I,(2, 3)=0.]), array(1 .. 3, 1 .. 3,[(1, 3)=-1.000000000-.1581352000e-12*I,(3, 1)=.5000000000-.8660254036*I,(3, 2)=-.1369491004e-12-.7906759998e-13*I,(2, 2)=-.4999999999-.8660254038*I,(3, 3)=0.,(1, 1)=1.000000000-1.732050807*I,(1, 2)=-.3660254028-1.366025402*I,(2, 1)=-1.000000000-1.000000000*I,(2, 3)=0.])]: # Boundary Holonomy : lMb:=[array(1 .. 3, 1 .. 3,[(1, 3)=.3660254039-.3660254042*I,(3, 1)=0.,(3, 2)=0.,(2, 2)=1.,(3, 3)=1.000000000+0.*I,(1, 1)=1.000000000+0.*I,(1, 2)=.8660254038-.4999999999*I,(2, 1)=0.,(2, 3)=.8660254039-.5000000000*I]), array(1 .. 3, 1 .. 3,[(1, 3)=-4.500000009-2.598076213*I,(3, 1)=0.,(3, 2)=0.,(2, 2)=1.,(3, 3)=1.000000000+.5788150042e-13*I,(1, 1)=.9999999999+.4999999999e-10*I,(1, 2)=-.2133708776e-8-.7719679844e-10*I,(2, 1)=0.,(2, 3)=-.1217163337e-8+.7184427783e-9*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.]):