% !TEX encoding = UTF-8 Unicode
% J.Roussel
% Ce document regroupe les codes TIKZ des figures utilisées pour le cours "TRANSFERTS THERMIQUES" situé à la page http://femto-physique.fr/???
\documentclass[11pt]{article}
\input{styles_mecaflu}
\begin{document}
\title{Figures TIKZ du cours "Transfert thermique"}
% ===========================
% flux thermique
% ===========================
\begin{tikzpicture} [decoration={markings,mark=at position 2.5cm with {\arrow[]{stealth};}}]
\draw[orange,postaction={decorate}](0,0.5)--++(6,-1)node[black,midway,above,sloped]{\small courant thermique};
\draw[orange,postaction={decorate}](0,-0.5)--++(6,-2);
\draw[orange,postaction={decorate},dashed](0,0)--++(6,-1.5);
\draw[shift={(3,-1)},rotate=22,fill=lightgray,opacity=0.4](0.4,0) ellipse(0.5 and 0.85);
\draw (3.4,-1.5)node[below=5pt]{$(S)$};
\draw[vecteur](3.4,-0.85)node{$\bullet$}--++(1,-0.25)node[below right]{$\overrightarrow{\jmath_{\rm th}}$};
\draw[vecteur](3.4,-0.85)node{$\bullet$}--++(1,0.25)node[right]{$\overrightarrow{\mathrm{d}S}$};
\end{tikzpicture}
% ===========================
% Loi de Fourier
% ===========================
\usetikzlibrary{decorations.text}
\begin{tikzpicture} [decoration={markings,mark=at position 2.5cm with {\arrow[]{stealth};}}]
\draw[dashed,gray](0,-2)node[below]{$T_2<T_1$}--++(0,4);
\draw[dashed,gray,shift={(2,0)}](0,-2)node[below]{$T_3<T_2$}to[bend left=30] (0,2);
\draw[dashed,gray,shift={(-2,0)},postaction={decorate,decoration={raise=0.5ex,text along path,text align=center,text={isotherme}}}](0,-2)node[below]{$T_1$}to[bend right=30] (0,2);
\draw[orange,postaction={decorate}](-2.5,0)--++(5,0)node[black,above left]{\small courant thermique};
\draw[orange,postaction={decorate},shift={(0,1)}](-2.5,0)to[bend left=30](2.5,0);
\draw[orange,postaction={decorate},shift={(0,-1)}](-2.5,0)to[bend right=30](2.5,0);
\end{tikzpicture}
% ===========================
% echangeur
% ===========================
\begin{tikzpicture}
\clip (0.5,-1.1)--++(0,2.2)--++(-6,0) arc(90:270:0.4 and 1.1)--cycle;
\shade[top color=lightgray,bottom color=white] (0,1) rectangle (-6.5,0);
\shade[top color=white,bottom color=lightgray] (0,-1) rectangle (-6.5,0);
\draw[dashed] (0,-0.5)--++(-6,0);
\draw[dashed] (0,0.5)--++(-6,0);
\draw[fill=lightgray] (0,0)ellipse(0.4 and 1);
\draw[fill=white] (0,0)ellipse(0.2 and 0.5);
\draw (-0.5,0)node[left]{fluide($\lambda,\;c_p,\;\mu,\;\eta$)};
\draw[->,thick] (-5,0)--++(0.5,0)node[right]{$\overrightarrow{\overline{v}}$};
\draw[shift={(-5.5,0)},|<->|] (0,-0.5)--++(0,1)node[midway,left]{$D$};
\end{tikzpicture}
% ===========================
% bilan conductif 1D
% ===========================
\begin{tikzpicture} [scale=1.3,decoration={markings,mark=at position 3cm with {\arrow[]{stealth};}}]
\draw[orange,postaction={decorate}](0,0.5)--++(5,0)node[black,midway,above,sloped]{\small Milieu au repos};
\draw[orange,postaction={decorate}](0,-0.5)--++(5,0);
\draw[fill=orange,opacity=0.5](5,0) ellipse(0.3 and 0.5);
\draw (5,0)node[below]{$(S)$};
\draw[orange,dashed,->](0,0)--++(6,0)node[right]{$\overrightarrow{u_x}$};
\draw[fill=lightgray,opacity=0.8](1.4,0) ellipse(0.3 and 0.5);
\draw (0.4,0)node[fill=white]{$T(x,t)$};
\draw (1.4,-0.5)node[below=5pt]{$(x)$};
\draw[shift={(2,0)},fill=lightgray,opacity=0.8](1.4,0) ellipse(0.3 and 0.5);
\draw (3.4,-0.5)node[below=5pt]{$(x+\mathrm{d}x)$};
\draw[vecteur](1.4,0)node{$\bullet$}--++(1,0)node[above]{\small $\overrightarrow{\jmath_{\rm th}}(x,t)$};
\draw[vecteur](3.4,0)node{$\bullet$}--++(1,0)node[above]{\small $\overrightarrow{\jmath_{\rm th}}(x+\mathrm{d}x,t)$};
\end{tikzpicture}
% ===========================
% Résistance thermique
% ===========================
\begin{tikzpicture}
\draw[thick,->](-2,0)--++(4,0)node[right]{$x$};
\draw (0,0)node[above]{$T(x)$};
\fill[pattern=north east lines,opacity=0.59](-1,-1) rectangle (1,1);
\draw[thick](-1,-1)--++(0,2);
\draw[thick](1,-1)--++(0,2);
\draw[|-|](-1,-1.25)--++(2,0) node[midway,fill=white]{$e$};
\draw (-1,1)node[below left]{$T_1$}(1,1)node[below right]{$T_2<T_1$};
\draw[ultra thick,->,color=orange](-1.4,-0.5)--++(2.8,0)node[right]{$\phi_{\rm th}$};
\end{tikzpicture}
\begin{tikzpicture}[scale=1]
\begin{axis}[
axis lines=middle,% bottom,top
inner axis line style={=>},
xlabel={$x$},
ylabel={$T(x)$},
xtick={1},
xticklabels={$e$},
ytick={0.5,2.5},
yticklabels={$T_2$,$T_1$},
ymin=0,
ymax=3.25,
xmin=-1,
xmax=2,]
\addplot+[thick,color=monBleu,mark=none,domain=0:1,samples=10]{2.5-2*x};
\addplot+[thick,color=monBleu,mark=none,domain=-1:0,samples=5]{2.5};
\addplot+[thick,color=monBleu,mark=none,domain=1:2,samples=5]{0.5};
\fill[pattern=north east lines,opacity=0.5](axis cs:0,0) rectangle (axis cs:1,3);
\draw[ultra thick,->,color=orange](axis cs:-.4,1.5)--(axis cs:1.4,1.5)node[right]{$\phi_{\rm th}$};
\end{axis}
\end{tikzpicture}
% ===========================
% Influence de la convection
% ===========================
\begin{tikzpicture}[scale=1]
\begin{axis}[
axis lines=middle,% bottom,top
inner axis line style={=>},
xlabel={$x$},
ylabel={$T(x)$},
xtick={1},
xticklabels={$e$},
ytick={0.5,1,2,2.5},
yticklabels={$T_2$,$T_{p2}$,$T_{p2}$,$T_1$},
ymin=0,
ymax=3.25,
xmin=-1,
xmax=2,]
\addplot+[thick,color=monBleu,mark=none,domain=0:1,samples=10]{2-x};
\addplot+[thick,color=monBleu,mark=none,domain=-1:0,samples=50]{-0.5*exp(30*(x))+2.5};
\addplot+[thick,color=monBleu,mark=none,domain=1:2,samples=50]{0.5*exp(30*(1-x))+0.5};
\fill[pattern=north east lines,opacity=0.5](axis cs:0,0) rectangle (axis cs:1,3);
\draw[ultra thick,->,color=orange](axis cs:-.4,1.5)--(axis cs:1.4,1.5)node[right]{$\phi_{\rm th}$};
\end{axis}
\end{tikzpicture}
% ===========================
% Bilan therlique dans une conduite
% ===========================
\begin{tikzpicture} [scale=1,decoration={markings,mark=at position 4cm with {\arrow{stealth};}}]
\shade[top color=lightgray,bottom color=lightgray,middle color=white] (-4,-1.3)--++(2,0)--++(0,0.6)--++(-2,0)--cycle;
\draw (-4,-1.3)--++(2,0);
\draw (-4,-0.7)--++(2,0);
\draw[fill=gray](-3.2,-1.3)rectangle(-2.8,-0.7);
\draw (-3.2,-0.7)node[above]{\small A}++(0.4,0)node[above]{\small A'};
\shade[top color=lightgray,bottom color=lightgray,middle color=white] (4,1.2)--++(-2,0)--++(0,-0.4)--++(2,0)--cycle;
\draw (4,1.2)--++(-2,0);
\draw (4,0.8)--++(-2,0);
\draw[fill=gray](3.3,1.2)rectangle(2.7,0.8);
\draw (3.3,0.8)node[below]{\small B'}++(-0.6,0)node[below]{\small B};
\draw[thick,fill=white] (-2,-2)rectangle(2,2);
\draw[gray, postaction={decorate}](-3,-1)-|(0,1)--++(3,0);
\draw[->] (-3,-3)node[right]{$\textrm{d}m=\mu v_{\rm A}\textrm{d}t\,S_{\rm A}$}to[bend left](-3.1,-1.1);
\draw[vecteur](-3,-1)--++(0.6,0)node[below]{$\overrightarrow{v_{\rm A}}$};
\draw[vecteur](3,1)--++(1,0)node[below]{$\overrightarrow{v_{\rm B}}$};
\draw (0,2) node[above]{Machine hydraulique};
\draw (0,1.5) node{\small Puissance fournie : $\mathcal{P}$};
\draw (0,-1.5) node{\small Transfert thermique : $\phi_{\rm th}$};
\draw[force](-3.9,-1)--++(0.7,0)node[pos=0.1,above]{$p_{\rm A}$};
\draw[force](3.8,1.1)--++(-0.5,0)node[pos=0.1,above]{$p_{\rm B}$};
\end{tikzpicture}
% ===========================
% echangeur co-courant et contre-courant
% ===========================
\begin{tikzpicture}
\clip (1,-1.6)--++(0,3.2)--++(-6,0) arc(90:270:0.6 and 1.6)--cycle;
\shade[top color=lightgray,bottom color=white] (0,1.5) rectangle (-6.5,0);
\shade[top color=white,bottom color=lightgray] (0,-1.5) rectangle (-6.5,0);
\draw[dash pattern=on 2pt off 3pt on 4pt off 4pt,opacity=0.5] (0,0.7)rectangle (-6,1);
\draw[dash pattern=on 2pt off 3pt on 4pt off 4pt,opacity=0.5] (0,-0.7)rectangle (-6,-1);
\draw[fill=white] (0,0)ellipse(0.5 and 1.5);
\draw[pattern=north east lines] (0,0)ellipse(0.3 and 1);
\draw[fill=white] (0,0)ellipse(0.2 and 0.7);
\draw (-1,0)node[left]{fluide chaud};
\draw[->,thick] (-5,0)--++(0.5,0)node[right]{$Q_c$};
\draw (-1,1.25)node[left]{fluide froid};
\draw[->,thick] (-5,1.25)--++(0.5,0)node[right]{$Q_f$};
\end{tikzpicture}
\begin{tikzpicture}
\clip (1,-1.6)--++(0,3.2)--++(-6,0) arc(90:270:0.6 and 1.6)--cycle;
\shade[top color=lightgray,bottom color=white] (0,1.5) rectangle (-6.5,0);
\shade[top color=white,bottom color=lightgray] (0,-1.5) rectangle (-6.5,0);
\draw[dash pattern=on 2pt off 3pt on 4pt off 4pt,opacity=0.5] (0,0.7)rectangle (-6,1);
\draw[dash pattern=on 2pt off 3pt on 4pt off 4pt,opacity=0.5] (0,-0.7)rectangle (-6,-1);
\draw[fill=white] (0,0)ellipse(0.5 and 1.5);
\draw[pattern=north east lines] (0,0)ellipse(0.3 and 1);
\draw[fill=white] (0,0)ellipse(0.2 and 0.7);
\draw (-1,0)node[left]{fluide chaud};
\draw[->,thick] (-5,0)--++(0.5,0)node[right]{$Q_c$};
\draw (-1,1.25)node[left]{fluide froid};
\draw[<-,thick] (-5,1.25)--++(0.5,0)node[right]{$Q_f$};
\end{tikzpicture}
\end{document}