home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / lang / lisp / 2815 < prev    next >
Encoding:
Text File  |  1992-11-06  |  1.6 KB  |  39 lines

  1. Newsgroups: comp.lang.lisp
  2. Path: sparky!uunet!ferkel.ucsb.edu!taco!gatech!swrinde!zaphod.mps.ohio-state.edu!saimiri.primate.wisc.edu!ames!ads.com!chesapeake.ads.com!chesapeake!chyde
  3. From: chyde@pecos.ads.com (Clinton Hyde)
  4. Subject: Re: forward-chaining, Rete-type, OPS5-like packages available ?
  5. In-Reply-To: secrist@kxovax.enet.dec.com's message of 2 Nov 92 18:52:30 GMT
  6. Message-ID: <CHYDE.92Nov5145933@pecos.ads.com>
  7. Lines: 25
  8. Sender: usenet@chesapeake.ads.com (USENET News)
  9. Organization: Advanced Decision Systems, Mountain View, CA 94043, +1 (415)
  10.     960-7300
  11. References: <2161@sousa.ltn.dec.com>
  12. Date: Thu, 5 Nov 1992 19:59:33 GMT
  13.  
  14.  
  15. I don't know about a summary, but a version of OPS5 is freely
  16. available in Lisp. I've had it for years, and built a reasonably
  17. friendly UI for it on the Xplorer. it runs about 32 rules/sec on an
  18. Exp-1, ~120 rules/sec on an Exp-2, about 200 on an Exp-2+.
  19.  
  20. it is grossly inefficient, building this humonguous network of stuff
  21. using property-lists (well, the code dates from late 70s, so that's
  22. not too surprising). you'd think that use of more compact structures
  23. of some sort ought to speed things up a bit. I have not tried to
  24. dissect the code enough to make this kind of change. 
  25.  
  26. be happy to supply all of the above, including the NASA benchmarks
  27. code (some mid-80s examples, including the famous monkeys&bananas).
  28.  
  29. it runs about 200k, or thereabouts.
  30.  
  31.  -- clint
  32. --
  33.  
  34. Clint Hyde        "Give me a LispM or give me death!" -- anonymous
  35.  
  36. Advanced Decision Systems/BAH    Internet:  chyde@chesapeake.ads.com
  37. 1953 Gallows Rd, Suite 600
  38. Vienna, VA  22182-3934        (703) 902-7130
  39.