L120:=[ [ 0.12705674903504998770149593006224671818454457524896174756789429660544966008479296552625026545436135831292569029477632910864631441147068148010470670838265943141072998801480850134509013873181613994952170, 0.0, 0.0, 0.0, 0.0, -0.24834894014311184222453740498009856095814639239033018149894640474453278702149379716729560195232171222665289178918992749207478265060878853415818402817645258597533160330469120630035189881419342966538861 - 0.065391801641020665449656217848132741807285914088896573115465575478726863226243079992711343273866061676891735194627568029230377498342038680530685005571824072071697090829675537264913865765068024688803977*I, 0.0, 0.0, 0.0, 0.0, -0.0041964172247421093254692188154115889919787367160142826703808258035722240401061718772189061359067761424978607626649012770745491949218837109496034386644261632364386429963989353934934511156735801129359058 - 0.023656257768519970695046950587007028844375093091053742855951267359665337923860721863682702054725706472638545599725348974540623083879812874348935261449421598061220012538176242463847095115131852253596560*I, 0.0, 0.0, 0.0, 0.0, -0.29366941158518634283686494230823869754270283264379058754773479691513185767901797519062219432903970939487310899358277672709935116247960612125750758063480638799258693786188468459591106563363850040742772 - 0.066057463120278370654691831339443659103333284683354361885466834215546621509945115909924299118729672040398255063938370642934224466201242623321036054909141745037170310782942699449363837683119158761144261*I, 0.0, 0.0, 0.0, 0.0, 0.00010030232013177071955492145750214181304414391387033586462212917226178132595493247895921409055597771964238019399850846601471386360218683122998570199014655093745027499473758124293973710956065700457356789 - 0.014702436925223848465892497517695016924742532762856884051520797607801779216668289093768717112348876301331660712972718274782461619451818044275965623548553504398234390895646245726602357663364978357786401*I, 0.0, 0.0, 0.0, 0.0, 0.26767863785675308047969468107072260954916094482735800729816464941253929470473051420016732907893445209543956308868339717040145020524884978874171504881444134131578748281001253236972396390987635702622882 + 0.052489635298886608247311049699133001368370235615127233953664221273665111342560140973215030558062889838666365561544483098380410642111994761469490883809551066426374572003704318912664375213385575260820674*I, 0.0, 0.0, 0.0, 0.0, -0.021174096704758609632284938674135115816449409917808463121386996757471115150612032987157208141316996519346911850598962251448196346989208042191210979800410985020110544402880472280995414986535954142926392 - 0.054750221049637472121249895189445948151714692611517483516212470438542582951433094512136190344403349168861755825363765428332484040969066785893569902292056373538332402807535804025037675769518741787601938*I, 0.0, 0.0, 0.0, 0.0, 0.27009715943946215331620773813921034976917996447222222763690629582063170535299201652738890382054568818554718296239041129814367101031460005444911990998912976910799795084315227982091887606706135354404725 + 0.031751481527666296982130783977342793231265889094661275214203897430464674576526221221015176328749077548081648278951208488231378854513610391496817298836825641854220482777467992520946125299986655557158121*I, 0.0, 0.0, 0.0, 0.0, 0.18152971784560758287775084657590365331938954772576193877090182292726147752199841372024863249790787677885868044903343829893286749183029124927750786076044725614105826839630663182801655411673979033107135 + 0.010707638311528759955086186544879106060074314918262546933278772423960376452854103510544702568848078581885095046787376715588520904547137179235817789444398389431468905972299251900686687092668830033608236*I, 0.0, 0.0, 0.0, 0.0, -0.19147303918540917194352188281499196457238528173404790203450550777944910517492628806928472605194520726423450773745122557197270612403428794023790028483775494443903418157887452911015744321202628466570982 - 0.051127655708015014901726032576684587764772828033875733788749602694497674441648671165682896695621525940383403076948026669492453713086407002220254914807714325392924549354193936976555460911581864169250274*I, 0.0, 0.0, 0.0, 0.0, 0.18828145343287379916459277736982562068575034222654818692708036044145567578801120605438563152786017455770878480916169977243826678190502050079312876593130865651819944815960787405643043061098822770241036 + 0.031907835197436445551089970708792427614652633565742278559304163071294378987476798278053944204326332137412286938136977299401070909236415395757967888622754635235731293890648058259569417023824118913123364*I, 0.0, 0.0, 0.0, 0.0, 0.18144662285066528389750207426393736930518659110191543941817704692915603518631554561543015327345435235469100580607684129549659124091760352442829495507266777224447998182844683217013534928551944982662405 + 0.063543746000202773504611221681771229901940728952818787096383310553360455285342289311258624093988931205054210935486494564201044712277961086978002306507867636095949740554070013492118607117934830911764207*I, 0.0, 0.0, 0.0, 0.0, 0.23419563086907348529109250366985923884058506722214714214950420603502629276567508724338474331410893382131241424541778514576282564676246331951689005544321301440841799701129842057550663674996020858832953 + 0.054678327706244013956610697943873686199742465306212985688687053166161054029101178177049359476381704392112931194616696709506270385577154089689439144759634906529093831529174384273806808383986232239975420*I, 0.0, 0.0, 0.0, 0.0, -0.18144662285066528389750207426393736930518659110191543941817704692915603518631554561543015327345435235469100580607684129549659124091760352442829495507266777224447998182844683217013534928551944982662405 - 0.063543746000202773504611221681771229901940728952818787096383310553360455285342289311258624093988931205054210935486494564201044712277961086978002306507867636095949740554070013492118607117934830911764207*I, 0.0, 0.0, 0.0, 0.0, 0.18828145343287379916459277736982562068575034222654818692708036044145567578801120605438563152786017455770878480916169977243826678190502050079312876593130865651819944815960787405643043061098822770241036 + 0.031907835197436445551089970708792427614652633565742278559304163071294378987476798278053944204326332137412286938136977299401070909236415395757967888622754635235731293890648058259569417023824118913123364*I, 0.0, 0.0, 0.0, 0.0, 0.19147303918540917194352188281499196457238528173404790203450550777944910517492628806928472605194520726423450773745122557197270612403428794023790028483775494443903418157887452911015744321202628466570982 + 0.051127655708015014901726032576684587764772828033875733788749602694497674441648671165682896695621525940383403076948026669492453713086407002220254914807714325392924549354193936976555460911581864169250274*I, 0.0, 0.0, 0.0, 0.0, 0.18152971784560758287775084657590365331938954772576193877090182292726147752199841372024863249790787677885868044903343829893286749183029124927750786076044725614105826839630663182801655411673979033107135 + 0.010707638311528759955086186544879106060074314918262546933278772423960376452854103510544702568848078581885095046787376715588520904547137179235817789444398389431468905972299251900686687092668830033608236*I, 0.0, 0.0, 0.0, 0.0, -0.27009715943946215331620773813921034976917996447222222763690629582063170535299201652738890382054568818554718296239041129814367101031460005444911990998912976910799795084315227982091887606706135354404725 - 0.031751481527666296982130783977342793231265889094661275214203897430464674576526221221015176328749077548081648278951208488231378854513610391496817298836825641854220482777467992520946125299986655557158121*I, 0.0, 0.0, 0.0, 0.0, -0.021174096704758609632284938674135115816449409917808463121386996757471115150612032987157208141316996519346911850598962251448196346989208042191210979800410985020110544402880472280995414986535954142926392 - 0.054750221049637472121249895189445948151714692611517483516212470438542582951433094512136190344403349168861755825363765428332484040969066785893569902292056373538332402807535804025037675769518741787601938*I, 0.0, 0.0, 0.0, 0.0, -0.26767863785675308047969468107072260954916094482735800729816464941253929470473051420016732907893445209543956308868339717040145020524884978874171504881444134131578748281001253236972396390987635702622882 - 0.052489635298886608247311049699133001368370235615127233953664221273665111342560140973215030558062889838666365561544483098380410642111994761469490883809551066426374572003704318912664375213385575260820674*I, 0.0, 0.0, 0.0, 0.0, 0.00010030232013177071955492145750214181304414391387033586462212917226178132595493247895921409055597771964238019399850846601471386360218683122998570199014655093745027499473758124293973710956065700457356789 - 0.014702436925223848465892497517695016924742532762856884051520797607801779216668289093768717112348876301331660712972718274782461619451818044275965623548553504398234390895646245726602357663364978357786401*I, 0.0, 0.0, 0.0, 0.0, 0.29366941158518634283686494230823869754270283264379058754773479691513185767901797519062219432903970939487310899358277672709935116247960612125750758063480638799258693786188468459591106563363850040742772 + 0.066057463120278370654691831339443659103333284683354361885466834215546621509945115909924299118729672040398255063938370642934224466201242623321036054909141745037170310782942699449363837683119158761144261*I, 0.0, 0.0, 0.0, 0.0, -0.0041964172247421093254692188154115889919787367160142826703808258035722240401061718772189061359067761424978607626649012770745491949218837109496034386644261632364386429963989353934934511156735801129359058 - 0.023656257768519970695046950587007028844375093091053742855951267359665337923860721863682702054725706472638545599725348974540623083879812874348935261449421598061220012538176242463847095115131852253596560*I, 0.0, 0.0, 0.0, 0.0, 0.24834894014311184222453740498009856095814639239033018149894640474453278702149379716729560195232171222665289178918992749207478265060878853415818402817645258597533160330469120630035189881419342966538861 + 0.065391801641020665449656217848132741807285914088896573115465575478726863226243079992711343273866061676891735194627568029230377498342038680530685005571824072071697090829675537264913865765068024688803977*I, 0.0, 0.0, 0.0, 0.0, 0.12705674903504998770149593006224671818454457524896174756789429660544966008479296552625026545436135831292569029477632910864631441147068148010470670838265943141072998801480850134509013873181613994952170 ] ] where I:=Sqrt(RealField(200)!-1); // squared length of the multipoles [ 0.0082644, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0052683, 0.0, 0.0037891, 0.0, 0.021335, 0.0012260, 0.0032883, 0.0, 0.010041, 1.1869E-5, 0.0024731, 0.00022477, 0.0041535, 0.0, 0.0066569, 5.5437E-5, 0.00087990, 0.00074035, 0.010753, 9.5922E-5, 0.023073, 0.00015453, 0.00018854, 0.00038215, 0.0073950, 0.00028881, 0.032904, 0.00037687, 0.0024049, 4.8827E-5, 0.0067883, 1.3114E-5, 0.0054613, 0.00023323, 0.012943, 0.00085668, 0.032115, 4.1423E-8, 0.0049860, 0.0013709, 0.014284, 0.00021840, 0.010876, 1.6856E-5, 0.036900, 0.00019748, 0.0058401, 9.2293E-5, 0.0012585, 0.00077357, 0.013466, 0.00055886, 0.040440, 0.00034827, 0.0038882, 9.5321E-5, 0.046164, 7.3302E-5, 0.010854, 0.00041989, 0.019185, 0.00063195, 0.0038437, 0.00069778, 0.016087, 8.5844E-5, 0.030519, 0.0021423, 0.024442, 0.00023849, 0.047343, 0.00051725, 0.010834, 0.00027841, 0.013905, 0.0013074, 0.022621, 0.00065097, 0.0097487, 0.00064085, 0.054580, 0.00025013, 0.029257, 6.0324E-5, 0.0081117, 0.00027585, 0.040741, 0.0013329, 0.011758, 0.00061475, 0.043560, 0.00081060, 0.025642, 0.00027983, 0.023962, 0.0014439, 0.031390, 0.00037957, 0.039834, 0.00051064, 0.016701, 0.0013927, 0.043150, 0.00072493, 0.019513 ] // cumulative squared lengths A_M: [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0052683, 0.0052683, 0.0090575, 0.0090575, 0.030393, 0.031619, 0.034907, 0.034907, 0.044948, 0.044960, 0.047433, 0.047657, 0.051811, 0.051811, 0.058468, 0.058524, 0.059403, 0.060144, 0.070897, 0.070993, 0.094067, 0.094221, 0.094410, 0.094791, 0.10219, 0.10248, 0.13538, 0.13576, 0.13816, 0.13821, 0.14500, 0.14501, 0.15047, 0.15071, 0.16365, 0.16451, 0.19662, 0.19662, 0.20161, 0.20298, 0.21726, 0.21748, 0.22836, 0.22837, 0.26527, 0.26547, 0.27131, 0.27140, 0.27266, 0.27343, 0.28690, 0.28746, 0.32790, 0.32825, 0.33213, 0.33223, 0.37840, 0.37847, 0.38932, 0.38974, 0.40893, 0.40956, 0.41340, 0.41410, 0.43019, 0.43027, 0.46079, 0.46293, 0.48738, 0.48761, 0.53496, 0.53548, 0.54631, 0.54659, 0.56049, 0.56180, 0.58442, 0.58507, 0.59482, 0.59546, 0.65004, 0.65029, 0.67955, 0.67961, 0.68772, 0.68800, 0.72874, 0.73007, 0.74183, 0.74244, 0.78600, 0.78681, 0.81245, 0.81274, 0.83669, 0.83814, 0.86953, 0.86991, 0.90974, 0.91026, 0.92696, 0.92834, 0.97150, 0.97222, 0.99174 ]