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:"
""
[ ": factorial ( n -- n! ) 0 <range> product ;" ]
[ ": factorial ( n -- n! ) 1 swap <range> product ;" ]
[ "100 factorial ." ]
""
[ "1 3 / 1 2 / + ." ]