p0 = (-5, 2)
p1 = (-1, 2)
f = Line(p0, p1)
p1_2 = (-5, 6)
g = Line(p0, p1_2)
A = Point(f)
h = Line(p1, p1_2)
j = Line(A, p1_2)
i = Line(A, h)
B = Intersect(g, i)
k = Line(B, j)
Asquared = Intersect(f, k)