Advertisement
starbeamrainbowlabs

Lab3.Car.pl

Oct 20th, 2015
389
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Prolog 0.38 KB | None | 0 0
  1. :- dynamic wont_start/0.
  2. :- dynamic flat_battery/0.
  3. :- dynamic lights_broken/0.
  4.  
  5. car_fault(electrical) :- % colon-if represents IF in Prolog.
  6.     wont_start; % Semi-colons represent OR in Prolog.
  7.     lights_broken. % Full stops terminate rules.
  8. car_fault(electrical) :-
  9.     (wont_start, % Commas represent AND in Prolog.
  10.     lights_broken);
  11.     flat_battery.
  12.  
  13. wont_start.
  14. lights_broken.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement