A = (1.016784766842118, -2.851879803097509)
B = (2.455175162384501, -2.851879803097509)
A1: 0
A2: cos(A1)
B1: A1 + 0.1 + abs(A2) / 2
B2: cos(B1)
C1: B1 + 0.1 + abs(B2) / 2
C2: cos(C1)
D1: C1 + 0.1 + abs(C2) / 2
D2: cos(D1)
E1: D1 + 0.1 + abs(D2) / 2
E2: cos(E1)
F1: E1 + 0.1 + abs(E2) / 2
F2: cos(F1)
G1: F1 + 0.1 + abs(F2) / 2
G2: cos(G1)
H1: G1 + 0.1 + abs(G2) / 2
H2: cos(H1)
I1: H1 + 0.1 + abs(H2) / 2
I2: cos(I1)
J1: I1 + 0.1 + abs(I2) / 2
J2: cos(J1)
A3: image1
C = (4.475042526337635, -2.943691956004468)
D = (0.9555766649041442, -0.31174357267160324)
liste1 = Sequence(Sequence[Translate[image1, (k * (C - A)) + (l * (D - A))], k, -5, 5], l, -5, 5)
liste2 = Sequence(Sequence[Translate[Mirror[image1, Line[(0, 0), (0, 1)]], (k * (C - A)) + (l * (D - A))], k, -5.5, 5], l, -5.5, 5)