垂直弹簧振子模型

GeoGebra 命令及参数

1. Point(yAxis) → B
2. Point(Circle[B, abs(l_{eq})]) → O
3. Intersect(f, yAxis) → P
4. Midpoint(P, O) → M
5. Ray(P, O) → l
6. Line(O, xAxis) → b
7. Point(b) → Z
8. Segment(B, P) → Spring
9. Line(B, xAxis) → a
10. Vector(P, W') → W
11. If(v' ≥ 0, (x(P), y(P) + sgn(v')), (x(W'), y(W') + sgn(v'))) → H'
12. Vector(P, H') → H
13. Midpoint(B, P) → S
14. Vector(S, S') → s
15. Vector(I, I') → i
16. Point(a) → V
17. Intersect(xAxis, yAxis) → O''
18. Point(Circle[B, 1]) → E
19. Polygon(B, E, E', E'', E''') → Ceiling, h', h'', h''', h'''', h
20. CurveCartesian(Width * sin(t), Spring * t / (2 * π * Loops) + Coiling * cos(t) - Coiling + y(P), t, 0, 2 * π * Loops) → Coil
21. Line(V, yAxis) → j'
22. Intersect(j', b) → V'
23. Midpoint(V, V') → V''
24. Vector(V'', V) → v'_1
25. Vector(V'', V') → v''
26. Line(P, xAxis) → j
27. Point(a) → U
28. Line(U, yAxis) → a'
29. Intersect(j, a') → U'
30. Midpoint(U, U') → U''
31. Vector(U'', U) → u
32. Vector(U'', U') → u'
33. Line(Z, yAxis) → b'
34. Intersect(j, b') → Z'
35. Midpoint(Z, Z') → Z''
36. Vector(Z'', Z) → z'
37. Vector(Z'', Z') → z
38. Point(Circle[B, abs(l_0)]) → F
39. Segment(B, F) → BF
40. Line(F, xAxis) → c'
41. Point(a) → G
42. Line(G, yAxis) → a''
43. Intersect(c', a'') → G'
44. Midpoint(G, G') → G''
45. Vector(G'', G) → g'
46. Vector(G'', G') → g''