# 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.178749845*I,(1, 2)=1.745749258+.6662267221*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)=-.1007125134-.6828717977*I,(3, 3)=.4546489142+.3357719829*I,(1, 1)=-.3423650036-1.329448150*I,(1, 2)=.9801533688-.9612208672*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-.5533009634*I,(3, 2)=-.3611030794-1.732050807*I,(2, 2)=2.056696232+1.378548528*I,(3, 3)=1.319448459-1.178749845*I,(1, 1)=-3.810946975-2.285351772*I,(1, 2)=-1.745749258-4.130328338*I,(2, 1)=3.172050055-.7791524781*I,(2, 3)=-1.115353822+2.157701006*I]), array(1 .. 3, 1 .. 3,[(1, 3)=.2457492578-1.532252125*I,(3, 1)=-2.047086191+.2935834698*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.]):