# This file is in Maple format # Numerical approximation : sol:={u[1,2] = 2.769292354+.1e-98*I, u[1,3] = -.5651977174+.1e-99*I, u[1,4] = .6388969195+0.*I, u[2,1] = -.6805515403-.5533009627*I, u[2,3] = 1.884646177-.7192336692*I, u[2,4] = .5368496010-.1767511403*I, u[3,1] = -.5651977174+.1e-99*I, u[3,2] = .6388969195+0.*I, u[3,4] = 2.769292354+.1e-98*I, u[4,1] = 1.884646177+.7192336692*I, u[4,2] = .5368496010+.1767511403*I, u[4,3] = -.6805515403+.5533009627*I, v[1,2] = .3194484597-.2597174936*I, v[1,3] = 1.282598859-.4894755814*I, v[1,4] = -.8846461771-1.532252125*I, v[2,1] = .3194484597+.2597174936*I, v[2,3] = -.8846461771+1.532252125*I, v[2,4] = 1.282598859+.4894755814*I, v[3,1] = 1.282598859+.4894755814*I, v[3,2] = -.8846461771+1.532252125*I, v[3,4] = .3194484597+.2597174936*I, v[4,1] = -.8846461771-1.532252125*I, v[4,2] = 1.282598859-.4894755814*I, v[4,3] = .3194484597-.2597174936*I, w[1,2] = 2.769292354+.1e-98*I, w[1,3] = -.5651977174+.1e-99*I, w[1,4] = .6388969195+0.*I, w[2,1] = -.6805515403+.5533009627*I, w[2,3] = 1.884646177+.7192336692*I, w[2,4] = .5368496010+.1767511403*I, w[3,1] = -.5651977174+.1e-99*I, w[3,2] = .6388969195+0.*I, w[3,4] = 2.769292354+.1e-98*I, w[4,1] = 1.884646177-.7192336692*I, w[4,2] = .5368496010-.1767511403*I, w[4,3] = -.6805515403-.5533009627*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)=.2174011412-1.355500985*I,(3, 1)=.5651977176+.4595161757*I,(3, 2)=0.,(2, 2)=-.5000000000-.8660254039*I,(3, 3)=0.,(1, 1)=1.810946976+1.178749844*I,(1, 2)=1.745749257-.6662267218*I,(2, 1)=-.6805515405-1.178749844*I,(2, 3)=0.]), array(1 .. 3, 1 .. 3,[(1, 3)=1.322518372-.3682272841*I,(3, 1)=-.1816600948+.7054099407*I,(3, 2)=.3310198568+.1442958389*I,(2, 2)=-.1007125132+.6828717977*I,(3, 3)=.4546489142-.3357719829*I,(1, 1)=-.3423650021+1.329448149*I,(1, 2)=.9801533687+.9612208667*I,(2, 1)=-.5782779709+.8158398041*I,(2, 3)=.4775654582-.1329680066*I]), array(1 .. 3, 1 .. 3,[(1, 3)=2.486693494+2.221526389*I,(3, 1)=-1.680551539+.5533009636*I,(3, 2)=-.3611030802+1.732050809*I,(2, 2)=2.056696233-1.378548528*I,(3, 3)=1.319448459+1.178749845*I,(1, 1)=-3.810946981+2.285351773*I,(1, 2)=-1.745749258+4.130328338*I,(2, 1)=3.172050055+.7791524793*I,(2, 3)=-1.115353822-2.157701006*I]), array(1 .. 3, 1 .. 3,[(1, 3)=.2457492578+1.532252125*I,(3, 1)=-2.047086192-.2935834696*I,(3, 2)=-1.842991556+.9789511641*I,(2, 2)=2.449843894-1.178749845*I,(3, 3)=.2457492578+1.532252125*I,(1, 1)=-2.015041607+.8252475661*I,(1, 2)=-1.973386987+1.604400048*I,(2, 1)=2.795905364-.1276507626*I,(2, 3)=-.2457492578-1.532252125*I])]: # Boundary Holonomy : lMb:=[array(1 .. 3, 1 .. 3,[(1, 3)=0.,(3, 1)=.1303954330+.2258515198*I,(3, 2)=.3611030809+.6254488817*I,(2, 2)=1.,(3, 3)=1.000000001-.2558242811e-9*I,(1, 1)=.9999999998+.2692923542e-9*I,(1, 2)=0.,(2, 1)=.7222061609-.2607573300e-9*I,(2, 3)=0.]), array(1 .. 3, 1 .. 3,[(1, 3)=0.,(3, 1)=.4081892723+.7070045603*I,(3, 2)=-.6388969200-1.106601925*I,(2, 2)=1.,(3, 3)=1.000000000-.5976245866e-10*I,(1, 1)=.9999999996+.4823045350e-10*I,(1, 2)=0.,(2, 1)=-1.277793838+.1338835000e-9*I,(2, 3)=0.])]: # 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)=-.5000000002+.8660254036*I,(1, 2)=0.,(2, 1)=0.,(2, 3)=0.]):