home *** CD-ROM | disk | FTP | other *** search
/ Otherware / Otherware_1_SB_Development.iso / mac / developm / language / j32.sit / tut / TUT8.JS < prev    next >
Encoding:
Text File  |  1991-06-13  |  315 b   |  23 lines
  1.                CLASSIFICATION Eb
  2.    x=. 1 2 3 4 5 6 7
  3.    y=. (x-3) * (x-5)
  4.    y
  5. 8 3 0 _1 0 3 8
  6.    range=. m-i. >:(m=. >./y)-<./y
  7.    range
  8. 8 7 6 5 4 3 2 1 0 _1
  9.    bc=. range <:/ y
  10.    bc { ' *'
  11. *     *
  12. *     *
  13. *     *
  14. *     *
  15. *     *
  16. **   **
  17. **   **
  18. **   **
  19. *** ***
  20. *******
  21.    </\ 0 0 0 1 0 1 1 0 1
  22. 0 0 0 1 0 0 0 0 0
  23.