Fixed factorial example

cvs
Eduardo Cavazos 2005-12-02 10:13:01 +00:00
parent 08f15c4756
commit 288f987f12
1 changed files with 1 additions and 1 deletions

View File

@ -289,7 +289,7 @@ M: general-list tutorial-line
"" ""
"Try the following:" "Try the following:"
"" ""
[ ": factorial ( n -- n! ) 0 <range> product ;" ] [ ": factorial ( n -- n! ) 1 swap <range> product ;" ]
[ "100 factorial ." ] [ "100 factorial ." ]
"" ""
[ "1 3 / 1 2 / + ." ] [ "1 3 / 1 2 / + ." ]