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

Annotation of OpenXM_contrib/gnuplot/demo/surface2.dem, Revision 1.1

1.1     ! maekawa     1: #
        !             2: # $Id: surface2.dem,v 1.4 1997/04/05 19:44:49 drd Exp $
        !             3: #
        !             4: set parametric
        !             5: set isosamples 50,10
        !             6: set hidden
        !             7:
        !             8: set title "Parametric Sphere"
        !             9: set urange [-pi/2:pi/2]
        !            10: set vrange [0:2*pi]
        !            11: set zrange [-1:1]
        !            12: set ztics nomirror -1.0,0.25,1.0
        !            13: set view 45,50,,2.5
        !            14: splot cos(u)*cos(v),cos(u)*sin(v),sin(u)
        !            15: pause -1 "Hit return to continue (1)"
        !            16:
        !            17: set view ,,,0.8
        !            18: replot
        !            19: pause -1 "Hit return to continue (2)"
        !            20:
        !            21: set view ,,,1.6
        !            22: replot
        !            23: pause -1 "Hit return to continue (3)"
        !            24:
        !            25: set view ,,,1.0
        !            26:
        !            27: set title "Parametric Torus"
        !            28: set urange [0:2*pi]
        !            29: set vrange [0:2*pi]
        !            30: splot (1-0.2*cos(v))*cos(u),(1-0.2*cos(v))*sin(u),0.2*sin(v)
        !            31: pause -1 "Hit return to continue (4)"
        !            32:
        !            33:
        !            34: set view ,,,2.0
        !            35:
        !            36: set title "Parametric Hexagon"
        !            37: set urange [-1.3:1.3]
        !            38: set vrange [0:2*pi]
        !            39: set zrange [-0.6:0.6]
        !            40: set zrange [-1:1]
        !            41: set ztics autofreq
        !            42: splot cos(v)**3*cos(u)**3,sin(v)**3*cos(u)**3,sin(u)**3
        !            43: pause -1 "Hit return to continue (5)"
        !            44:
        !            45: set view ,,,1.5
        !            46:
        !            47: set title "Parametric Helix"
        !            48: set isosamples 100,20
        !            49: set urange [0:10*pi]
        !            50: set vrange [0:2*pi]
        !            51: set autoscale z
        !            52: splot (1-0.1*cos(v))*cos(u),(1-0.1*cos(v))*sin(u),0.1*(sin(v)+u/1.7-10)
        !            53: pause -1 "Hit return to continue (6)"
        !            54:
        !            55: set view ,,,1.0
        !            56:
        !            57: set title "Parametric Shell (cut by hidden3d)"
        !            58: set isosamples 40,20
        !            59: set view 50,30,1.0
        !            60: set urange [0:2*pi]
        !            61: set vrange [0:2*pi]
        !            62: set zrange [-3:1.5]
        !            63: splot cos(u)*u*(1+cos(v)/2),sin(v)*u/2,sin(u)*u*(1+cos(v)/2)
        !            64: pause -1 "Hit return to continue (7)"
        !            65:
        !            66: set autoscale z
        !            67: set title "Parametric Shell"
        !            68: replot
        !            69: pause -1 "Hit return to continue (8)"
        !            70:
        !            71: set title "Interlocking Tori"
        !            72:
        !            73: set urange [-pi:pi]
        !            74: set vrange [-pi:pi]
        !            75: set isosamples 50,20
        !            76: 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
        !            77: pause -1 "Hit return to continue (9)"
        !            78:
        !            79: #
        !            80: # Clean up:
        !            81: #
        !            82: set noparametric
        !            83: set dummy x,y
        !            84: set isosamples 10,10
        !            85: set view 60,30,1,1
        !            86: set urange [-5:5]
        !            87: set vrange [-5:5]
        !            88: set zrange [-10:10]
        !            89: set auto
        !            90: set title "" 0,0
        !            91: set nohidden

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