Rugóra függesztett test

Körmozgást végző test

P

K

φ = 0.7853981633974483 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
a = 274 (slider from 0 to 1080, step 1)
A = Point(xAxis)
c = Circle(A, 2)
B = Intersect(c, xAxis, 2)
B' = Rotate(B, a ° + φ, A)
radianalfa: a 3.141592653589793 / 180
T1: "t = " + (a / 100) + " s"
b = Segment(A, B')
C = Point(xAxis)
d = Line(A, B)
e = OrthogonalLine(C, d)
f = Line(B', d)
D = Intersect(e, f)
P: (radianalfa, y(B'))
g = OrthogonalLine(P, d)
h = OrthogonalLine(B', d)
E = Intersect(d, h)
F = Intersect(g, d)
i = Segment(A, E)
j = Segment(B', E)
k = Segment(P, F)
m = Segment(B', D)
n = Segment(D, P)
T4: "t = " + (a / 100) + " s"
H = (-2.9318139116791793, 2.7114479568910395)
α = Angle(B, A, B')
I = Rotate(B, φ, A)
T6: "φ = " + φ