Moving contact line

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
\documentclass[border=10pt]{standalone}
\usepackage{asymptote}
\begin{document}
\begin{asy}[width=\the\linewidth,inline=true]
unitsize(1cm);
path a = (1,2.4)--(4,0.6)..(4.5,1)..(4.1,1.9)..(3.9,2)..cycle;
draw(a);
fill(a,cyan);
path b = (0,3)--(5,0);
draw(b,linewidth(2));
path c = shift(4,0.6)*scale(0.6)*unitcircle;
draw(c,red+dashed);
path d = (5,1.2)--(6,1.8);
draw(d,EndArrow);
path e = shift(8,3)*scale(2)*unitcircle;
draw(e,red+dashed);
path f = (9.4,1.6)--(6.1,3.58);
draw(f,linewidth(2));
path g = (8,2.44)..(8.8,3.2)..(8.6,3.8)..(8.4,4.1);
draw(g,dashed);
dot(g,red);
label("$a_0,a_1$",(8,2.44),SW);
label("$b_0$",(8.8,3.2),W);
label("$c_0$",(8.6,3.8),W);
\end{asy}
\end{document}
end{asy}
end{document}
 
 
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

Source: TeX.SE

Author: Aashutosh (License)