ulps: Fix long lines
[mathlib.git] / etc / csv2plot.sh
1 #!/bin/sh
2
3 DESTDIR=graphs/
4
5 plot1dfile()
6 {
7     cat > 1dscript.plot <<EOF
8 set terminal png
9 set out '$DESTDIR/$1.png'
10 set logscale x
11 set xlabel "x (logscale)"
12 set ylabel "t"
13 plot '$1'
14 EOF
15 gnuplot 1dscript.plot
16 }
17
18 plot2dfile()
19 {
20     cat > 2dscript.plot <<EOF
21 set terminal png
22 set out '$DESTDIR/$1.png'
23 set logscale x
24 set logscale y
25 set xlabel "x (logscale)"
26 set ylabel "y (logscale)"
27 set zlabel "t"
28 set view 60,30
29 set style data lines
30 set dgrid3d 50,50,50
31 splot '$1'
32 EOF
33 gnuplot 2dscript.plot
34 }
35
36 for i in *.csv;
37 do
38     {
39         read header
40         if [ "$header" = "#1" ];
41         then
42             plot1dfile "$i"
43         fi
44
45         if [ "$header" = "#2" ];
46         then
47             plot2dfile "$i"
48         fi
49     } < "$i"
50 done