Re: LOGO-L> Xmas - The Gift of Life - Conway's +...

[Bob Gorman <bgorman@kncell.org>]

Andrzej ,

At 12:03 PM 12/26/98 +0100, you wrote:

>

>In fact each Logo is capable to make such computation like factorial of

>given number. You should have a little more patience then 2651

>milliseconds, but our Logo will discover (with it's well known turtle

>speed) 80658175170943878571660636856403766975289505440883277824000000000000

>as a 52! and even

>1029901674514562762384858386476504428305377245499907218232549177688787173247

>5287174542709871683888003235965704141638377695179741979175588724736000000000

>000000000000000 as 104!

Thanks, for such a quick and useful program. Also for the double deck - 104!

I modified it slightly to make visible the chain of calls.

The entrance code works fine, but it never executes the exit code for each procedure.

Here is your original:

>to b.sum :a :b

>output b.add :a :b 0

>end

And my modification for debug/teaching:

to b.sum :a :b

if :debug [show (LIST ">b.sum :a :b)]

output b.add :a :b 0

if :debug [show (LIST "<b.sum :a :b)]

end

I made the same modification to each routine, with the same result, entrance works, but exit doesn't.

Bob

"To get NEW
Answers, you
must ask NEW
Questions!"
- Bob
Gorman