This repository has been archived on 2023-08-20. You can view files and clone it, but cannot push or open issues or pull requests.
yap-6.3/Logtalk/examples/miscellaneous/SCRIPT

31 lines
657 B
Plaintext
Raw Normal View History

=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.14.7
Copyright (c) 1998-2003 Paulo Moura. All Rights Reserved.
=================================================================
% towers of hanoi using three disks:
| ?- hanoi::run(3).
Move a disk from left to right.
Move a disk from left to middle.
Move a disk from right to middle.
Move a disk from left to right.
Move a disk from middle to left.
Move a disk from middle to right.
Move a disk from left to right.
yes
% placing eight queens in a chess table:
| ?- queens::queens(8).
[1-5,2-7,3-2,4-6,5-3,6-1,7-4,8-8]
yes