home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 22 gnu / 22-gnu.zip / GNUPDEMO.ZIP / world.demo < prev   
Text File  |  1992-03-25  |  1KB  |  61 lines

  1. #
  2. # $Id: world.demo,v 3.26 92/03/24 22:32:31 woo Exp Locker: woo $
  3. #
  4. set title "Gnuplot Correspondences"
  5. set nokey
  6. set noborder
  7. set noyzeroaxis
  8. set noxtics
  9. set noytics
  10. #
  11. # plot world map and correspondent locations as a +
  12. plot 'world.dat' with lines 3 4, 'world.cor' with points 1 2
  13. set title ""
  14. set key
  15. set border
  16. set yzeroaxis
  17. set xtics
  18. set ytics
  19. pause -1 "Hit return to continue"
  20. #
  21. # plot a '3D version using spherical coordinate system' of the world.
  22. set angles degrees
  23. set title "3D version using spherical coordinate system"
  24. set view 70,40,,2.0
  25. set mapping spherical
  26. set parametric
  27. set samples 32
  28. set isosamples 9
  29. set urange [-pi/2:pi/2]
  30. set vrange [0:2*pi]
  31. splot 'world.dat' with lines 3 4, 'world.cor' with points 1 2, cos(u)*cos(v),cos(u)*sin(v),sin(u) with lines 5 6
  32. pause -1 "Hit return to continue"
  33. #
  34. # plot a '3D version using cylindrical coordinate system' of the world.
  35. set title "3D version using cylindrical coordinate system"
  36. set view 70,40,,2.0
  37. set mapping cylindrical
  38. set parametric
  39. set samples 32
  40. set isosamples 9
  41. set urange [-pi:pi]
  42. set vrange [-90:90]
  43. splot 'world.dat' with lines 3 4, 'world.cor' with points 1 2, cos(u),sin(u),v with lines 5 6
  44. pause -1 "Hit return to continue"
  45.  
  46.  
  47. #
  48. # Clean up:
  49. #
  50. set noparametric
  51. set mapping cartesian
  52. set angles radians
  53. set samples 100
  54. set isosamples 10
  55. set view 60,30,1,1
  56. set xrange [-10:10]
  57. set yrange [-10:10]
  58. set zrange [-10:10]
  59. set auto
  60. set title "" 0,0
  61.