manus_continuum_granular1_exp

commit 8031fcda4847fb2cfc1880358f4d6d5252a5c34d
parent bdfec4a3bcecf3d9244e3b1cf0551bdfe29ff7f0
Author: Anders Damsgaard <anders@adamsgaard.dk>
Date:   Mon, 16 Dec 2019 17:08:10 +0100

Add more subplot labels, fix height of fig-stick_slip_rate

Diffstat:
M
fig-stick_slip_rate/fig.gp
 | 
2
+-
M
fig-stick_slip_rate_depth/fig.gp
 | 
16
+++++++---------

2 files changed, 8 insertions(+), 10 deletions(-)
diff --git a/fig-stick_slip_rate/fig.gp b/fig-stick_slip_rate/fig.gp
@@ -1,7 +1,7 @@
 #!/usr/bin/env gnuplot
 reset
 
-set terminal pdfcairo color size 7.5 cm, 10 cm
+set terminal pdfcairo color size 7.5 cm, 10.5 cm
 
 set multiplot layout 4,1 \
 	margins 0.19,0.72,0.10,0.98 \
diff --git a/fig-stick_slip_rate_depth/fig.gp b/fig-stick_slip_rate_depth/fig.gp
@@ -26,6 +26,7 @@ k = 2e-17
 f = 1.0/(3600.0*24.0)
 f(x) = 8.0 - skindepth(f,k)
 
+set label "{/:Bold a}" at graph 0.05,0.9
 unset colorbox
 set xlabel "Water pressure [kPa]"
 set ylabel "Vertical position [m]"
@@ -33,6 +34,8 @@ set xrange [0:200]
 plot for [t = t0:tend] filename(t) u ($4/1e3):1:(t-t0) w l lc palette lw 1 t "", \
 	f(x) title "" w l
 
+unset label
+set label "{/:Bold b}" at graph 0.05,0.9
 set xlabel "Eff. normal stress [kPa]"
 set ylabel ""
 set xrange [0:200]
@@ -40,6 +43,8 @@ unset ytics
 plot for [t = t0:tend] filename(t) u ($3/1e3):1:(t-t0) w l lc palette lw 1 t "", \
 	f(x) title "" w l
 
+unset label
+set label "{/:Bold c}" at graph 0.05,0.9
 set xlabel "Shear velocity [km/a]"
 set ylabel ""
 set xrange [0.0:1.0]
@@ -49,19 +54,12 @@ unset ytics
 plot for [t = t0:tend] filename(t) u ($2*60*60*24*365/1000):1:(t-t0) w l lc palette lw 1 t "", \
 	f(x) title "" w l
 
+unset label
+set label "{/:Bold d}" at graph 0.05,0.9
 set xlabel "Shear strain rate [1/d]"
 set ylabel ""
-#set xrange [0:3.1e-3]
-#unset xrange
 set xrange [0:20]
-#set format x "%.0s*10^{%T}"
-#set xtics (0,0.001,0.002,0.003)
-#set xtics (100,200)
 unset ytics
-#prev1 = prev2 = 0
-#shift(x) = (prev2 = prev1, prev1 = x)
-#plot for [t = t0:tend] filename(t) u (shift($2), $0 < 1 ? 1/0 : $2 - prev2):1:(t-t0) w l lc palette lw 1 t "", \
-#	f(x) title "" w l
 plot for [t = t0:tend] filename(t) u ($6*60*60*24):1:(t-t0) w l lc palette lw 1 t "", \
 	f(x) title "" w l
 unset format x