Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 5.1.1
- neg(Coś) :- call(Coś), !, fail; true.
- 5.1.2
- ifelse(Warunek, True, False) :-
- call(Warunek), call(True), ! ; call(False).
- 5.2.1
- func_call(Fun, Wyn) :-
- Fun =.. Fun2List,
- append(Fun2List, Wyn, Predykat),
- Zapytanie =.. Predykat,
- call(Zapytanie).
Add Comment
Please, Sign In to add comment