0

0

1

1

x

y

L = Point(xAxis)
A = Point({1, 0})
B = Point(xAxis)
a = OrthogonalLine(L, xAxis)
left = OrthogonalLine(A, xAxis)
right = OrthogonalLine(B, xAxis)
F = Point(a)
D = Point(left)
E = Point({x(B), y(D)})
d = Line(F, A)
e = Line(F, D)
C = Intersect(right, d)
b: y(C) / y(E)
G = Intersect(right, e)
m: (y(G) - y(C)) / y(E)
H = Point(left)
c = Line(F, H)
I = Intersect(right, c)
in: y(H) / y(D)
out: y(I) / y(E)
text1: "y = " + m + "x + " + b + ""
f = OrthogonalLine(A, left)
text2: "x = " + in + ""
text3: "y = " + out + ""