# HG changeset patch
# User jwe
# Date 1073772947 0
# Node ID ae49c6ba722cc3f5b4c3d747f3ba925413ac778b
# Parent  bdc51b369a78bddb7785819645228a455ff4ec4d
[project @ 2004-01-10 22:15:47 by jwe]

diff -r bdc51b369a78 -r ae49c6ba722c scripts/ChangeLog
--- a/scripts/ChangeLog	Sat Jan 10 18:16:03 2004 +0000
+++ b/scripts/ChangeLog	Sat Jan 10 22:15:47 2004 +0000
@@ -1,5 +1,8 @@
 2004-01-10  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
+	* elfun/acot.m: Return atan (1./z).
+	From Gregory Vanuxem <g.vanuxem@wanadoo.fr>.
+
 	* miscellaneous/dir.m: New file.
 
 	* general/num2str.m: Use "%d" as format if values are ints with
diff -r bdc51b369a78 -r ae49c6ba722c scripts/elfun/acot.m
--- a/scripts/elfun/acot.m	Sat Jan 10 18:16:03 2004 +0000
+++ b/scripts/elfun/acot.m	Sat Jan 10 22:15:47 2004 +0000
@@ -30,6 +30,6 @@
     usage ("acot (z)");
   endif
 
-  w = pi/2 - atan (z);
+  w = atan (1./z);
 
 endfunction