L26:=[ [ 0.0, 0.36112237507645913455116066424971047780946967864687935333193326622248852715989767829431761545839999213127538150859605107389738757156918146942348735234150242791804855465996525917538449914331037730509228, 0.0, 0.0, -0.15097636546680361163727783027998357044549952808946339730033626954718929736233216967077093593837815364006465658450774694743298150533781284506510089702294639738078976252267616804814759621398360097592366 - 0.19040215167394320699801097666078131136351848757660108512936447636905481317195249905551517427005375465399044058005796015225399669936947516200200619205415760198823673652515697411269217077810278969986410*I, 0.0, 0.0, 0.35034851146145262590853902962236674521091771764441507910389597078830622498245955754714083722348769206185741368867717883102209879524782274194333064885754793810103070350299283429784754551562975437464481 - 0.18841649887464756345450439278229893999060812465167160693914576961013599785123203007048974097292972207887576074008447257093159392242002298855822931173801434745292003368126499842507119516160344569709353*I, 0.0, 0.0, 0.21739258678151930793099670112484771928121974408663316561632318884793632194179514908753441234618018194892523149269781753321716984554588019149743601308594519820601497645702092495065538858484187951125442 - 0.26862596735714855226570977866820379354188775036643128223250238659910981604307008374211201193167352816825964497169589899664658367665113703244419773644054519818339224958625329397904015092499984362711799*I, 0.0, 0.0, -0.21061931735614658802017505229606864207903960162624188517062229816702565189340260874254298846987878592346834661240956169157454237307070708218264934880333266360057352156847237754949603268383124794425111 + 0.14628216465556923981790779066833914212637706943967857156757370242324096437953637656402953771760918563609534671488378982755358825702827087488749609087325792024814397768098630709402770871706284263222912*I, 0.0, 0.0, 0.21739258678151930793099670112484771928121974408663316561632318884793632194179514908753441234618018194892523149269781753321716984554588019149743601308594519820601497645702092495065538858484187951125442 - 0.26862596735714855226570977866820379354188775036643128223250238659910981604307008374211201193167352816825964497169589899664658367665113703244419773644054519818339224958625329397904015092499984362711799*I, 0.0, 0.0, 0.35034851146145262590853902962236674521091771764441507910389597078830622498245955754714083722348769206185741368867717883102209879524782274194333064885754793810103070350299283429784754551562975437464481 - 0.18841649887464756345450439278229893999060812465167160693914576961013599785123203007048974097292972207887576074008447257093159392242002298855822931173801434745292003368126499842507119516160344569709353*I, 0.0, 0.0, -0.15097636546680361163727783027998357044549952808946339730033626954718929736233216967077093593837815364006465658450774694743298150533781284506510089702294639738078976252267616804814759621398360097592366 - 0.19040215167394320699801097666078131136351848757660108512936447636905481317195249905551517427005375465399044058005796015225399669936947516200200619205415760198823673652515697411269217077810278969986410*I, 0.0, 0.0, 0.36112237507645913455116066424971047780946967864687935333193326622248852715989767829431761545839999213127538150859605107389738757156918146942348735234150242791804855465996525917538449914331037730509228, 0.0 ], [ 0.0, 0.36340344641064913228601240095878544057885892970065870959591703171556287958516049663403768240812681819764745497638369776925765949367311345472024044955380736665333882660920935193471014170270921952042008, 0.0, 0.0, -0.21292054151646986804123051805294945490074873113867090932870255163667425264683254562586594594633434289818124447357127748058528148595383738437340820746458692686312032928482560394515394013343401607304383 + 0.022138758632062863493828346124716376789292018135709148852169994994264980346578999477526999356171628224978035102136115960199736532315961421238172351926039473797134171843922937739530589041910160145522163*I, 0.0, 0.0, -0.44977477622117353970125210843119592988951789720210270458928028162763360330072397945692807727748272780064744373004341329160990788161291046031298590763131062028274669846092655127348626304028876249546447 + 0.047148377600089221397424416459447412381625393070141356122846577413964320971648625125225197638778622037650231081613151708660467407701188122044646064871448838701988320692125153937396183074529514542246695*I, 0.0, 0.0, 0.15491029434375616294202426748692077765566205055217022035898722844510980537828244161139092638461139307584356487569920740951674232869463414778274239814426140539679579401562367946101016142284374024683430 + 0.053584729401871089351612786830679721322470719712146910849480395737689050652662955449742967996744701690631562360712651876977057346402980472452775104192572338293230122687340627064763116209575159868269953*I, 0.0, 0.0, -0.020656607766195368990756218424787549451382394082494788579149087540907412973226444358978810167097639665360815801556909027241430707352560074989026218939799058661071765755228500192292475132887166700983352 + 0.42546554367505598499473169095187056958425854558351506917125125410601006779493482763134898837538504513426540113428574039770627943782997612597763229819980751889331054387460983253452042972521567880105954*I, 0.0, 0.0, 0.15491029434375616294202426748692077765566205055217022035898722844510980537828244161139092638461139307584356487569920740951674232869463414778274239814426140539679579401562367946101016142284374024683430 + 0.053584729401871089351612786830679721322470719712146910849480395737689050652662955449742967996744701690631562360712651876977057346402980472452775104192572338293230122687340627064763116209575159868269953*I, 0.0, 0.0, -0.44977477622117353970125210843119592988951789720210270458928028162763360330072397945692807727748272780064744373004341329160990788161291046031298590763131062028274669846092655127348626304028876249546447 + 0.047148377600089221397424416459447412381625393070141356122846577413964320971648625125225197638778622037650231081613151708660467407701188122044646064871448838701988320692125153937396183074529514542246695*I, 0.0, 0.0, -0.21292054151646986804123051805294945490074873113867090932870255163667425264683254562586594594633434289818124447357127748058528148595383738437340820746458692686312032928482560394515394013343401607304383 + 0.022138758632062863493828346124716376789292018135709148852169994994264980346578999477526999356171628224978035102136115960199736532315961421238172351926039473797134171843922937739530589041910160145522163*I, 0.0, 0.0, 0.36340344641064913228601240095878544057885892970065870959591703171556287958516049663403768240812681819764745497638369776925765949367311345472024044955380736665333882660920935193471014170270921952042008, 0.0 ] ] where I:=Sqrt(ComplexField(200)!-1); // squared lengths of the multipoles [ 0.037037, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.023711, 0.038928, 0.032475, 0.059514, 0.016822, 0.038967, 0.028331, 0.030075, 0.032971, 0.059573, 0.025661, 0.087210, 0.018290, 0.085586, 0.060273, 0.060963, 0.031460, 0.094999, 0.065465, 0.071692 ], [ 0.037037, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.025429, 0.031496, 0.040766, 0.055586, 0.033428, 0.018234, 0.016820, 0.044337, 0.049860, 0.048429, 0.030281, 0.058163, 0.050781, 0.073799, 0.058198, 0.059916, 0.048226, 0.072311, 0.077535, 0.069367 ] // cumulative squared lengths A_M: [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.023711, 0.062638, 0.095115, 0.15463, 0.17145, 0.21042, 0.23875, 0.26882, 0.30179, 0.36137, 0.38703, 0.47424, 0.49253, 0.57811, 0.63838, 0.69935, 0.73080, 0.82581, 0.89127, 0.96296 ], [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.025429, 0.056925, 0.097691, 0.15328, 0.18670, 0.20494, 0.22176, 0.26609, 0.31596, 0.36438, 0.39466, 0.45283, 0.50361, 0.57741, 0.63560, 0.69553, 0.74375, 0.81606, 0.89359, 0.96296 ]