复数乘法几何表示 by Benjamin Schutz

GeoGebra 命令及参数

1. Polygon(A, B, C) → t1, c, a, b
2. Dilate(Polygon[Rotate[A, Angle[E, A, C], A], Rotate[B, Angle[E, A, C], A], Rotate[C, Angle[E, A, C], A]], Distance[A, E] / Distance[A, C], A) → t1'
3. Angle(E, A, C) → α
4. Polygon(A, E, C) → t2, c_1, a_1, e
5. Polygon(Rotate[A, Angle[E, A, C], A], Rotate[B, Angle[E, A, C], A], Rotate[C, Angle[E, A, C], A]) → t3, f, g, h