# Bottiglia di Klein a forma di 8.
# Script addattato da:
# http://ayapin.film.s.dendai.ac.jp/~matuda/Gnuplot/pm3d.html
#
x(u,v)= cos(u)*(cos(u/2)*cos(v)+sin(u/2)*sin(2*v)+3.0)
y(u,v)= -sin(u)*(cos(u/2)*cos(v)+sin(u/2)*sin(2*v)+3.0)
z(u,v)= -sin(u/2)*cos(v)+cos(u/2)*sin(2*v)
set pm3d explicit
set palette rgb 3,7,9
unset colorbox
set parametric
set hidden3d
set ticslevel 0
unset key
set isosamples 40,40
set view 65,70,1,1
set urange[-0.5*pi:1.5*pi]
set vrange[-pi:pi]
set zrange[-2:2]
set terminal jpeg medium size 480,480
set output "klein.jpeg"
set multiplot
splot x(u,v),y(u,v),z(u,v) w pm3d
splot x(u,v),y(u,v),z(u,v) lt 6
unset multiplot
set output
