pasos = 20 (slider from 5 to 30, step 1)
t = 15.8 (slider from 0 to pasos + 1)
sl = Sequence(Max[0, Min[1, t - s]], s, 1, pasos)
vl: {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1.1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2.1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3.1}
A1 = (-2, -4)
h: (6 * 492 / 396)
A3: A1 + (0, h)
A2: A1 + (6, 0)
A = (-1.22, -2.5)
B = (1.76, -2.52)
C = (0.26, -1.02)
u = Vector(A, B)
v = Vector(A, C)
img1t = Translate(imagen1, (sl(2) * u))
img2t = Translate(imagen1, (sl(4) * v))