O = (0, 0)
zcaract = 1
ros = 3
A: (zcaract, 0.0)
B: (zcaract * ros, 0.0)
C: (zcaract / ros, 0.0)
D: (0.5 * zcaract * (ros + 1.0 / ros), 0.0)
c = Circle(D, B)
A': (-(zcaract), 0.0)
t = 2.36 (slider from 0.01 to 3.14, step 0.01)
θ = 1
E: (0.0, 1.0 / tan(t))
d = Circle(E, A')
P, G = Intersect(d, c)
Zimpédance = Vector(O, P)
α = Angle(B, O, P)