A = (1, 0.16)
B = (2, 0.01)
a = Line(A, B)
C = (1, 0.35)
D = (2, 0.2)
d = Line(C, D)
E = Point(a)
b = Line(E, yAxis)
k(x) = -0.15 x
F = Intersect(k, b)
distanceFE = Distance(F, E)
TexteFE: "\overline{" + (Name[F]) + (Name[E]) + "} \, = \, " + distanceFE