Große Flasche bewegen

h

A

B

C

D

Z

P

12 cm

18 cm

M = (0.56, 4.26)
E = (8, 4.26)
c = Line(M, E)
W = Point(c)
Y = Point(c)
a = Segment(W, Y)
V = Point(c)
F = Point(c)
b = Segment(V, F)
G = Midpoint(W, Y)
d = OrthogonalLine(G, c)
I = Point(d)
f = Segment(I, G)
bewegen = 0 (slider from -3 to 3, step 0.5)
K = Point(Circle[G, 5.4 + bewegen])
k = Segment(G, K)
L: (6.58 + bewegen, 9.72)
g = Segment(L, K)
i_1 = Segment(G, L)
e = Segment(I, K)
H = Intersect(i_1, e)
i = OrthogonalLine(H, k)
J = Intersect(i, k)
j = Segment(H, J)
A = Midpoint(g)
B = Midpoint(j)