dfasdfad

A = Point(xAxis)
B = Point(yAxis)
a = Segment(B - (0.0, 1.0), B)
b = OrthogonalLine(A, xAxis)
B': B - (0.0, 1.0)
c = OrthogonalLine(B', yAxis)
C = Intersect(b, c)
d = Line(B, C)
D = Intersect(d, xAxis)
lista1: {Polygon[C, B, B']}
T1: "" + (floor(x(A)))
T2: "" + (floor(y(B)))
T3: "" + (floor(x(D)))