|
> Vielen Dank für die vielen Hilfen und Anregungen. Wie Sie aus der > Beilage ersehen können, sind nicht alle meine Wünsche in Erfüllung > gegangen. Also meine ursprüngliche Definition läßt sich ja leicht so modifizieren, daß sie auch rationale (nicht reelle ;-) Zahlen korrekt verarbeitet: sigma[x_] := (#1 - Sqrt[5] #2)&@@ Append[CoefficientList[x, Sqrt[5]], 0] Gruß, Thomas |