O = Intersect(xAxis, yAxis)
l2 = Sequence(Segment[(i, 0), (i, 5)], i, 1, 5)
l1 = Sequence(Segment[(0, i), (5, i)], i, 1, 5)
G_1: (1, 0)
G_2: (6, 0)
G_3: (0, 1)
G_4: (0, 5)
gi = Vector(G_1, G_2)
e1 = Vector(O, G_1)
e2 = Vector(O, G_3)
gi2 = Segment(G_4, G_3)
A1: 5
B1: 7
A2: -2
B2: 8
A4: 3
B4: -4
A5: 4
B5: 3
A7: 6
B7: 4
A8: -2
B8: 15
A10: -3
B10: 4
A11: 4
B11: 3
A13: 1
B13: 1 / 2
A14: 0
B14: 3 / 2
A16: 1
A17: 1
B17: 1 / 2
B16: 1 / 2
A19: 3 / 2
B19: 0
A20: 0
B20: 3 / 2
A22: 1
B22: 1 / 2
A23: 0
m1: {{A1, B1}, {A2, B2}}
m2: {{A4, B4}, {A5, B5}}
m3: {{A7, B7}, {A8, B8}}
m4: {{A10, B10}, {A11, B11}}
m5: {{A13, B13}, {A14, B14}}
m6: {{A16, B16}, {A17, B17}}
m7: {{A19, B19}, {A20, B20}}
B23: 1
m8: {{A22, B22}, {A23, B23}}
GB2: (m3 * Vector[(0, 5)] / 7)
GB1: (m3 * Vector[(6, 0)] / 7)
E1': (m3 * Vector[(1, 0)] / 7)
E2': (m3 * Vector[(0, 1)] / 7)
e1' = Vector(O, E1')
e2' = Vector(O, E2')
g1 = Vector(E1', GB1)
g = Segment(E2', GB2)
A = Point(l1)
A': (m3 * Vector[A] / 7)
u = Vector(O, A)
v = Vector(O, A')
B = Point(l1)
l3 = Sequence(Segment[(m3 * Vector[(0, i)] / 7), (m3 * Vector[(5, i)] / 7)], i, 1, 5)
l4 = Sequence(Segment[(m3 * Vector[(i, 0)] / 7), (m3 * Vector[(i, 5)] / 7)], i, 1, 5)
B': (m3 * Vector[B] / 7)
C = Point(l4)
w = Vector(O, C)
D = Point(l4)
a = Vector(O, D)
D' = Point(l4)
b = Vector(D, D')
C': C
E = (8.694604741415539, -3.264814252515431)
F = (11.168281810698664, -3.264814252515431)