OpenXM_contrib/gnuplot/demo/surface2.dem - diff

Return to surface2.dem CVS log

Up to [local] / OpenXM_contrib / gnuplot / demo

Diff for /OpenXM_contrib/gnuplot/demo/Attic/surface2.dem between version 1.1.1.1 and 1.1.1.2

version 1.1.1.1, 2000/01/09 17:01:04

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

Line 4

set parametric

set isosamples 50,10

set hidden

set key below

set title "Parametric Sphere"

set urange [-pi/2:pi/2]

set vrange [0:2*pi]

set zrange [-1:1]

set ztics nomirror -1.0,0.25,1.0

set view 45,50,,2.5

set view 45,50

splot cos(u)*cos(v),cos(u)*sin(v),sin(u)

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

set view ,,,0.8

set view ,,,0.7

set title "Parametric Sphere, crunched z axis"

replot

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

set view ,,,1.6

set view ,,,1.4

set title "Parametric Sphere, enlarged z axis"

replot

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

Line 27 set view ,,,1.0

Line 29 set view ,,,1.0

set title "Parametric Torus"

set urange [0:2*pi]

set vrange [0:2*pi]

set zrange [-1:1] # imitate old 'set view' hack

splot (1-0.2*cos(v))*cos(u),(1-0.2*cos(v))*sin(u),0.2*sin(v)

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

set view ,,,2.0

set title "Parametric Hexagon"

set urange [-1.3:1.3]

set vrange [0:2*pi]

set zrange [-0.6:0.6]

set autoscale z

set zrange [-1:1]

set ticslevel 0. # reserve more space z direction.

set view ,,0.7,1.4 # crunch xyz, and re-extend z back to full size

set ztics autofreq

splot cos(v)**3*cos(u)**3,sin(v)**3*cos(u)**3,sin(u)**3

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

set view ,,,1.5

set view ,,1.,1.

set title "Parametric Helix"

set isosamples 100,20

Line 52 set autoscale z

Line 54 set autoscale z

splot (1-0.1*cos(v))*cos(u),(1-0.1*cos(v))*sin(u),0.1*(sin(v)+u/1.7-10)

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

set view ,,,1.0

set title "Parametric Shell (cut by hidden3d)"

set title "Parametric Shell (clipped to limited z range)"

set isosamples 40,20

set view 50,30,1.0

set urange [0:2*pi]

Line 64 splot cos(u)*u*(1+cos(v)/2),sin(v)*u/2,sin(u)*u*(1+cos

Line 65 splot cos(u)*u*(1+cos(v)/2),sin(v)*u/2,sin(u)*u*(1+cos

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

set autoscale z

set title "Parametric Shell"

set title "Parametric Shell (automatic z range)"

replot

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

Line 73 set title "Interlocking Tori"

Line 74 set title "Interlocking Tori"

set urange [-pi:pi]

set vrange [-pi:pi]

set isosamples 50,20

splot cos(u)+.5*cos(u)*cos(v),sin(u)+.5*sin(u)*cos(v),.5*sin(v) with lines, 1+cos(u)+.5*cos(u)*cos(v),.5*sin(v),sin(u)+.5*sin(u)*cos(v) with lines

splot cos(u)+.5*cos(u)*cos(v),sin(u)+.5*sin(u)*cos(v),.5*sin(v) with lines, \

1+cos(u)+.5*cos(u)*cos(v),.5*sin(v),sin(u)+.5*sin(u)*cos(v) with lines

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

# Clean up:

set noparametric

reset

set dummy x,y

set isosamples 10,10

set view 60,30,1,1

set urange [-5:5]

set vrange [-5:5]

set zrange [-10:10]

set auto

set title "" 0,0

set nohidden

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