DF = bc/a  , da cui : AF = (ad+bc)/a 
B_1A = altezza del triangolo ABF equiv. a ABCD
retta a_2 = parallela per B_1 a AF
Con centro in A e raggio 2 si interseca a_2 in B
retta t = parallela a BD per F 
Con centro in B e raggio 1 si interseca t in C 

B_1A = 2S/AF =1.782

Area ABCD =\sqrt{1*2*3*4  } = 4.899

A = Intersect(xAxis, yAxis)
D = Point(xAxis)
F = Point(xAxis)
B_1 = (-0.002701773115350253, 1.7816116832405828)
a_2 = Line(B_1, xAxis)
c_2 = Circle(A, 2.0)
B = Intersect(c_2, a_2, 2.0)
b_2 = Ray(A, B)
d_2 = Segment(B, D)
t = Line(F, d_2)
g = Circle(B, 1.0)
C = Intersect(g, t, 2.0)
distanzaCD = Distance(C, D)
poli1, a, b, c, d = Polygon(A, B, C, D)
Testopoli1: "Area " + (Name[A]) + (Name[B]) + (Name[C]) + (Name[D]) + " = " + poli1
E = Intersect(t, b_2)
e = Segment(B, F)
distanzaAD = Distance(A, D)
distanzaAB = Distance(A, B)
f = Distance(d, c)
distanzaDF = Distance(D, F)
TestoDF: "\overline{" + (Name[D]) + (Name[F]) + "} \, = \, " + distanzaDF
distanzaB1A = Distance(B_1, A)
h = Distance(B_1, A)