Pantographe
Clic droit sur M et H pour afficher la trace.
Puis déplacer M à l'intérieur du cercle pour dessiner.

a = 1.7 (slider from 0 to 2.5, step 0.1)
O = (-2.74, 0.84)
M = (1.719999999999998, 2.4999999999999982)
c = Circle(M, 5.0 - a)
d = Circle(O, 5.0 - 10.0 * a / (a + 5.0))
A, B = Intersect(d, c)
e = Circle(A, 5.0)
b = Line(O, A)
C, D = Intersect(e, b)
f = Line(A, M)
g = Circle(M, a)
E, F = Intersect(g, f)
h = Line(O, M)
k = Circle(D, 10.0)
G, H = Intersect(k, h)
i = Line(D, H)
p = Circle(F, 5.0)
I, J = Intersect(c, i)
K = Midpoint(D, H)
j = Segment(O, D)
l = Segment(D, H)
m = Segment(F, A)
n = Segment(F, K)
q = Circle(O, 10.0 - a - 10.0 * a / (a + 5.0))
r = Line(F, K)
s = Line(F, A)
t = Line(F, D)
a_1 = Line(M, t)
b_1 = Line(O, t)
c_1 = Line(H, t)
L = Intersect(s, b_1)
N = Intersect(a_1, j)
P = Intersect(r, c_1)
d_1 = Segment(O, L)
e_1 = Segment(N, M)
f_1 = Segment(D, F)
g_1 = Segment(P, H)
h_1 = Segment(A, L)
i_1 = Segment(K, P)
texte2: "AM = " + (Distance[A, M])
texte3: "MF = " + (Distance[M, F])
Q = (3, 3)
R = (2, 2)
S = (4, 2)
T = Point(xAxis)
U = Point(xAxis)
j_1 = Segment(Q, R)
k_1 = Segment(U, R)
l_1 = Segment(U, T)
m_1 = Segment(T, R)
n_1 = Segment(R, S)
p_1 = Segment(S, T)
q_1 = Segment(S, Q)
r_1 = Segment(U, S)
o: 1.35 - a / 3.0
Q' = Dilate(Q, o, O)
R' = Dilate(R, o, O)
s_1 = Segment(Q', R')
U' = Dilate(U, o, O)
R'_1 = Dilate(R, o, O)
t_1 = Segment(U', R'_1)
U'_1 = Dilate(U, o, O)
T' = Dilate(T, o, O)
a_2 = Segment(U'_1, T')
T'_1 = Dilate(T, o, O)
R'_2 = Dilate(R, o, O)
b_2 = Segment(T'_1, R'_2)
R'_3 = Dilate(R, o, O)
S' = Dilate(S, o, O)
c_2 = Segment(R'_3, S')
S'_1 = Dilate(S, o, O)
T'_2 = Dilate(T, o, O)
d_2 = Segment(S'_1, T'_2)
S'_2 = Dilate(S, o, O)
Q'_1 = Dilate(Q, o, O)
e_2 = Segment(S'_2, Q'_1)
U'_2 = Dilate(U, o, O)
S'_3 = Dilate(S, o, O)
f_2 = Segment(U'_2, S'_3)