复数共形映射：探究复平面上的保角变换

GeoGebra 命令及参数

1. Sequence(Segment[A + (i * (B - A) / a), C + (i * (D - C) / a)], i, 0, a) → list1
2. Sequence(Segment[A + (i * (C - A) / a), B + (i * (D - B) / a)], i, 0, a) → list2
3. Point(Element[list1, A1]) → B1
4. Point(Element[list1, A2]) → B2
5. Point(Element[list1, A3]) → B3
6. Point(Element[list1, A4]) → B4
7. Point(Element[list1, A5]) → B5
8. Point(Element[list1, A6]) → B6
9. Point(Element[list1, A7]) → B7
10. Point(Element[list1, A8]) → B8
11. Point(Element[list1, A9]) → B9
12. Point(Element[list1, A10]) → B10
13. Point(Element[list2, A1]) → C1
14. Point(Element[list2, A2]) → C2
15. Point(Element[list2, A3]) → C3
16. Point(Element[list2, A4]) → C4
17. Point(Element[list2, A5]) → C5
18. Point(Element[list2, A6]) → C6
19. Point(Element[list2, A7]) → C7
20. Point(Element[list2, A8]) → C8
21. Point(Element[list2, A9]) → C9
22. Point(Element[list2, A10]) → C10
23. Locus(D1, B1) → F1
24. Locus(D2, B2) → F2
25. Locus(D3, B3) → F3
26. Locus(D4, B4) → F4
27. Locus(D5, B5) → F5
28. Locus(D6, B6) → F6
29. Locus(D7, B7) → F7
30. Locus(D8, B8) → F8
31. Locus(D9, B9) → F9
32. Locus(D10, B10) → F10
33. Locus(E1, C1) → G1
34. Locus(E2, C2) → G2
35. Locus(E3, C3) → G3
36. Locus(E4, C4) → G4
37. Locus(E5, C5) → G5
38. Locus(E6, C6) → G6
39. Locus(E7, C7) → G7
40. Locus(E8, C8) → G8
41. Locus(E9, C9) → G9
42. Locus(E10, C10) → G10
43. Polygon(A, B, D, C) → poly1, a_1, b, d, c
44. Point(poly1) → Z
45. Locus(Z', Z) → loc1
46. Centroid(poly1) → O
47. Join({list1, list2}) → list3
48. Point(list3) → E
49. If(4 ≤ Indexnames ≤ 6, unites, unitother) → Chooseunit
50. LaTeX(Indexnames, true, true) → text3
51. LaTeX(xmax, true, true) → text4
52. LaTeX(xmin, true, true) → text5
53. LaTeX(ymax, true, true) → text6
54. LaTeX(ymin, true, true) → text7