diff options
Diffstat (limited to 'doc/tutorial/guile-tut.texi')
-rw-r--r-- | doc/tutorial/guile-tut.texi | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/doc/tutorial/guile-tut.texi b/doc/tutorial/guile-tut.texi index 9379f6ee8..d38638b10 100644 --- a/doc/tutorial/guile-tut.texi +++ b/doc/tutorial/guile-tut.texi @@ -523,7 +523,7 @@ guile> @kbd{(caddr ls)} guile> @kbd{(append ls (list 8 9 10))} @result{} (1 2 3 4 5 6 7 8 9 10) guile> @kbd{(reverse ls)} - @result{} (10 9 8 7 6 5 4 3 2 1) + @result{} (7 6 5 4 3 2 1) ;; @r{ask if 12 is in the list --- it obviously is not} guile> @kbd{(memq 12 ls)} @result{} #f @@ -552,8 +552,8 @@ guile> @kbd{(map sin ls2)} @result{} (0.909297426825682 0.141120008059867 -0.756802495307928) ;; @r{make a list in which the squaring function has been} ;; @r{applied to all elements of @code{ls}} -guile> @kbd{(map (lambda (n) (expt n n)) ls)} - @result{} (1 4 27 256 3125 46656 823543) +guile> @kbd{(map (lambda (n) (* n n)) ls)} + @result{} (1 4 9 16 25 36 49) @end smalllisp @smalllisp |