in reply to Who's a thief?
in thread Artificial Intelligence Programming in Perl
or in English:steals(PERP, STUFF) :- .... owns(VICTIM,STUFF), not(knows(PERP,VICTIM)). knows(badguy,merlyn). owns(merlyn,gold).
* And the person doesn't know the person who owns the stuff they might steal.
On the other hand the badguy can steal your rubies:
and so can merlyn but only if we're allowed to add one more fact:?- steals(badguy,X). X = rubies Yes
I think you might want to meet merlyn really fast, and maybe get him to introduce you to badguy. :)thief(merlyn). ?- steals(merlyn,X). Yes
jarich
Update: Oops. Forgot that the PERP had to be a thief in order to be able to steal. Which would have meant that merlyn couldn't have stolen the rubies and I would have appeared to not have known what I was talking about. :) I've fixed this now of course.
|
---|