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
36
37
38
|
\begin{tikzpicture}
\pgfmathsetmacro{\k}{.8}
\pgfmathsetmacro{\lpos}{.5}
\pgfmathsetmacro{\l}{5}
\pgfmathsetmacro{\vpos}{2}
% block
%% needs \usetikzlibrary{patterns}
\draw[pattern=north west lines, thick] (\lpos,0) rectangle ++(\l,-.2);
\draw[<->] (\lpos,-.4) -- node[midway, below] {\(\ell\)} ++(\l,0);
% boundary line and area
\fill [domain=0:\l, variable=\t, smooth, red!10]
(\lpos,0)
-- plot ({\lpos + \t},{\k*sqrt(\t)})
-- (\lpos + \l,0)
-- cycle;
\draw[domain=0:\l, variable=\t, smooth, thick, red] (0,0)
plot ({\lpos + \t},{\k*sqrt(\t)});
% height
\pgfmathsetmacro{\h}{\k*sqrt(\l)}
\draw[<->] (\lpos,0) ++(\l,0) -- node[midway, right] {\(D_\text{l}\)} ++(0,\h);
% velocity vectors
\draw[dashed] (\vpos,0) -- ++(0,2);
\draw[->, thick] (\vpos, 1.5) -- node[at start, anchor=east, left] {\(v_0\)} ++(1,0);
\draw[->, thick] (\vpos, 0.5) -- node[at start, anchor=east, left] {\(v_x\)} ++(.3,0);
% text
\node at (4,.5) {mitgezogen};
\node at (4,2) {keine Wirkung};
% axis
\draw[->] (-.5,0) -- (\l + 1.5,0) node[anchor=west] {\(x\)};
\draw[->] (0,-.5) -- (0,2.5) node[anchor=south] {\(y\)};
\end{tikzpicture}
|
