-
Notifications
You must be signed in to change notification settings - Fork 0
/
example.gnuplot
43 lines (35 loc) · 1.12 KB
/
example.gnuplot
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
set terminal pdf color
set output 'example-lagrangian-structure-function.pdf'
unset key
set samples 20000
set format '%g'
set xlabel "log(dt)"
set ylabel "log(S^2)"
set xrange [0:2]
set yrange [0:1.5]
bound_wr(x,ll,hl,v) =( ((x>ll)&& (x<hl))? v : (1/0))
fl_part(x,s,ll,hl) = bound_wr(x,ll,hl,s)
in_part(x,s,ll,hl) = bound_wr(x,ll,hl,(1.)*x +s)
bal_part(x,s,ll,hl) = bound_wr(x,ll,hl,(2.)*x +s)
load "cubic_hermite_spline.lib.gnu"
set parametric
tr_cost = .4
tr_ext = .12
tr_x_ext= 0.075
linecol_1=6
plot t+tr_x_ext,bal_part(t,0+tr_ext,0,0.25) ls linecol_1 , t+tr_x_ext,in_part(t,0.2+tr_ext,0.15,0.85) ls linecol_1, t+tr_x_ext,fl_part(t,1+tr_ext,0.7,2) ls linecol_1,\
t,bal_part(t,0+tr_cost,0,0.25) ls 2, t,in_part(t,0.2+tr_cost,0.15,0.85) ls 2, t,fl_part(t,1+tr_cost,0.7,2) ls 2,\
cubHerMulti5t(\
0.05,1 \
,0.4,1 \
,0.7,1 \
,1.2,1 \
,3,1 \
,t), cubHerMulti5t(0,2 ,0.6,1, 0.9,1 ,1.1,0 ,1.1,0 ,t) w l ls linecol_1 lw 3,\
cubHerMulti5t(\
0.05,1 \
,0.4,1 \
,0.7,1 \
,1.2,1 \
,3,1 \
,t) -.1, cubHerMulti5t(0,2 ,0.6,1, 0.9,1 ,1.1,0 ,1.1,0 ,t) + 0.25 w l ls 2 lw 3