Perpendicular Line through a Point

Joy's Horizontal Kite Method

A and B are any two distinct
points on the line.

\overline{PQ} \perp \overline{AB}

P = (-1.18, 3.04)
B_1 = (-3.62, -0.24)
C = (8.02, 5.0200000000000005)
a = Line(B_1, C)
A = Point(a)
B = Point(a)
c = Circle(A, P)
d = Circle(B, P)
Q = Intersect(c, d, 2)
b = Line(P, Q)