Author: Giuseppe Musolino

Punto D

Lunghezza siepe

A = Intersect(xAxis, yAxis)
B = (0, 300)
C = (400, 0)
poli1, a, b_1, c = Polygon(B, C, A)
b = 111.7 (slider from 0 to 200, step 0.1)
D: (b, 0)
d_1 = Line(B, C)
E: (400 - 80000 / (400 - b), 60000 / (400 - b))
e = Segment(D, E)
distanzaDe = Distance(D, e)
d = 99.5 (slider from 0 to 150, step 0.1)
F: (0, d)
G: (60000 / (300 - d), 300 - 45000 / (300 - d))
f = Segment(F, G)
H = Point(a)
I = Point(yAxis)
J = Point(a)
distanzaBI = Distance(B, I)