From: Richard Kreckel <Richard.Kreckel@uni-mainz.de>
Date: Tue, 31 Jul 2001 21:28:10 +0000 (+0000)
Subject: - fixed example of evalf-function.
X-Git-Tag: release_0-9-2~3
X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=commitdiff_plain;h=307c6f9e8ad1d0545ffc17f6bec024a4c10b98c0;hp=36c5241d290222f71d501b253e3bbe3097221645

- fixed example of evalf-function.
---

diff --git a/doc/tutorial/ginac.texi b/doc/tutorial/ginac.texi
index 47948376..81bfb7f7 100644
--- a/doc/tutorial/ginac.texi
+++ b/doc/tutorial/ginac.texi
@@ -4437,7 +4437,10 @@ function that does so, in this case the one in class @code{numeric}:
 @example
 static ex cos_evalf(const ex & x)
 @{
-    return cos(ex_to<numeric>(x));
+    if (is_a<numeric>(x))
+        return cos(ex_to<numeric>(x));
+    else
+        return cos(x).hold();
 @}
 @end example