chore: Demo & examples
This commit is contained in:
parent
61178cbeac
commit
b294467587
9 changed files with 228 additions and 23 deletions
|
@ -4,7 +4,7 @@ printer :-
|
|||
shift(Name),
|
||||
write(Name), write(", ").
|
||||
|
||||
main :-
|
||||
ceremony_main :-
|
||||
writeln("/Ceremony starts/"),
|
||||
reset(printer, Name, Cont),
|
||||
\+ \+ ( Name = "John", call(Cont) ),
|
||||
|
@ -12,4 +12,4 @@ main :-
|
|||
writeln("and my parents!"),
|
||||
writeln("/Ceremony ends/").
|
||||
|
||||
:- initialization(main).
|
||||
:- initialization(ceremony_main).
|
||||
|
|
Reference in a new issue