L33:=[ [ 0.215310685873571031278688325564, 0.0, 0.0, 0.309302756524049022161131118155 + 0.111844509930562540816279527094*I, 0.0, 0.0, 0.149875796437144287342791527989 - 0.235507024398067822280710277009*I, 0.0, 0.0, -0.0462364510341287767970618048001 + 0.318902350184778124387828830034*I, 0.0, 0.0, -0.234284892656883878658734559128, 0.0, 0.0, -0.329866149779445081837164686944, 0.0, 0.0, 0.329866149779445081837164686944*I, 0.0, 0.0, -0.234284892656883878658734559128*I, 0.0, 0.0, 0.318902350184778124387828830034 + 0.0462364510341287767970618048001*I, 0.0, 0.0, 0.235507024398067822280710277009 + 0.149875796437144287342791527989*I, 0.0, 0.0, 0.111844509930562540816279527094 - 0.309302756524049022161131118155*I, 0.0, 0.0, 0.215310685873571031278688325564*I ], [ 0.203597892863359693899214650954, 0.0, 0.0, -0.370093245326264435465667772036 - 0.00459794928505948579970844152903*I, 0.0, 0.0, -0.0176416607658315251843862849562 + 0.115370089256495138029110157109*I, 0.0, 0.0, -0.00778079570483703558834621775376 + 0.406004086791935114746008992912*I, 0.0, 0.0, -0.207363390546966203900881948403, 0.0, 0.0, 0.316285987589601916254228379025, 0.0, 0.0, -0.316285987589601916254228379025*I, 0.0, 0.0, -0.207363390546966203900881948403*I, 0.0, 0.0, 0.406004086791935114746008992912 + 0.00778079570483703558834621775376*I, 0.0, 0.0, -0.115370089256495138029110157109 - 0.0176416607658315251843862849562*I, 0.0, 0.0, -0.00459794928505948579970844152903 + 0.370093245326264435465667772036*I, 0.0, 0.0, 0.203597892863359693899214650954*I ] ] where I:=Sqrt(-1); // squared length of the multipoles [ 0.029412, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.014367, 0.025407, 0.018811, 0.0026618, 0.0041462, 0.049942, 0.026118, 0.022630, 0.053739, 0.014877, 0.047023, 0.011095, 0.017993, 0.019967, 0.033701, 0.052667, 0.059650, 0.055840, 0.043596, 0.020261, 0.033714, 0.091983, 0.024737, 0.048066, 0.065739, 0.055191, 0.056666 ], [ 0.029412, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.021447, 0.018076, 0.013610, 0.0073599, 0.0034090, 0.064150, 0.012051, 0.016651, 0.044659, 0.016426, 0.081795, 0.0041214, 0.011351, 0.019377, 0.018278, 0.065514, 0.052457, 0.041721, 0.067484, 0.018039, 0.024513, 0.11353, 0.015270, 0.026883, 0.079931, 0.058743, 0.053745 ] // cumulative squared lengths A_M: [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.014367, 0.039773, 0.058585, 0.061247, 0.065393, 0.11533, 0.14145, 0.16408, 0.21782, 0.23270, 0.27972, 0.29082, 0.30881, 0.32878, 0.36248, 0.41515, 0.47480, 0.53063, 0.57423, 0.59449, 0.62820, 0.72019, 0.74493, 0.79299, 0.85873, 0.91393, 0.97059 ], [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.021447, 0.039522, 0.053133, 0.060493, 0.063902, 0.12805, 0.14010, 0.15675, 0.20141, 0.21784, 0.29963, 0.30376, 0.31511, 0.33448, 0.35276, 0.41827, 0.47073, 0.51245, 0.57994, 0.59798, 0.62249, 0.73602, 0.75129, 0.77817, 0.85810, 0.91684, 0.97059 ]