b = 1.8 (slider from -50 to 50, step 0.1)
a = -0.15 (slider from -2 to 0, step 0.01)
t = 38 (slider from 0 to 200, step 0.1)
xM: 0.06 * t
yM: a * xM^(2) + b * xM
M: (xM, yM)
f = Function(a * x^(2) + b * x, 0, 12)
image1' = Rotate(image1, atan(f'(x(M))), M)
liste1 = Sequence((i, -0.15 * i * i + 1.8 * i), i, 0, xM, 0.2)