e = 3.7 (slider from 2.5 to 7, step 0.1)
A = Intersect(xAxis, yAxis)
B = Point(xAxis)
C = (7, 6)
D = Point(yAxis)
P_1, a, b, c, d = Polygon(A, B, C, D)
P = (1.5, 2.4)
Intersect(d, yAxis)
F: (e, 0)
h = Ray(F, P)
E = Intersect(h, d)
Q, f, a_1, g = Polygon(A, F, E)
G = Point(yAxis)
H = Point(a)
p = Segment(H, P)
h_1 = Segment(P, G)