# This file is in Maple format # Numerical approximation : sol:={u[1,2] = .7362716388-.3991348869e-1*I, u[1,3] = 3.706875204-.5610102791*I, u[1,4] = -.3542146735-.7341235110e-1*I, u[2,1] = .6914878840+.2559951543*I, u[2,3] = -.2718445063+.4708484967*I, u[2,4] = 1.919643378+1.592869055*I, u[3,1] = .4196433776-.7268436511*I, u[3,2] = .6708429347-.8401694909*I, u[3,4] = .4042560580-1.031858776*I, u[4,1] = -.2718445063+1.592869055*I, u[4,2] = 1.104109859+.6100302495*I, u[4,3] = .3061130019+.3833785699*I, v[1,2] = 1.248800443+.7526995640*I, v[1,3] = -.3958901414+1.197692148*I, v[1,4] = .4126219746+.3540350951*I, v[2,1] = .6914878840+.2559951543*I, v[2,3] = -.2718445063+.4708484967*I, v[2,4] = 1.919643378+1.592869055*I, v[3,1] = 1.919643378-1.592869055*I, v[3,2] = -.2718445063-.4708484967*I, v[3,4] = .6914878840-.2559951543*I, v[4,1] = .4126219746-.3540350951*I, v[4,2] = -.3958901414-1.197692148*I, v[4,3] = 1.248800443-.7526995640*I, w[1,2] = .7362716388+.3991348869e-1*I, w[1,3] = 3.706875204+.5610102791*I, w[1,4] = -.3542146735+.7341235110e-1*I, w[2,1] = .6914878840-.2559951543*I, w[2,3] = -.2718445063-.4708484967*I, w[2,4] = 1.919643378-1.592869055*I, w[3,1] = .4196433776+.7268436511*I, w[3,2] = .6708429347+.8401694909*I, w[3,4] = .4042560580+1.031858776*I, w[4,1] = -.2718445063-1.592869055*I, w[4,2] = 1.104109859-.6100302495*I, w[4,3] = .3061130019-.3833785699*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)=-1.067442249-1.336873903*I,(3, 1)=0.,(3, 2)=0.,(2, 2)=.5000000000-.8660254035*I,(3, 3)=.4999999999-.8660254034*I,(1, 1)=.4999999999-.8660254040*I,(1, 2)=-1.839286757-.1361257963e-8*I,(2, 1)=0.,(2, 3)=1.839286755+.1636804445e-9*I]), array(1 .. 3, 1 .. 3,[(1, 3)=-3.980719539+5.028922973*I,(3, 1)=-4.023077573-4.995101727*I,(3, 2)=.8341882389-5.015626835*I,(2, 2)=8.933904665-.3775156436e-1*I,(3, 3)=-2.038319429+.8613224874e-2*I,(1, 1)=-3.749053932+.1584219533e-1*I,(1, 2)=-3.473027155-5.957182817*I,(2, 1)=3.422558082-5.986321161*I,(2, 3)=-.8765462635-5.008397865*I]), array(1 .. 3, 1 .. 3,[(1, 3)=0.,(3, 1)=-1.539985528+.7450566154*I,(3, 2)=-1.659062241-.7940328864*I,(2, 2)=.7713776561e-1+.9970204430*I,(3, 3)=.7713776516e-1+.9970204442*I,(1, 1)=.7713776434e-1+.9970204433*I,(1, 2)=-.1246340763e-8+.3696955881e-10*I,(2, 1)=1.659062246+.7940328902*I,(2, 3)=0.]), array(1 .. 3, 1 .. 3,[(1, 3)=.9020139154+.4317069582*I,(3, 1)=-.8248761493+.5653134855*I,(3, 2)=-.6736636769e-9+.7859548905e-9*I,(2, 2)=.7713776688e-1+.9970204437*I,(3, 3)=0.,(1, 1)=-2.534642552+4.238921404*I,(1, 2)=-2.342059921+1.605087098*I,(2, 1)=2.561076159+1.225739847*I,(2, 3)=0.])]: # Boundary Holonomy : lMb:=[array(1 .. 3, 1 .. 3,[(1, 3)=1.067442250-1.336873899*I,(3, 1)=0.,(3, 2)=0.,(2, 2)=1.,(3, 3)=1.000000000+0.*I,(1, 1)=.9999999997-.1159294899e-9*I,(1, 2)=.9196433776+1.592869056*I,(2, 1)=0.,(2, 3)=-.919643378-1.592869055*I]), array(1 .. 3, 1 .. 3,[(1, 3)=-3.500000003-4.330127029*I,(3, 1)=0.,(3, 2)=0.,(2, 2)=1.,(3, 3)=.9999999995-.9446975854e-10*I,(1, 1)=1.000000000-.4004258816e-9*I,(1, 2)=-1.000000003-1.732050810*I,(2, 1)=0.,(2, 3)=1.000000001+1.732050808*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)=-.4999999997+.8660254039*I,(1, 2)=0.,(2, 1)=0.,(2, 3)=0.]):