home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / GRAPHICS / PLOT / GNUPLT32.ZIP / CONTOURS.DEM < prev    next >
Encoding:
Text File  |  1992-03-25  |  3.2 KB  |  116 lines
  1. #
  2. # $Id: contours.demo,v 3.26 92/03/24 22:32:18 woo Exp Locker: woo $
  3. #
  4. set samples 20
  5. set isosamples 21
  6. set xlabel "X axis" -5,-2
  7. set ylabel "Y axis" 4,-1
  8. set zlabel "Z axis"
  9. set title "3D gnu plot demo - contour plot"
  10. set contour
  11. splot x*y
  12. pause -1 "Hit return to continue (1)"
  13. set cntrparam levels 20
  14. set title "3D gnu plot demo - contour plot (more contours)"
  15. replot
  16. pause -1 "Hit return to continue (2)"
  17. set cntrparam levels 40
  18. set title "3D gnu plot demo - contour plot (and again more contours)"
  19. replot
  20. pause -1 "Hit return to continue (3)"
  21. set cntrparam levels 10
  22. set title "3D gnu plot demo - contour plot on base grid"
  23. set contour base
  24. splot x**2-y**2
  25. pause -1 "Hit return to continue (4)"
  26. set title "3D gnu plot demo - contour plot on surface"
  27. set contour surface
  28. replot
  29. pause -1 "Hit return to continue (5)"
  30. set title "3D gnu plot demo - contour plot on both"
  31. set contour both
  32. replot
  33. pause -1 "Hit return to continue (6)"
  34. set contour base
  35. set title "3D gnu plot demo - 2 surfaces
  36. splot x**2*y**3, x**3*y**2
  37. pause -1 "Hit return to continue (7)"
  38. set title "3D gnu plot demo - some more interesting contours"
  39. splot x*y / (x**2 + y**2 + 0.1)
  40. pause -1 "Hit return to continue (8)"
  41. splot [x=-3:3] [y=-3:3] sin(x) * cos(y)
  42. pause -1 "Hit return to continue (9)"
  43. set zrange [-0.5:0.5]
  44. replot
  45. pause -1 "Hit return to continue (10)"
  46. set samples 6
  47. set isosamples 6
  48. set cntrparam levels 5
  49. set title "3D gnu plot demo - low resolution (6x6)"
  50. replot
  51. pause -1 "Hit return to continue (11)"
  52. set cntrparam bspline
  53. set title "3D gnu plot demo - low resolution (6x6) using bspline approx."
  54. replot
  55. pause -1 "Hit return to continue (12)"
  56. set cntrparam order 8
  57. set title "3D gnu plot demo - low resolution (6x6) raise bspline order."
  58. replot
  59. pause -1 "Hit return to continue (13)"
  60. set cntrparam linear
  61. set auto
  62. set title "3D gnu plot demo - low resolution (6x6) using linear contours."
  63. splot x*y
  64. pause -1 "Hit return to continue (14)"
  65. set cntrparam order 4
  66. set cntrparam bspline
  67. set title "3D gnu plot demo - low resolution (6x6) using bspline approx."
  68. replot
  69. pause -1 "Hit return to continue (15)"
  70. set samples 25
  71. set isosamples 26
  72. set title "3D gnu plot demo - contour of Sinc function"
  73. splot [-5:5.01] [-5:5.01] sin(sqrt(x**2+y**2)) / sqrt(x**2+y**2)
  74. pause -1 "Hit return to continue (16)"
  75. splot [-12:12.01] [-12:12.01] sin(sqrt(x**2+y**2)) / sqrt(x**2+y**2)
  76. pause -1 "Hit return to continue (17)"
  77. set cntrparam levels 10
  78. set xrange [0:15]
  79. set yrange [0:15]
  80. set auto
  81. set zrange [-0.6:0.6]
  82. set data style lines
  83. set title "3D gnu plot demo - contour of data grid plotting"
  84. set parametric
  85. splot "glass.dat"
  86. pause -1 "Hit return to continue (18)"
  87. set zrange [-1.2:1.2]
  88. set noparametric
  89. splot "glass.dat" using 1
  90. pause -1 "Hit return to continue (19)"
  91. set view 0,0,1
  92. set nosurface
  93. set title "3D gnu plot demo - 2D contour projection of last plot"
  94. replot
  95. pause -1 "Hit return to continue (20)"
  96.  
  97.  
  98. #
  99. # Clean up:
  100. #
  101. set surface
  102. set nocontour
  103. set cntrparam levels 5
  104. set cntrparam linear
  105. set samples 100
  106. set isosamples 10
  107. set view 60,30,1,1
  108. set xrange [-10:10]
  109. set yrange [-10:10]
  110. set zrange [-10:10]
  111. set auto
  112. set title "" 0,0
  113. set xlabel "" 0,0
  114. set ylabel "" 0,0
  115. set zlabel "" 0,0
  116.