home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / programs / misc / mathplot / macros / test14.rexx < prev    next >
OS/2 REXX Batch file  |  1995-02-27  |  386b  |  20 lines
  1. /* test discussion */
  2. address "MPlot_ARexx"
  3. options results
  4.  
  5. setnumprecision 4
  6.  
  7. getpoints "cos(x) zero stem a."
  8. do i=0 to a.xpoints.count-1
  9. say i a.xpoints.i a.ypoints.i a.typ.i
  10. end
  11.  
  12. getpoints "cos(x) max stem a."
  13. do i=0 to a.xpoints.count-1
  14. say i a.xpoints.i a.ypoints.i a.typ.i
  15. end
  16.  
  17. getpoints "cos(x) turn stem a."
  18. do i=0 to a.xpoints.count-1
  19. say i a.xpoints.i a.ypoints.i a.typ.i
  20. end