home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast2.iso / calculat / sm30a.zip / DO.(X) < prev    next >
Text File  |  1993-10-16  |  212b  |  8 lines
  1. #    do(y, x,xmin,xmax,dx) do y with x looping from xmin to xmax on step
  2. #    of dx. e.g.
  3. #    IN:  x:=1, do(x:=x+1, j,1,5,1)
  4. #    OUT: x:=5
  5. #    See also: list,repeat.
  6.  
  7. do(y_, x_, xmin_, xmax_) := do(y, x,xmin,xmax,1)
  8.