OpenXM_contrib/gnuplot/demo/surface1.dem - diff

Return to surface1.dem CVS log

Up to [local] / OpenXM_contrib / gnuplot / demo

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

version 1.1.1.2, 2000/01/22 14:16:09

version 1.1.1.3, 2003/09/15 07:09:29

Line 69 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 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)

splot [-5:5.01] [-5:5.01] sinc(u,v)

pause -1 "Hit return to continue (14)"

Line 88 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

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 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 title "Mandelbrot function"

set mapp cart

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}

Line 131 mand(z,a,n) = n<=0 || abs(z)>100 ? 1:mand(z*z+a,a,n-1)

Line 134 mand(z,a,n) = n<=0 || abs(z)>100 ? 1:mand(z*z+a,a,n-1)

splot [-2:1][-1.5:1.5] mand({0,0},compl(x,y),30)

pause -1 "Hit return to continue (21)"

reset

# TANAKA Masaki (Tokyo Institute of technology)

# masaki@isea.is.titech.ac.jp

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