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
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
|
set terminal cairolatex pdf color standalone
set output "diffusion-transport-tensor-err.tex"
set log xy
set size square
set colors classic
set xrange [1e-3:1e-1]
set yrange [1e-7:1e-2]
graph_ratio_xy = 2./5.
set xlabel '[c]{$h$}'
set label '[l]{$\|\boldsymbol{\sigma}_h-\boldsymbol{\sigma}\|_{L^2}$}' at graph 0.03, 0.93
set xtics (\
'[l]{$10^{-3}$}' 1e-3, \
'[c]{$10^{-2}$}' 1e-2, \
'[r]{$10^{-1}$}' 1e-1)
set ytics (\
'[r]{$10^{-6}$}' 1e-6, \
'[r]{$10^{-4}$}' 1e-4, \
'[r]{$10^{-2}$}' 1e-2)
# triangle a droite
alpha_B = 2.0
slope_B = graph_ratio_xy*alpha_B
xB = 0.45
yB = 0.47
dxB = 0.10
dyB = dxB*slope_B
set label sprintf("[l]{\\scriptsize $%g$}",alpha_B) at graph xB+dxB+0.02, yB+0.5*dyB right
set arrow from graph xB, yB to graph xB+dxB, yB nohead
set arrow from graph xB+dxB, yB to graph xB+dxB, yB+dyB nohead
set arrow from graph xB+dxB, yB+dyB to graph xB, yB nohead
# triangle a droite
alpha_C = 3.0
slope_C = graph_ratio_xy*alpha_C
xC = 0.57
yC = 0.28
dxC = 0.10
dyC = dxC*slope_C
set label sprintf("[l]{\\scriptsize $%g$}",alpha_C) at graph xC+dxC+0.02, yC+0.5*dyC right
set arrow from graph xC, yC to graph xC+dxC, yC nohead
set arrow from graph xC+dxC, yC to graph xC+dxC, yC+dyC nohead
set arrow from graph xC+dxC, yC+dyC to graph xC, yC nohead
# triangle a droite
alpha_D = 4.0
slope_D = graph_ratio_xy*alpha_D
xD = 0.73
yD = 0.22
dxD = 0.10
dyD = dxD*slope_D
set label sprintf("[l]{\\scriptsize $%g$}",alpha_D) at graph xD+dxD+0.02, yD+0.5*dyD right
set arrow from graph xD, yD to graph xD+dxD, yD nohead
set arrow from graph xD+dxD, yD to graph xD+dxD, yD+dyD nohead
set arrow from graph xD+dxD, yD+dyD to graph xD, yD nohead
plot \
'diffusion-transport-tensor-err.gdat' \
i 1 \
u (1./$1):2 \
notitle '[r]{$k=1$}' \
w lp lw 4 lc rgb '#008800', \
'diffusion-transport-tensor-err.gdat' \
i 2 \
u (1./$1):2 \
notitle '[r]{$k=2$}' \
w lp lw 4 lc 3, \
'diffusion-transport-tensor-err.gdat' \
i 3 \
u (1./$1):2 \
notitle '[r]{$k=3$}' \
w lp lw 4 lc 4
#pause -1
|
