zoom

1·10⁹

Magnify:

list1 = Sequence(Segment[(0 + i, -0.12), (0 + i, 0.12)], i, 0, 10, 1)
A_1 = Point(xAxis)
a = -3 (slider from -3 to 0, step 0.01)
g: y = a
C_1 = Point(g)
D_1 = Point(g)
h = Line(C_1, A_1)
b = 1 (slider from 1 to 10, step 0.1)
B_1: (x(A_1) + 1, 0)
f = Segment(A_1, B_1)
i = Line(B_1, D_1)
E_1 = Intersect(h, i)
A' = Dilate(A_1, b, E_1)
B' = Dilate(B_1, b, E_1)
f' = Segment(A', B')
list2 = Sequence(Segment[(x(A') + i, y(A') + (0.01 * b)), (x(A') + i, y(A') - (0.01 * b))], i, 0, b, b / 10)
a_1: y = 0
A_2: (0, 0)
length_1 = 1 (slider from 0 to 10, step 0.1)
D_2 = Point(a_1)
c_1 = Segment(A_2, D_2)
jump_1 = 1 (slider from 0 to 50, step 1)
xOffSet_1 = -0.65 (slider from -1 to 1, step 0.05)
yOffSet_1 = -0.45 (slider from -1 to 1, step 0.05)
E_2: (0, 0)
G_2: (length_1, 0)
list1_1 = Sequence(((length_1 * k), 0), k, 0, 10)
B_2: (10.2, -0.13)
F_2: (x(B_2), (-y(B_2)))
text1_1 = Sequence(Text[(p * jump_1), ((length_1 * p) + (0.5 * xOffSet_1), y(A_2) + yOffSet_1)], p, 1, 10)
text2_1 = Text(0, (x(A_2) - 0.05, y(A_2) + yOffSet_1))
C_2: (x(B_2) + 0.4, y(B_2))
n: x(A_1)
list2_1 = Sequence(Text[((p * jump_1) * "∙10⁸"), ((length_1 * p) + (0.5 * xOffSet_1), y(A_2) + yOffSet_1)], p, 1, 9)
list3 = Sequence(Text[((n + (p * 0.1)) * "∙10⁸"), ((length_1 * p) + (0.5 * xOffSet_1), y(A') + yOffSet_1)], p, 0, 10)
j = Segment(A_1, A')
l = Segment(B_1, B')
c = 1.91 (slider from 1.5 to 2, step 0.01)
F_1: (x(A') - (0.1 * b), ((-1.2 * c) * b))
G_1: (x(B') + (0.1 * b), ((-1.2 * c) * b))
d = IsInteger(x(A_1))

Tool: Angle
Angle[ <Point> ]
Input: L_1
Output: α, A, U_1, f, j

Move

Turn

p = Circle(L_1, 10)
U_1 = Point(p)
j = Segment(U_1, L_1)
A = Rotate(U_1, 50°, L_1)
α = Angle(U_1, L_1, A)
f = Segment(L_1, A)

Tool: Tool1
Tool1[ <Point> ]
Input: A
Output: f, g, h, poly1

c = Circle(A, 1)
B = Point(c)
B' = Rotate(B, 60°, A)
poly1, b', a, b = Polygon(A, B, B')
f = Segment(B', B)
g = Segment(B, A)
h = Segment(A, B')

Tool: Tool2
Tool2[ <Point> ]
Input: A
Output: f, g, h, i, poly1

c = Circle(A, 1)
B = Point(c)
B' = Rotate(B, 60°, A)
B'' = Rotate(B', 60°, A)
poly1, b'', b', b, a = Polygon(B'', B', B, A)
f = Segment(B'', B')
g = Segment(B', B)
h = Segment(B, A)
i = Segment(A, B'')

Tool: Tool3
Tool3[ <Point> ]
Input: A
Output: f, g, h, i, poly1

c = Circle(A, 1)
B = Point(c)
B' = Rotate(B, 60°, A)
B'' = Rotate(B', 60°, A)
B''' = Rotate(B'', 60°, A)
poly1, b''', b, b', b'' = Polygon(B''', B, B', B'')
f = Segment(B''', B)
g = Segment(B, B')
h = Segment(B', B'')
i = Segment(B'', B''')

Tool: Tool4
Tool4[ <Point> ]
Input: A
Output: poly1, f, g, h, i, j, k

c = Circle(A, 1)
B = Point(c)
B' = Rotate(B, 60°, A)
B'' = Rotate(B', 60°, A)
B''' = Rotate(B'', 60°, A)
C = Rotate(B''', 60°, A)
C' = Rotate(C, 60°, A)
poly1, b''', b'', b', b, c', c_1 = Polygon(B''', B'', B', B, C', C)
f = Segment(B'', B')
g = Segment(B', B)
h = Segment(B, C')
i = Segment(C', C)
j = Segment(C, B''')
k = Segment(B''', B'')