0

0

1

1

x

y

y_2

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 + ""
L_2 = Point(f)
g = OrthogonalLine(L_2, f)
F_2 = Point(g)
h = Line(F_2, D)
i = Line(F_2, A)
j = Line(F_2, H)
J = Intersect(right, h)
K = Intersect(right, j)
M = Intersect(right, i)
b_2: y(M) / y(D)
m_2: (y(J) - y(M)) / y(E)
text5: "x = " + in + ""
out_2: y(K) / y(E)
k = Line(F, F_2)
N = Intersect(left, k)
O = Intersect(right, k)
l = Segment(N, O)
text4: "y_2 = " + m_2 + "x + " + b_2 + ""
text6: "y_2 = " + out_2 + ""