L41:=[
[ 0.0, 0.26695617586108763067608465095051513401902278471458025883267486684102849831978647513549692590309569797119895074327902883221004954931669036853148383752150367202883215944347449364512865944499656651276735, 0.0, 0.0, -0.29254293832119436007820987554854770260039392694899540706476312962667161292874005261172053564370959821680703749505878341848980903382240580451644051714458757820518434962007524193970662457175533823135111 - 0.075954319264919548076065210245256519236303347296015538035848163917646551053886350087656570207364631595043990701074108252426191158488902908629655240163283195689247573503859517709431095370476188753416834*I, 0.0, 0.0, -0.19582259634393742580766486610840208868543381081438851662875664354757073503032722891723700466838052684411278510121417435162296540369980167694570820605982415465198019807315042089023487863365220156779867 - 0.10784774540037821756764241650828471201178695220053123138331560972313541055646890672755873646368422059980632527155701271453738405725995112648721922302394660561769825789554499209577363659544697382800547*I,  0.0, 0.0, 0.0, 0.0, 0.0,  0.36889654563498139461780003769785888923953964621113339558663034999169900915553082378108929485209011097081496777084484513491108029941168784707645074203471735909147506483545938328407158339429928377570534 - 0.27417211190182040771492187449482310274813533804123765593826149555069738533840072823993605750365648505729429947233860976018402086018648736940128574247467951306539849544099015174024890820983773351398248*I, 0.0, 0.0, -0.13094405623426444157378317807462727277323652405199055381322187389531573653382261083349562302406153282239438365126287725474033766314000130841092330645330254081885881201307063151392645221954922840627605 + 0.031573031561386436568519058429662254162332040110269595777377423963306518068051352233562827922494374286724879935119338679368012383399588837497474133875153121453930360081400044272692310003067463862690208*I,  0.0, 0.0, -0.12112020216342976282902291306125664602138934005915683225791304401130070909872465988951653782890674186313906808944538304318460283825690725676314784883227568401230922252686372235729119036536587439654173 - 0.20817788423103038780112349541449993158697440512670462974737082638891912780213494754107891923357364729288365527403037359810702306749097106715449664198865190709920296390840189080878748081684567406262357*I, 0.0, 0.0, -0.12112020216342976282902291306125664602138934005915683225791304401130070909872465988951653782890674186313906808944538304318460283825690725676314784883227568401230922252686372235729119036536587439654173 - 0.20817788423103038780112349541449993158697440512670462974737082638891912780213494754107891923357364729288365527403037359810702306749097106715449664198865190709920296390840189080878748081684567406262357*I, 0.0, 0.0, -0.13094405623426444157378317807462727277323652405199055381322187389531573653382261083349562302406153282239438365126287725474033766314000130841092330645330254081885881201307063151392645221954922840627605 + 0.031573031561386436568519058429662254162332040110269595777377423963306518068051352233562827922494374286724879935119338679368012383399588837497474133875153121453930360081400044272692310003067463862690208*I,  0.0, 0.0,  0.36889654563498139461780003769785888923953964621113339558663034999169900915553082378108929485209011097081496777084484513491108029941168784707645074203471735909147506483545938328407158339429928377570534 - 0.27417211190182040771492187449482310274813533804123765593826149555069738533840072823993605750365648505729429947233860976018402086018648736940128574247467951306539849544099015174024890820983773351398248*I, 0.0, 0.0, 0.0, 0.0, 0.0, -0.19582259634393742580766486610840208868543381081438851662875664354757073503032722891723700466838052684411278510121417435162296540369980167694570820605982415465198019807315042089023487863365220156779867 - 0.10784774540037821756764241650828471201178695220053123138331560972313541055646890672755873646368422059980632527155701271453738405725995112648721922302394660561769825789554499209577363659544697382800547*I,  0.0, 0.0, -0.29254293832119436007820987554854770260039392694899540706476312962667161292874005261172053564370959821680703749505878341848980903382240580451644051714458757820518434962007524193970662457175533823135111 - 0.075954319264919548076065210245256519236303347296015538035848163917646551053886350087656570207364631595043990701074108252426191158488902908629655240163283195689247573503859517709431095370476188753416834*I, 0.0, 0.0, 0.26695617586108763067608465095051513401902278471458025883267486684102849831978647513549692590309569797119895074327902883221004954931669036853148383752150367202883215944347449364512865944499656651276735, 0.0 ],
[ 0.0, 0.26444188918110965777098508866687746071424713553356800802777267919615553602980519772468432501934593703794690310857146756171376069573294467014421646448206591462282784846605705682641599194112412526863868, 0.0, 0.0, -0.22672177493657266722993022997651136666462190013478560155503762048053758449152430462730926807135390802949613994478775403504327866767489515387129873253521546728695784339379283802976285602273220001248378 - 0.21526664918839376647096620274023306951125251105561015737605929431042728074881019680947085022904770858280749925568811642104933915938310178879354985281150942787119633237469718862668857683446649804871259*I,  0.0, 0.0, -0.032442763580374786690404999418438054337641026863380126271667285004277285904982156012993354066500431516099961196477482327848701205430976880716323901644006964492636448237857245055903368397945681509970112 - 0.19846884141380875214978252661485083725631604804614511298381921789642638999690267548479553863999502628733994368750798188724696460475338893210635321191094011561272108385523708042695594297162515910145733*I, 0.0, 0.0, 0.0, 0.0, 0.0, -0.39629004292080500694117291971210748634590287388912612784829893776787092889188594674516363379978245864445728984508760905576248397459262870988029864932278382677900001964887472891379621939734083501325703 + 0.25892322112086762525681763339359407449219662056545180210943786743340943438645743744806865456416243824525730167644039177839400041815254997491295174085029511586456256941151303641437999554420255547389053*I, 0.0, 0.0,  0.071247628585223323627540170080598604462140648276799691120362926856137684153164219477392397668653421128762403263682105364267472733524981599763152743880539911728162336279561231333958534534961010076824497 - 0.045824523941368022773650665414860841273660513404256819105902476844699295925353014586978218450102795388379195943965921164577439634491691380537083831661703266154919002615682095349899518832528587215966308*I, 0.0, 0.0, -0.17384313782238951850188298387705681472208406519672569996161249586886177577132208977857647083253473464034129964318845293208740262598680129827006019967834795863359665691302261673897820278048326858567533 - 0.17435882296884408690698309047636285101934327579567745806084944553536159110821558594556892625514416433016598815248011216517215421302543880958556432116492042687336374136023712873790694880692588147846119*I, 0.0, 0.0, -0.17384313782238951850188298387705681472208406519672569996161249586886177577132208977857647083253473464034129964318845293208740262598680129827006019967834795863359665691302261673897820278048326858567533 - 0.17435882296884408690698309047636285101934327579567745806084944553536159110821558594556892625514416433016598815248011216517215421302543880958556432116492042687336374136023712873790694880692588147846119*I, 0.0, 0.0,  0.071247628585223323627540170080598604462140648276799691120362926856137684153164219477392397668653421128762403263682105364267472733524981599763152743880539911728162336279561231333958534534961010076824497 - 0.045824523941368022773650665414860841273660513404256819105902476844699295925353014586978218450102795388379195943965921164577439634491691380537083831661703266154919002615682095349899518832528587215966308*I, 0.0, 0.0, -0.39629004292080500694117291971210748634590287388912612784829893776787092889188594674516363379978245864445728984508760905576248397459262870988029864932278382677900001964887472891379621939734083501325703 + 0.25892322112086762525681763339359407449219662056545180210943786743340943438645743744806865456416243824525730167644039177839400041815254997491295174085029511586456256941151303641437999554420255547389053*I, 0.0, 0.0, 0.0, 0.0, 0.0, -0.032442763580374786690404999418438054337641026863380126271667285004277285904982156012993354066500431516099961196477482327848701205430976880716323901644006964492636448237857245055903368397945681509970112 - 0.19846884141380875214978252661485083725631604804614511298381921789642638999690267548479553863999502628733994368750798188724696460475338893210635321191094011561272108385523708042695594297162515910145733*I, 0.0, 0.0, -0.22672177493657266722993022997651136666462190013478560155503762048053758449152430462730926807135390802949613994478775403504327866767489515387129873253521546728695784339379283802976285602273220001248378 - 0.21526664918839376647096620274023306951125251105561015737605929431042728074881019680947085022904770858280749925568811642104933915938310178879354985281150942787119633237469718862668857683446649804871259*I,  0.0, 0.0, 0.26444188918110965777098508866687746071424713553356800802777267919615553602980519772468432501934593703794690310857146756171376069573294467014421646448206591462282784846605705682641599194112412526863868, 0.0 ]
] where I:=Sqrt(RealField(200)!-1);


// squared length of the multipoles
[ 0.023809, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0070677, 0.023832, 0.0041936, 0.015020,  0.021864, 0.0040345, 0.025903, 0.034395, 0.0070011, 0.024054, 0.033249, 0.0078374, 0.015464, 0.023559, 0.026197, 0.015612,  0.026393, 0.041954, 0.027990, 0.049225, 0.015861, 0.027443, 0.060831, 0.034281, 0.029186, 0.0073876, 0.034643, 0.069199, 0.053558, 0.036466, 0.031496, 0.041211, 0.055292, 0.044490 ]
[ 0.023809, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0095050, 0.024320, 0.0046116, 0.0033719, 0.031324, 0.0039046, 0.019728, 0.037273, 0.012528,  0.015176, 0.038169, 0.015772,  0.015570, 0.015109, 0.031966, 0.0099655, 0.021689, 0.041713, 0.037127, 0.034003, 0.024488, 0.045362, 0.057823, 0.025538, 0.012416, 0.015258,  0.040763, 0.079253, 0.043889, 0.033051, 0.028625, 0.054312, 0.045969, 0.046617 ]

// cumulative squared length A_M:
          [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0070677, 0.030900, 0.035093,  0.050113,  0.071977, 0.076012,  0.10192,  0.13631,  0.14331,   0.16736,  0.20061,  0.20845,   0.22392,  0.24747,  0.27367,  0.28928,  0.31568,  0.35763,   0.38562,  0.43484,  0.45071,  0.47815,  0.53898,  0.57327,  0.60245,  0.60983,   0.64448,  0.71368,  0.76723,  0.80370,  0.83520,  0.87641,  0.93170,  0.97619 ]
          [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0095050, 0.033825, 0.038437,  0.041809,  0.073133, 0.077037,  0.096766, 0.13404,  0.14657,   0.16174,  0.19991,  0.21568,   0.23125,  0.24636,  0.27833,  0.28830,  0.30998,  0.35170,   0.38882,  0.42283,  0.44732,  0.49268,  0.55050,  0.57603,  0.58846,  0.60371,   0.64448,  0.72372,  0.76762,  0.80067,  0.82929,  0.88361,  0.92957,  0.97619 ]