[BACK]Return to surface1.dem CVS log [TXT][DIR] Up to [local] / OpenXM_contrib / gnuplot / demo

Diff for /OpenXM_contrib/gnuplot/demo/Attic/surface1.dem between version 1.1.1.1 and 1.1.1.3

version 1.1.1.1, 2000/01/09 17:01:04 version 1.1.1.3, 2003/09/15 07:09:29
Line 69  splot u*v / (u**2 + v**2 + 0.1)
Line 69  splot u*v / (u**2 + v**2 + 0.1)
 pause -1 "Hit return to continue (11)"  pause -1 "Hit return to continue (11)"
 splot [x=-3:3] [y=-3:3] sin(x) * cos(y)  splot [x=-3:3] [y=-3:3] sin(x) * cos(y)
 pause -1 "Hit return to continue (12)"  pause -1 "Hit return to continue (12)"
 set zrange [-0.35:0.35]  set zrange [-1.0:1.0]
 replot  replot
 pause -1 "Hit return to continue (13)"  pause -1 "Hit return to continue (13)"
 set title "Sinc function"  set title "Sinc function"
 set zrange [-1:1]  set zrange [-1:1]
 set label 1 "This is equal to 1" at -5,-2,0.75 right  set label 1 "This is equal to 1" at 0,3.2,1 left
 set arrow 1 from -5,-2.1,0.75 to 0,0,1  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)  sinc(u,v) = sin(sqrt(u**2+v**2)) / sqrt(u**2+v**2)
 splot [-5:5.01] [-5:5.01] sinc(u,v)  splot [-5:5.01] [-5:5.01] sinc(u,v)
 pause -1 "Hit return to continue (14)"  pause -1 "Hit return to continue (14)"
Line 88  splot [-12:12.01] [-12:12.01] sinc(u,v)
Line 88  splot [-12:12.01] [-12:12.01] sinc(u,v)
 pause -1 "Hit return to continue (15)"  pause -1 "Hit return to continue (15)"
 set noarrow  set noarrow
 set ztics autofreq  set ztics autofreq
   set noarrow
 set nolabel  set nolabel
 set log  set log
 set auto  set auto
Line 110  pause -1 "Hit return to continue (18)"
Line 111  pause -1 "Hit return to continue (18)"
 set zrange [-1.2:1.2]  set zrange [-1.2:1.2]
 set ticslevel 0.5  set ticslevel 0.5
 set noparametric  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  splot "glass.dat" using 1, "glass.dat" using 2, "glass.dat" using 3
 pause -1 "Hit return to continue (19)"  pause -1 "Hit return to continue (19)"
 set param  set parametric
 set title "Test of spherical transform"  set title "Test of spherical transform"
 set mapp sphe  set mapping spherical
 splot "glass.dat"  splot "glass.dat"
 pause -1 "Hit return to continue (20)"  pause -1 "Hit return to continue (20)"
   
 # mandelbrot demo  # mandelbrot demo
 set nopar  set title "Mandelbrot function"
 set mapp cart  set noparametric
   set mapping cartesian
 set view 60,30,1,1  set view 60,30,1,1
 set auto  set auto
 set title "" 0,0  
 set isosamples 60  set isosamples 60
 set hidden3d  set hidden3d
 compl(a,b)=a*{1,0}+b*{0,1}  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  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)  splot [-2:1][-1.5:1.5] mand({0,0},compl(x,y),30)
 pause -1 "Hit return to continue (21)"  pause -1 "Hit return to continue (21)"
 # TANAKA Masaki  (Tokyo Institute of technology)  reset
 #                 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  

Legend:
Removed from v.1.1.1.1  
changed lines
  Added in v.1.1.1.3

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>