L38:=[ [ 0.0, 0.291884247163529335329438909826, 0.0, 0.0, 0.0, 0.0332098262220707214606174993296 + 0.360146130529399900035685699022*I, 0.0, 0.0, 0.0, 0.118789710575408244854565223372 + 0.0386433033841751076782572599441*I, 0.0, 0.0, 0.0, -0.0495982226916494224578553498010 - 0.480188377084663826158607620331*I, 0.0, 0.0, 0.0, 0.188016746457265413404150886409, 0.0, 0.0, 0.0, 0.188016746457265413404150886409, 0.0, 0.0, 0.0, -0.0495982226916494224578553498010 - 0.480188377084663826158607620331*I, 0.0, 0.0, 0.0, 0.118789710575408244854565223372 + 0.0386433033841751076782572599441*I, 0.0, 0.0, 0.0, 0.0332098262220707214606174993296 + 0.360146130529399900035685699022*I, 0.0, 0.0, 0.0, 0.291884247163529335329438909826, 0.0 ], [ 0.0, 0.297078445778150729331815830416, 0.0, 0.0, 0.0, 0.243781214215191641960584335830 + 0.223527454829551107884941950673*I, 0.0, 0.0, 0.0, -0.148686704902050266178281802215 - 0.233838294757784442915423101089*I, 0.0, 0.0, 0.0, -0.313161481689415619914112609644 - 0.222066318613844434070631462525*I, 0.0, 0.0, 0.0, 0.279604981716625834546027797151, 0.0, 0.0, 0.0, 0.279604981716625834546027797151, 0.0, 0.0, 0.0, -0.313161481689415619914112609644 - 0.222066318613844434070631462525*I, 0.0, 0.0, 0.0, -0.148686704902050266178281802215 - 0.233838294757784442915423101089*I, 0.0, 0.0, 0.0, 0.243781214215191641960584335830 + 0.223527454829551107884941950673*I, 0.0, 0.0, 0.0, 0.297078445778150729331815830416, 0.0 ] ] where I:=Sqrt(-1); // squared length of the multipoles [ 0.025641, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0062362, 0.029111, 0.015789, 0.0018432, 0.040137, 0.0082307, 0.036252, 0.016951, 0.0075769, 0.037117, 0.024573, 0.012147, 0.022473, 0.024653, 0.028702, 0.0084325, 0.069475, 0.048677, 0.028150, 0.027668, 0.047237, 0.020483, 0.040439, 0.015360, 0.066409, 0.075997, 0.032814, 0.013964, 0.071025, 0.046372, 0.050064 ], [ 0.025641, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.016465, 0.017458, 0.016728, 0.0046039, 0.031501, 0.0022965, 0.046977, 0.018160, 0.017798, 0.014111, 0.054631, 0.00057589, 0.014451, 0.025837, 0.031191, 0.0061838, 0.084888, 0.021396, 0.032918, 0.0093665, 0.094022, 0.0099084, 0.038062, 0.014868, 0.066084, 0.039311, 0.067654, 0.010254, 0.081231, 0.030130, 0.055298 ] // cumulative squared lengths A_M: [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0062362, 0.035347, 0.051136, 0.052979, 0.093117, 0.10135, 0.13760, 0.15455, 0.16213, 0.19924, 0.22382, 0.23596, 0.25844, 0.28309, 0.31179, 0.32022, 0.38970, 0.43838, 0.46653, 0.49419, 0.54143, 0.56191, 0.60236, 0.61771, 0.68412, 0.76012, 0.79293, 0.80690, 0.87792, 0.92429, 0.97436 ], [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.016465, 0.033923, 0.050651, 0.055255, 0.086756, 0.089052, 0.13603, 0.15419, 0.17199, 0.18610, 0.24073, 0.24131, 0.25576, 0.28159, 0.31279, 0.31897, 0.40386, 0.42525, 0.45817, 0.46754, 0.56156, 0.57146, 0.60953, 0.62440, 0.69048, 0.72979, 0.79745, 0.80770, 0.88893, 0.91906, 0.97436 ]