[Maxima-commits] CVS: maxima/tests rtestconjugate.mac,1.2,1.3

[Barton W. <wil...@us...>]

Update of /cvsroot/maxima/maxima/tests
In directory sc8-pr-cvs16:/tmp/cvs-serv26819/tests

Modified Files:
	rtestconjugate.mac 
Log Message:
append tests for bug 1639890 and bug in conjugate(atan(...))

Index: rtestconjugate.mac
===================================================================
RCS file: /cvsroot/maxima/maxima/tests/rtestconjugate.mac,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- rtestconjugate.mac	28 Jul 2006 15:56:49 -0000	1.2
+++ rtestconjugate.mac	11 Apr 2007 15:44:08 -0000	1.3
@@ -270,5 +270,26 @@
 is(op(conjugate(f[6](x))) = 'conjugate);
 true$
 
+/* Tests for bug 1639890  */
+(assume(notequal(y,0)),0);
+0$
+
+conjugate(log(-1 + %i * y));
+log(-1 - %i * y)$
+
+conjugate(log(x + %i * y));
+log(x - %i * y)$
+
+conjugate(log(%pi + %i * y));
+log(%pi - %i * y)$
+
+(forget(notequal(y,0)),0);
+0$
+
+/* Test for bug (conjugate of atan) fixed by CVS revisions 1.9 and 1.11 */
+
+conjugate(atan(x));
+atan(x);
+
 kill (values);
 done;