home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Tools / Languages / RLaB 1.15c / examples / mathtest.r < prev    next >
Encoding:
Text File  |  1994-02-21  |  653 b   |  69 lines  |  [TEXT/RLAB]
  1. //
  2. // For testing how various math libraries will respond
  3. //
  4.  
  5. diary();
  6.  
  7. Inf = inf();
  8. NaN = nan();
  9.  
  10. //
  11. // Trig Functions
  12. //
  13.  
  14. cos( Inf )
  15. sin( Inf )
  16. tan( Inf )
  17. acos( Inf )
  18. asin( Inf )
  19. atan( Inf )
  20.  
  21. cos( -Inf )
  22. sin( -Inf )
  23. tan( -Inf )
  24. acos( -Inf )
  25. asin( -Inf )
  26. atan( -Inf )
  27.  
  28. cos( NaN )
  29. sin( NaN )
  30. tan( NaN )
  31. acos( NaN )
  32. asin( NaN )
  33. atan( NaN )
  34.  
  35. //
  36. // Hyperbolic trig functions
  37. //
  38.  
  39. sinh( Inf )
  40. cosh( Inf )
  41. tanh( Inf )
  42.  
  43. sinh( -Inf )
  44. cosh( -Inf )
  45. tanh( -Inf )
  46.  
  47. sinh( NaN )
  48. cosh( NaN )
  49. tanh( NaN )
  50.  
  51. //
  52. // Misc.
  53. //
  54.  
  55. exp( Inf )
  56. log( Inf )
  57. log10( Inf )
  58. sqrt( Inf )
  59.  
  60. exp( -Inf )
  61. log( -Inf )
  62. log10( -Inf )
  63. sqrt( -Inf )
  64.  
  65. exp( NaN )
  66. log( NaN )
  67. log10( NaN )
  68. sqrt( NaN )
  69.