Ich habe das Monster jetzt mal in Pascal übersetzt und angenommen, dass O(x^7) mit 0*x^7 zu übersetzen iat:
Aus der Ausgabe von WIMS
habe ich folgenden (Pascal-)code gemacht:
und herausgekommn ist das:
Die numerische Lösung zum Vergleich hätte ich mir sparen können. Die richtige Lösung liegt auf jeden Fall zwischen -2,36 und +2,36 und ist betragsmäßig vermutlich einiges kleiner als 2,36. -0,76 sind plausibel.
Aus der Ausgabe von WIMS
Code:
int(f(x),x) = (((-b^5*sin(c+a))+20*b^3*sin(c+a)+ 15*a^2*b*sin(c+a)-16*b*sin(c+a) +a*(10*b^3*cos(c+a)- 45*b*cos(c+a))) *x^6) /720 -((a*(5*sin(c+a)-6*b^2*sin(c+a))-b^4*cos(c+a)+8*b^2*cos(c+a)+3*a^2*cos(c+a)) *x^5)/120-(((-b^3*sin(c+a))+2*b*sin(c+a)+3*a*b*cos(c+a))*x^4)/24- ((a*sin(c+a)+b^2*cos(c+a))*x^3)/6- (b*sin(c+a)*x^2)/2+ cos(c+a)*x + O(x^7) + C
Code:
result := ( ( (-power(b,5)*sin(c+a) ) + 20*power(b,3)*sin(c+a) + 15*sqr(a)*b*sin(c+a) - 16*b*sin(c+a) + a*(10*power(b,3)*cos(c+a) - 45*b*cos(c+a))) * power(phi,6) ) / 720 - ( ( a*(5*sin(c+a) - 6*sqr(b)*sin(c+a)) - power(b,4)*cos(c+a) + 8*sqr(b)*cos(c+a) + 3*sqr(a)*cos(c+a)) * power(phi,5) ) / 120 -( ( (-power(b,3)*sin(c+a)) + 2*b*sin(c+a) + 3*a*b*cos(c+a) ) * power(phi,4) ) / 24 -( (a*sin(c+a) + sqr(b)*cos(c+a))*power(phi,3) ) / 6 -( b*sin(c+a)*sqr(phi)) / 2 + cos(c+a) * phi;
Code:
A = 10 B = 8 C = 5 phi1 = -75° phi2 = 60° cos analytisch = 208,024 cos numerisch = -0,7603
Kommentar