A1 = (1.9500000000000002, 2.6)
B1 = Point(Circle[A1, 0.55])
C1 = Rotate(A1 - (0.08, 0.65), Angle[A1 + (0, 1), A1, B1], A1)
D1 = Rotate(A1 - ((-0.08), 0.65), Angle[A1 + (0, 1), A1, B1], A1)
A2 = (1.3, 1.9500000000000002)
A3 = (5.2, 0.65)
A4 = (4.55, 0)
A5 = (1.9500000000000002, 1.3)
A6 = (3.25, 1.3)
A7 = (1.9500000000000002, 0)
A8 = (3.9000000000000004, 1.9500000000000002)
A9 = (1.3, 0.65)
A10 = (3.9000000000000004, 0.65)
A11 = (3.25, 2.6)
A12 = (2.6, 1.9500000000000002)
B2 = Point(Circle[A2, 0.55])
B3 = Point(Circle[A3, 0.55])
B4 = Point(Circle[A4, 0.55])
B5 = Point(Circle[A5, 0.55])
B6 = Point(Circle[A6, 0.55])
B7 = Point(Circle[A7, 0.55])
B8 = Point(Circle[A8, 0.55])
B9 = Point(Circle[A9, 0.55])
B10 = Point(Circle[A10, 0.55])
B11 = Point(Circle[A11, 0.55])
B12 = Point(Circle[A12, 0.55])
C2 = Rotate(A2 - (0.08, 0.65), Angle[A2 + (0, 1), A2, B2], A2)
C3 = Rotate(A3 - (0.08, 0.65), Angle[A3 + (0, 1), A3, B3], A3)
C4 = Rotate(A4 - (0.08, 0.65), Angle[A4 + (0, 1), A4, B4], A4)
C5 = Rotate(A5 - (0.08, 0.65), Angle[A5 + (0, 1), A5, B5], A5)
C6 = Rotate(A6 - (0.08, 0.65), Angle[A6 + (0, 1), A6, B6], A6)
C7 = Rotate(A7 - (0.08, 0.65), Angle[A7 + (0, 1), A7, B7], A7)
C8 = Rotate(A8 - (0.08, 0.65), Angle[A8 + (0, 1), A8, B8], A8)
C9 = Rotate(A9 - (0.08, 0.65), Angle[A9 + (0, 1), A9, B9], A9)
C10 = Rotate(A10 - (0.08, 0.65), Angle[A10 + (0, 1), A10, B10], A10)
C11 = Rotate(A11 - (0.08, 0.65), Angle[A11 + (0, 1), A11, B11], A11)
C12 = Rotate(A12 - (0.08, 0.65), Angle[A12 + (0, 1), A12, B12], A12)
D2 = Rotate(A2 - ((-0.08), 0.65), Angle[A2 + (0, 1), A2, B2], A2)
D3 = Rotate(A3 - ((-0.08), 0.65), Angle[A3 + (0, 1), A3, B3], A3)
D4 = Rotate(A4 - ((-0.08), 0.65), Angle[A4 + (0, 1), A4, B4], A4)
D5 = Rotate(A5 - ((-0.08), 0.65), Angle[A5 + (0, 1), A5, B5], A5)
D6 = Rotate(A6 - ((-0.08), 0.65), Angle[A6 + (0, 1), A6, B6], A6)
D7 = Rotate(A7 - ((-0.08), 0.65), Angle[A7 + (0, 1), A7, B7], A7)
D8 = Rotate(A8 - ((-0.08), 0.65), Angle[A8 + (0, 1), A8, B8], A8)
D9 = Rotate(A9 - ((-0.08), 0.65), Angle[A9 + (0, 1), A9, B9], A9)
D10 = Rotate(A10 - ((-0.08), 0.65), Angle[A10 + (0, 1), A10, B10], A10)
D11 = Rotate(A11 - ((-0.08), 0.65), Angle[A11 + (0, 1), A11, B11], A11)
D12 = Rotate(A12 - ((-0.08), 0.65), Angle[A12 + (0, 1), A12, B12], A12)
lista1: {Sequence[Line[(0, (1.3 * k)), (1, (1.3 * k))], k, -8, 7], Sequence[Line[((1.3 * k), 0), ((1.3 * k), 1)], k, -5, 16]}
A13 = (5.2, 1.9500000000000002)
A14 = (2.6, 0.65)
A15 = (4.55, 2.6)
A16 = (4.55, 1.3)
B13 = Point(Circle[A13, 0.55])
B14 = Point(Circle[A14, 0.55])
B15 = Point(Circle[A15, 0.55])
B16 = Point(Circle[A16, 0.55])
C13 = Rotate(A13 - (0.08, 0.65), Angle[A13 + (0, 1), A13, B13], A13)
C14 = Rotate(A14 - (0.08, 0.65), Angle[A14 + (0, 1), A14, B14], A14)
C15 = Rotate(A15 - (0.08, 0.65), Angle[A15 + (0, 1), A15, B15], A15)
C16 = Rotate(A16 - (0.08, 0.65), Angle[A16 + (0, 1), A16, B16], A16)
D13 = Rotate(A13 - ((-0.08), 0.65), Angle[A13 + (0, 1), A13, B13], A13)
D14 = Rotate(A14 - ((-0.08), 0.65), Angle[A14 + (0, 1), A14, B14], A14)
D15 = Rotate(A15 - ((-0.08), 0.65), Angle[A15 + (0, 1), A15, B15], A15)
D16 = Rotate(A16 - ((-0.08), 0.65), Angle[A16 + (0, 1), A16, B16], A16)