home *** CD-ROM | disk | FTP | other *** search
/ Best Objectech Shareware Selections / UNTITLED.iso / boss / educ / math / 017 / trig.plt < prev    next >
Encoding:
Text File  |  1993-04-16  |  1.1 KB  |  76 lines
  1. [ trig.plt
  2.  
  3. paper size 11 by 8.5
  4.  
  5. color green
  6. samples 50
  7. map x -10 10
  8. draw x
  9. frame
  10. xlabel 'x'
  11. color lred
  12. plot sin(x),atan(x),cos(atan(x))
  13. color green
  14. draw y
  15. ylabel 'sin(x),atan(x),cos(atan(x))'
  16. title 'Trigonometric Functions I'
  17. pause 3
  18. clear
  19.  
  20. samples 100 
  21. color green
  22. map x -pi/2 pi
  23. frame
  24. draw x
  25. xlabel 'x'
  26. color lred
  27. plot cos(x),-(sin(x) > sin(x+1) ? sin(x) : sin(x+1))
  28. color green
  29. draw y
  30. ylabel 'cos(x),-(sin(x) > sin(x+1) ? sin(x) : sin(x+1))'
  31. color lblue
  32. title 'Trigonometric Functions II'
  33. pause 3
  34. clear
  35.  
  36. samples 200 
  37. map x -3 5
  38. color green
  39. draw x
  40. frame
  41. xlabel 'x'
  42. color lred
  43. plot asin(x),acos(x)
  44. color green
  45. draw y
  46. ylabel 'asin(x),acos(x)'
  47. color lblue
  48. title 'Trigonometric Functions III'
  49. pause 3
  50. clear
  51.  
  52. map x -5*pi 5*pi y -5 5
  53. color green
  54. draw x y
  55. xlabel 'x'
  56. ylabel 'real(tan(x)/atan(x)), 1/x'
  57. color lred
  58. plot real(tan(x)/atan(x)), 1/x
  59. color lblue
  60. title 'Trigonometric Functions IV'
  61. frame
  62. pause 3
  63.  
  64. clear
  65. samples 800
  66. map x -30 20
  67. color lred
  68. plot sin(x*20)*atan(x)
  69. color green
  70. frame
  71. draw x y
  72. xlabel 'x'
  73. ylabel 'sin(x*20)*atan(x)'
  74. color lblue
  75. title 'Trigonometric Functions V'
  76.