A = (0.8237866570378589, 5.117624874535161)
B = (9.941148782145456, 5.181831650064088)
D = (-1.3378414524360078, -0.23293975287540147)
t1, c, a, b = Polygon(A, B, D)
C = Intersect(Line[B, b], Line[D, c])
t2, c_1, b_1, d = Polygon(B, C, D)
A_1 = Point(c)
C_1 = Point(c_1)
f = Segment(A, C_1)
g = Segment(C, A_1)
P = Intersect(f, g)
e = Circle(A, A_1, P)
h = Circle(C, C_1, P)
Q = Intersect(e, h, 2)
i = Segment(P, D)
j = Segment(Q, B)
α = Angle(P, D, A)
β = Angle(A, B, Q)
E = Intersect(Line[A, D], Line[C, P])
k = Line(A, D)
l = Segment(C, E)