Geraden einzeichnen, die durch Z gehen

Geraden einzeichnen, die nicht durch Z gehen

A = (3, 1.5)
a = OrthogonalLine(A, xAxis)
C_1 = (2.5327090944739465, 1.9986959959499524)
D = (2.636, 2.484)
C'_1 = Mirror(C_1, a)
D' = Mirror(D, a)
c = Conic(A, C_1, D, D', C'_1)
E_1 = (2.8194792828509185, 1.2321285493844356)
C = Mirror(E_1, a)
poly1, e', b, e = Polygon(A, E_1, C)
k = 1 (slider from -3 to 3, step 0.1)
Z = (1, 1)
c' = Dilate(c, k, Z)
A' = Dilate(A, k, Z)
E'_1 = Dilate(E_1, k, Z)
C' = Dilate(C, k, Z)
poly1', e'', b', e'_1 = Polygon(A', E'_1, C')
A_1, B = Intersect(c, a)
abstandGB = Distance(B, A)
A_2 = (2.875428647568209, 0.8677214707388866)
H = (2.8068847369493564, 1.2447129791425753)
d = CircumcircleArc(A, H, A_2)
I = (2.9611085358417744, 0.5250019176446242)
J = (2.8068847369493564, 0.21655431985978818)
f = CircumcircleArc(A_2, I, J)
B'_1 = Dilate(A, k, Z)
H' = Dilate(H, k, Z)
G'_2 = Dilate(A_2, k, Z)
d' = CircumcircleArc(B'_1, H', G'_2)
G'_1 = Dilate(A_2, k, Z)
I' = Dilate(I, k, Z)
J' = Dilate(J, k, Z)
f' = CircumcircleArc(G'_1, I', J')
B' = Dilate(B, k, Z)
g = Line(Z, A)
h = Line(Z, B)
l = Line(C, A_1)
A'_1 = Dilate(A_1, k, Z)
m = Line(C', A'_1)
j = false
i = false