home *** CD-ROM | disk | FTP | other *** search
/ Otherware / Otherware_1_SB_Development.iso / mac / developm / language / j32.sit / tut / TUT26.JS < prev    next >
Encoding:
Text File  |  1991-06-13  |  420 b   |  24 lines
  1.           CONNECTIONS: family Ic
  2.    
  3.    cm
  4. 0 0 0 0 0 0 0 0
  5. 0 0 1 0 0 0 0 1
  6. 1 1 0 1 0 0 0 0
  7. 0 0 0 0 0 1 0 1
  8. 0 0 1 1 0 0 0 0
  9. 1 0 1 0 0 0 1 1
  10. 0 0 0 1 0 0 0 0
  11. 1 0 1 1 1 0 1 0
  12.    points=. 1 0 0 0 0 0 0 1
  13.    points +./ . *. cm
  14. 1 0 1 1 1 0 1 0
  15.    points+.points+./ . *.cm
  16. 1 0 1 1 1 0 1 1
  17.    
  18.    immfam=. '':'x.+.x.+./ . *.y.'
  19.    points immfam cm
  20. 1 0 1 1 1 0 1 1
  21.    fam=.'':'immfam&y.^:(#y.)x.'
  22.    points fam cm
  23. 1 1 1 1 1 1 1 1
  24.