Die Legendre Polynome sind Lösungen der Differentialgleichung
Remove[ " Global`* " ] n= (* Grad des Legendreschen Polynoms *) LegendreP[n,z]