I think Peder Jakobsen wrote:

>   (while (<= ?i 52) do
>            (assert (deck2 (index ?i)))
>            )

This is an endless loop; ?i never changes. Every iteration attempts to
assert the same fact, with the same value of ?i; the first time it
succeeds, subsequent ones return FALSE and fail.

You need to increment ?i in the loop -- i.e.,

   (while (<= ?i 52) do
            (assert (deck2 (index ?i)))
            (bind ?i (+ ?i 1))
            )


---------------------------------------------------------
Ernest Friedman-Hill  
Science and Engineering PSEs        Phone: (925) 294-2154
Sandia National Labs                FAX:   (925) 294-2234
PO Box 969, MS 9012                 [EMAIL PROTECTED]
Livermore, CA 94550         http://herzberg.ca.sandia.gov

--------------------------------------------------------------------
To unsubscribe, send the words 'unsubscribe jess-users [EMAIL PROTECTED]'
in the BODY of a message to [EMAIL PROTECTED], NOT to the list
(use your own address!) List problems? Notify [EMAIL PROTECTED]
--------------------------------------------------------------------

Reply via email to