home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 13 / AACD13.ISO / AACD / Resources / System / BoingBag1 / Contributions / Workbench / RexxArpLib3p6 / rexx / TestGraph.rexx < prev   
OS/2 REXX Batch file  |  1989-03-23  |  290b  |  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.