分数乘法GeoGebra示例

GeoGebra 命令及参数

1. Max(0, abs(t) - 5) → nt
2. Min(nt, 100) → t1
3. Max(0, nt - 100) → t2
4. If(b, BA, AA) → C
5. If(b, 1, (den1 - (ts * (den1 - en1))) / den1) → f1
6. Sequence(Segment[B, Rotate[B1, ((((-f1) * 2) * π) * i / den2), B]], i, 0, den2 - 1) → list2
7. CircleArc(B, Rotate[B1, ((-2 * π) * f1), B], B1) → f
8. Segment(B, Rotate[B1, ((-2 * π) * f1), B]) → a
9. CircleSector(B, Rotate[B1, ((((-f1) * 2) * π) * en2 / den2), B], B1) → d
10. Sequence(Segment[C, Rotate[C1, ((2 * π) * i / den3), C]], i, 1, den3 - 1) → list3
11. If(b, (den2 - (ts * (den2 - en2))) / den2, 1) → f2
12. CircleSector(A, Rotate[A1, ((((-f2) * 2) * π) * en1 / den1), A], A1) → c
13. Sequence(Segment[A, Rotate[A1, ((((-f2) * 2) * π) * i / den1), A]], i, 0, den1 - 1) → list1
14. CircleArc(A, Rotate[A1, ((-2 * π) * f2), A], A1) → e
15. Segment(A, Rotate[A1, ((-2 * π) * f2), A]) → g