home *** CD-ROM | disk | FTP | other *** search
/ back2roots/padua / padua.7z / padua / lang / RexxArpLib-30.lzh / rexx / TestGraph.rexx < prev   
Encoding:
OS/2 REXX Batch file  |  1989-03-23  |  290 b   |  9 lines
  1. /*
  2. *   Example functions.
  3. */
  4. call graph("exp(-x▓)"    , 50, -2.5, 2.5, "30. * exp(-(x**2))")
  5. call graph("x│ + 2x - 13", 25, -2.5, 2.5, "x**3 + 2*x - 13"   )
  6. call graph("sin(x)"      , 25,  0.0, 6.3, "45. * sin(x)"      )
  7. call graph("log(x)"      , 25, 0.01, 5.0, "45. * log(x)"      )
  8. exit
  9.