r = 1.2 (slider from -5 to 5, step 0.05)
a = (-0.10652417305688076, 0.28687296360084535)
b = CurveCartesian((r * cos(t)) + real(a), (r * sin(t)) + imaginary(a), t, -4, 4)
Liste1 = CurveCartesian((r * cos(u)) + real(a) + ((r * cos(u)) + real(a)) / (((r * cos(u)) + real(a))^(2) + ((r * sin(u)) + imaginary(a))^(2)), (r * sin(u)) + imaginary(a) - ((r * sin(u)) + imaginary(a)) / (((r * cos(u)) + real(a))^(2) + ((r * sin(u)) + imaginary(a))^(2)), u, (-π), π)