=================================================================== RCS file: /home/cvs/OpenXM_contrib/gnuplot/demo/Attic/surface1.dem,v retrieving revision 1.1.1.1 retrieving revision 1.1.1.3 diff -u -p -r1.1.1.1 -r1.1.1.3 --- OpenXM_contrib/gnuplot/demo/Attic/surface1.dem 2000/01/09 17:01:04 1.1.1.1 +++ OpenXM_contrib/gnuplot/demo/Attic/surface1.dem 2003/09/15 07:09:29 1.1.1.3 @@ -1,5 +1,5 @@ # -# $Id: surface1.dem,v 1.1.1.1 2000/01/09 17:01:04 maekawa Exp $ +# $Id: surface1.dem,v 1.1.1.3 2003/09/15 07:09:29 ohara Exp $ # set samples 21 set isosample 11 @@ -69,13 +69,13 @@ splot u*v / (u**2 + v**2 + 0.1) pause -1 "Hit return to continue (11)" splot [x=-3:3] [y=-3:3] sin(x) * cos(y) pause -1 "Hit return to continue (12)" -set zrange [-0.35:0.35] +set zrange [-1.0:1.0] replot pause -1 "Hit return to continue (13)" set title "Sinc function" set zrange [-1:1] -set label 1 "This is equal to 1" at -5,-2,0.75 right -set arrow 1 from -5,-2.1,0.75 to 0,0,1 +set label 1 "This is equal to 1" at 0,3.2,1 left +set arrow 1 from 0,3,1 to 0,0,1 sinc(u,v) = sin(sqrt(u**2+v**2)) / sqrt(u**2+v**2) splot [-5:5.01] [-5:5.01] sinc(u,v) pause -1 "Hit return to continue (14)" @@ -88,6 +88,7 @@ splot [-12:12.01] [-12:12.01] sinc(u,v) pause -1 "Hit return to continue (15)" set noarrow set ztics autofreq +set noarrow set nolabel set log set auto @@ -110,39 +111,26 @@ pause -1 "Hit return to continue (18)" set zrange [-1.2:1.2] set ticslevel 0.5 set noparametric +set xlabel "line index within group" +set ylabel "group index" splot "glass.dat" using 1, "glass.dat" using 2, "glass.dat" using 3 pause -1 "Hit return to continue (19)" -set param +set parametric set title "Test of spherical transform" -set mapp sphe +set mapping spherical splot "glass.dat" pause -1 "Hit return to continue (20)" # mandelbrot demo -set nopar -set mapp cart +set title "Mandelbrot function" +set noparametric +set mapping cartesian set view 60,30,1,1 set auto -set title "" 0,0 set isosamples 60 set hidden3d compl(a,b)=a*{1,0}+b*{0,1} mand(z,a,n) = n<=0 || abs(z)>100 ? 1:mand(z*z+a,a,n-1)+1 splot [-2:1][-1.5:1.5] mand({0,0},compl(x,y),30) pause -1 "Hit return to continue (21)" -# TANAKA Masaki (Tokyo Institute of technology) -# masaki@isea.is.titech.ac.jp - -# -# Clean up: -# -set samples 100 -set isosamples 10 -set xrange [-10:10] -set yrange [-10:10] -set zrange [-10:10] -set auto -set xlabel "" 0,0 -set ylabel "" 0,0 -set zlabel "" 0,0 -set nohidden +reset