Zona no accesible

A = (-0.08676, -1.33732)
B = (7.02078, -1.33732)
a = Segment(A, B)
b = OrthogonalLine(A, a)
C = Point(b)
c = OrthogonalLine(C, b)
d = OrthogonalLine(B, a)
D = Intersect(c, d)
polígono1, b_1, a_1, c_1, d_1 = Polygon(B, A, C, D)
P = (1.0919475973511483, 0.5832120146935611)
Q = (5.312024899331521, 0.6954481131504859)
P' = Mirror(P, a_1)
P'' = Mirror(P', a)
e = Segment(Q, P'')
F = Intersect(e, a)
f = Segment(P', F)
E = Intersect(a_1, f)
g = Segment(P, E)
h = PolyLine(P, E, F, Q)
i = Line(P'', A)
G = Intersect(i, c_1)
polígono2, g_1, a_2, c_2 = Polygon(A, C, G)
Zona = false