# Author: Ika, 2015-08-11
# Anyone can copy and revise this code without any copyright concern.

set term svg size 800,600 enhanced font 'Times, 18'
set output 'sinc_wolfram.svg'

set multiplot

set xlabel "x"
set ylabel "y"
unset colorbox

set key right bottom
set xlabel font 'Times, 48'
set ylabel font 'Times, 48'
set sample 1000

# Draw the curves.
plot [-10:10] (1-cos(x))/(x*sqrt(2*pi)) w lines lw 2 t '(1-cos(x))/(x*sqrt(2*pi))', (cos(2*pi*x)-1)/(2*pi*x) w lines t '(cos(2*pi*x)-1)/(2*pi*x)' lw 2

unset multiplot
set term windows
set output