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)
A17 = (1.3, -0.65)
A19 = (3.25, 0)
A20 = (4.55, -1.3)
A21 = (5.2, -0.65)
A22 = (2.6, -0.65)
A23 = (3.25, -1.3)
A24 = (3.9000000000000004, -0.65)
A25 = (5.8500000000000005, -1.3)
A26 = (1.3, -1.9500000000000002)
A27 = (2.6, -1.9500000000000002)
A28 = (3.9000000000000004, -1.9500000000000002)
A29 = (5.2, -1.9500000000000002)
A30 = (1.9500000000000002, -2.6)
A31 = (3.25, -2.6)
A32 = (4.55, -2.6)
A33 = (5.8500000000000005, -2.6)
A34 = (5.8500000000000005, 2.6)
A35 = (6.5, 1.9500000000000002)
A36 = (5.8500000000000005, 1.3)
A37 = (6.5, 0.65)
A38 = (5.8500000000000005, 0)
A39 = (6.5, -0.65)
A40 = (6.5, -1.9500000000000002)
B17 = Point(Circle[A17, 0.55])
C17 = Rotate(A17 - (0.08, 0.65), Angle[A17 + (0, 1), A17, B17], A17)
D17 = Rotate(A17 - ((-0.08), 0.65), Angle[A17 + (0, 1), A17, B17], A17)
A18 = (1.9500000000000002, -1.3)
B18 = Point(Circle[A18, 0.55])
C18 = Rotate(A18 - (0.08, 0.65), Angle[A18 + (0, 1), A18, B18], A18)
D18 = Rotate(A18 - ((-0.08), 0.65), Angle[A18 + (0, 1), A18, B18], A18)
B19 = Point(Circle[A19, 0.55])
C19 = Rotate(A19 - (0.08, 0.65), Angle[A19 + (0, 1), A19, B19], A19)
D19 = Rotate(A19 - ((-0.08), 0.65), Angle[A19 + (0, 1), A19, B19], A19)
B20 = Point(Circle[A20, 0.55])
C20 = Rotate(A20 - (0.08, 0.65), Angle[A20 + (0, 1), A20, B20], A20)
D20 = Rotate(A20 - ((-0.08), 0.65), Angle[A20 + (0, 1), A20, B20], A20)
B21 = Point(Circle[A21, 0.55])
C21 = Rotate(A21 - (0.08, 0.65), Angle[A21 + (0, 1), A21, B21], A21)
D21 = Rotate(A21 - ((-0.08), 0.65), Angle[A21 + (0, 1), A21, B21], A21)
B22 = Point(Circle[A22, 0.55])
C22 = Rotate(A22 - (0.08, 0.65), Angle[A22 + (0, 1), A22, B22], A22)
D22 = Rotate(A22 - ((-0.08), 0.65), Angle[A22 + (0, 1), A22, B22], A22)
B23 = Point(Circle[A23, 0.55])
C23 = Rotate(A23 - (0.08, 0.65), Angle[A23 + (0, 1), A23, B23], A23)
D23 = Rotate(A23 - ((-0.08), 0.65), Angle[A23 + (0, 1), A23, B23], A23)
B24 = Point(Circle[A24, 0.55])
C24 = Rotate(A24 - (0.08, 0.65), Angle[A24 + (0, 1), A24, B24], A24)
D24 = Rotate(A24 - ((-0.08), 0.65), Angle[A24 + (0, 1), A24, B24], A24)
B25 = Point(Circle[A25, 0.55])
C25 = Rotate(A25 - (0.08, 0.65), Angle[A25 + (0, 1), A25, B25], A25)
D25 = Rotate(A25 - ((-0.08), 0.65), Angle[A25 + (0, 1), A25, B25], A25)
B26 = Point(Circle[A26, 0.55])
C26 = Rotate(A26 - (0.08, 0.65), Angle[A26 + (0, 1), A26, B26], A26)
D26 = Rotate(A26 - ((-0.08), 0.65), Angle[A26 + (0, 1), A26, B26], A26)
B27 = Point(Circle[A27, 0.55])
C27 = Rotate(A27 - (0.08, 0.65), Angle[A27 + (0, 1), A27, B27], A27)
D27 = Rotate(A27 - ((-0.08), 0.65), Angle[A27 + (0, 1), A27, B27], A27)
B28 = Point(Circle[A28, 0.55])
C28 = Rotate(A28 - (0.08, 0.65), Angle[A28 + (0, 1), A28, B28], A28)
D28 = Rotate(A28 - ((-0.08), 0.65), Angle[A28 + (0, 1), A28, B28], A28)
B29 = Point(Circle[A29, 0.55])
C29 = Rotate(A29 - (0.08, 0.65), Angle[A29 + (0, 1), A29, B29], A29)
D29 = Rotate(A29 - ((-0.08), 0.65), Angle[A29 + (0, 1), A29, B29], A29)
B30 = Point(Circle[A30, 0.55])
C30 = Rotate(A30 - (0.08, 0.65), Angle[A30 + (0, 1), A30, B30], A30)
D30 = Rotate(A30 - ((-0.08), 0.65), Angle[A30 + (0, 1), A30, B30], A30)
B31 = Point(Circle[A31, 0.55])
C31 = Rotate(A31 - (0.08, 0.65), Angle[A31 + (0, 1), A31, B31], A31)
D31 = Rotate(A31 - ((-0.08), 0.65), Angle[A31 + (0, 1), A31, B31], A31)
B32 = Point(Circle[A32, 0.55])
C32 = Rotate(A32 - (0.08, 0.65), Angle[A32 + (0, 1), A32, B32], A32)
D32 = Rotate(A32 - ((-0.08), 0.65), Angle[A32 + (0, 1), A32, B32], A32)
B33 = Point(Circle[A33, 0.55])
C33 = Rotate(A33 - (0.08, 0.65), Angle[A33 + (0, 1), A33, B33], A33)
D33 = Rotate(A33 - ((-0.08), 0.65), Angle[A33 + (0, 1), A33, B33], A33)
B34 = Point(Circle[A34, 0.55])
C34 = Rotate(A34 - (0.08, 0.65), Angle[A34 + (0, 1), A34, B34], A34)
D34 = Rotate(A34 - ((-0.08), 0.65), Angle[A34 + (0, 1), A34, B34], A34)
B35 = Point(Circle[A35, 0.55])
C35 = Rotate(A35 - (0.08, 0.65), Angle[A35 + (0, 1), A35, B35], A35)
D35 = Rotate(A35 - ((-0.08), 0.65), Angle[A35 + (0, 1), A35, B35], A35)
B36 = Point(Circle[A36, 0.55])
C36 = Rotate(A36 - (0.08, 0.65), Angle[A36 + (0, 1), A36, B36], A36)
D36 = Rotate(A36 - ((-0.08), 0.65), Angle[A36 + (0, 1), A36, B36], A36)
B37 = Point(Circle[A37, 0.55])
C37 = Rotate(A37 - (0.08, 0.65), Angle[A37 + (0, 1), A37, B37], A37)
D37 = Rotate(A37 - ((-0.08), 0.65), Angle[A37 + (0, 1), A37, B37], A37)
B38 = Point(Circle[A38, 0.55])
C38 = Rotate(A38 - (0.08, 0.65), Angle[A38 + (0, 1), A38, B38], A38)
D38 = Rotate(A38 - ((-0.08), 0.65), Angle[A38 + (0, 1), A38, B38], A38)
B39 = Point(Circle[A39, 0.55])
C39 = Rotate(A39 - (0.08, 0.65), Angle[A39 + (0, 1), A39, B39], A39)
D39 = Rotate(A39 - ((-0.08), 0.65), Angle[A39 + (0, 1), A39, B39], A39)
B40 = Point(Circle[A40, 0.55])
C40 = Rotate(A40 - (0.08, 0.65), Angle[A40 + (0, 1), A40, B40], A40)
D40 = Rotate(A40 - ((-0.08), 0.65), Angle[A40 + (0, 1), A40, B40], A40)