H = 10 (slider from 0 to 10, step 0.1)
h = 6.7 (slider from 0 to H, step 0.1)
g = 9.81
v_0: sqrt(((2 * g) * (H - h)))
a_s: (sqrt((2 * h / g)) * v_0)
M_s: (a_s, 0)
f(x) = ((-g) * x^(2) / ((2 * v_0^(2)))) + h
f_1 = Function(f, 0, a_s)
S: (0, H + 0.5)
T: ((-2), y(S))
U: (x(T), 0)
O = (0, 0)
poly1, t, s, o, u = Polygon(T, S, O, U)
S_1: (0, H)
T_1: (x(T), H)
poly2, t_1, s_1, o_1, u_1 = Polygon(T_1, S_1, O, U)
R = (-3.4, 12)
A = (-1, 12)
B: (x(A), 0.1)
a = Segment(A, B)
R_1: (x(R), y(R) + 2.5)