home *** CD-ROM | disk | FTP | other *** search
- /* test discussion */
- address "MPlot_ARexx"
- options results
-
- setnumprecision 4
-
- getpoints "cos(x) zero stem a."
- do i=0 to a.xpoints.count-1
- say i a.xpoints.i a.ypoints.i a.typ.i
- end
-
- getpoints "cos(x) max stem a."
- do i=0 to a.xpoints.count-1
- say i a.xpoints.i a.ypoints.i a.typ.i
- end
-
- getpoints "cos(x) turn stem a."
- do i=0 to a.xpoints.count-1
- say i a.xpoints.i a.ypoints.i a.typ.i
- end