INICIAR

Altura

tiempo

P

t = 11.786 (slider from 0 to 18.9)
A = Point(xAxis)
B = Intersect(xAxis, yAxis)
c = Circle(A, B)
P = Rotate(B, t, A)
α = Angle(B, A, P)
a: (π * 4)
b: (4 * 3.1416)
p: (4 * π / 12)
B'_1 = Rotate(B, t - 1, A)
β = Angle(B, A, B'_1)
B'_2 = Rotate(B, t - 2, A)
γ = Angle(B, A, B'_2)
f = Line(B'_2, A)
g = Line(B'_1, A)
h = Line(P, A)
C, D = Intersect(c, f)
E, F = Intersect(c, g)
G, H = Intersect(c, h)
i = Segment(H, P)
j = Segment(E, F)
l = Segment(A, D)
I = (0.44, -2.98)
m = Segment(A, I)
J = (3.46, -3.02)
n = Segment(A, J)
K = (0.16, -3)
L = (0.7, -3)
q = Segment(K, L)
M = (3, -3)
N = (3.74, -2.98)
r = Segment(M, N)
k = Segment(A, B'_2)
s = OrthogonalLine(F, xAxis)
O = Intersect(s, xAxis)
distanciaOF = Distance(O, F)
TextoOF: Name[O] + (Name[F]) + " = " + distanciaOF
d = OrthogonalLine(E, yAxis)
P_1 = Intersect(yAxis, d)
Q = Intersect(yAxis, xAxis)
R = Point(Circle[Q, t])
e = Segment(Q, R)
f_1 = OrthogonalLine(R, xAxis)
g_1 = OrthogonalLine(P_1, yAxis)
S = Intersect(f_1, g_1)
h_1 = Segment(S, R)
T = Point(xAxis)
i_1 = OrthogonalLine(T, xAxis)
j_1 = OrthogonalLine(P, yAxis)
V = Intersect(i_1, j_1)
W: (27 - t, 0)
k_1 = OrthogonalLine(W, xAxis)
U = Intersect(k_1, j_1)
s_1(x) = If[x ≥ 8, 0.02 + (2.02 * sin(x - 1.85))]
Altura: y(P)
texto1: "" + Altura + ""
tie: x(W)
texto2: "" + tie + ""