有向数加法-电梯模型

GeoGebra 命令及参数

1. Intersect(xAxis, yAxis) → O
2. Point(yAxis) → C
3. Point(xAxis) → B
4. CircleArc(O, B, C) → c
5. Point(c) → A
6. Sequence(Translate[O, Vector[(i * UnitVector[Vector[O, A]])]], i, -6, 7) → l1
7. Sequence(Translate[O, Vector[((0.1 * i) * UnitVector[Vector[O, A]])]], i, -200, 200) → l3
8. Point(l1) → P
9. PathParameter(A) → t
10. PathParameter(P) → a
11. Corner(5) → Dimen
12. Point(Ray[D + (0, 1), D + (0, 2)]) → F
13. Polygon((x(Corner[2]), 0), (x(Corner[1]), 0), Corner[1], Corner[2]) → q1, g, h, i, j
14. Sequence(Text[i, Translate[O, (-0.2, -0.7) + (t * (0.5, 0.6)) + If[i ≥ 0, (0.1, 0), (0, 0)] + (i * UnitVector[Vector[O, A]])]], i, -6, 7) → l2
15. Vector(P + (1.5, 0), Q) → u
16. Segment((0, 8), (0, -6)) → f
17. Polygon(T, U, U + (0, 1), T + (0, 1)) → q2, t_1, u_1, k, l
18. Segment(Q - (0.25, 0), Q + (0.25, 0)) → m
19. Segment(V - (0.25, 0), V + (0.25, 0)) → n
20. Segment(V - (0.25, 0), P) → p
21. Segment(Q - (0.25, 0), T) → q