function makeGraph()
dOlam = 0:0.01:1;
kd = 2*pi*dOlam;

g = 9.8;
lambda = 1:1000;
k = 2*pi./lambda;
vpInf = sqrt(g./k);

figure(1)
plot(lambda,vpInf)
texText('$\lambda$ [m]','x')
texText('$v_\infty$ [m/s]','y')
graphToPDF('vpInf.pdf',4,3)

figure(2)
plot(dOlam,sqrt(tanh(kd)));
texText('$d/\lambda$','x')
texText('$v_p/v_\infty$','y')
graphToPDF('vp.pdf',4,3)

figure(3)
plot(dOlam,0.5 + kd./sinh(2*kd));
texText('$d/\lambda$','x')
texText('$v_g/v_p$','y')
graphToPDF('vg.pdf',4,3)

end

