非线性方程组图形与数值解法 by Roman Chijner

GeoGebra 命令及参数

1. Corner(2, 5) → Co5
2. Defined(Co5) → aM3
3. Ray(M1, Vector[Corner[2, 5]]) → M32
4. Point(M32) → M3r
5. If(aM3, M3r, B) → M3
6. Point(Segment[Px2, Px1]) → Ax
7. Point(Segment[Py2, Py1]) → Ay
8. If(Funktion ≟ 1, a(x, y), If[Funktion ≟ 2, b(x, y), a(x, y) * b(x, y)]) → f00
9. If((f1(x0 - ε / 2) * f1(x0 + ε / 2) < 1.0E-8) ∧ (f2(x0 - ε / 2) * f2(x0 + ε / 2) < 1.0E-8), (x0, y0)) → E0x
10. If((g1(y0 - ε / 2) * g1(y0 + ε / 2) < 0) ∧ (g2(y0 - ε / 2) * g2(y0 + ε / 2) < 0), (x0, y0)) → E0y
11. If(fxx(xi - ε / 2) * fxx(xi + ε / 2) < 0, (xi, y(Ay))) → Bxx1
12. If(fyy(yi - ε / 2) * fyy(yi + ε / 2) < 0, (x(Ax), yi)) → Byy1
13. Locus(Bxx1, Ay) → locxx1
14. Locus(Byy1, Ax) → locyy1
15. Textfield(a) → inputBox1
16. Textfield(b) → inputBox2
17. Polygon((x_{max}, y_{max}), (x_{min}, y_{max}), (x_{min}, y_{min}), (x_{max}, y_{min})) → VV, d, e, g, h
18. Textfield(N_P) → Textfeld1
19. If(a_1, N_P, 2) → N_1
20. Sequence(x_{min} + (x_{max} - x_{min}) / N_1 * i, i, 0, N_1) → xx
21. Sequence(y_{min} + (y_{max} - y_{min}) / N_1 * i, i, 0, N_1) → yy
22. RemoveUndefined(Join[Zip[Mirror[{Roots[f00(a, x), y_{min}, y_{max}]}, y = x] + (a, 0), a, xx]]) → Pxxy
23. Join(Zip[Reverse[{Roots[f00(x, b), x_{min}, x_{max}]}] + (0, b), b, yy]) → Pyyx
24. Textfield(Funktion) → Textfeld2
25. Textfield(x_{min}) → Textfeld3
26. Textfield(y_{min}) → Textfeld4
27. Textfield(x_{max}) → Textfeld5
28. Textfield(y_{max}) → Textfeld6
29. Textfield(N) → Textfeld7
30. Text(Element[L, 1]) → Lx
31. Text(Element[L, 2]) → Ly
32. Textfield(M10) → Textfeld8
33. Intersect(Element[L, 1], Element[L, 2]) → C