Mercurial > hg > octave-max

changeset 2809:589761f7e756

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1997-03-11 16:15:34 by jwe]
author jwe
date Tue, 11 Mar 1997 16:15:39 +0000
parents 78b7b5b73215
children 502d33f2c113
files scripts/ChangeLog scripts/elfun/coth.m
diffstat 2 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,3 +1,7 @@
+Tue Mar 11 10:14:26 1997  John W. Eaton  <jwe@bevo.che.wisc.edu>
+
+	* elfun/coth.m: Write as cosh(x) ./ sinh(x) instead of 1 ./ tanh(x).
+
 Fri Mar  7 23:06:48 1997  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
 	* statistics/corrcoef.m: Make it actually work.
--- a/scripts/elfun/coth.m
+++ b/scripts/elfun/coth.m
@@ -27,6 +27,6 @@
     usage ("coth (z)");
   endif
 
-  w = 1 ./ tanh(z);
+  w = cosh (x) ./ sinh (x);
 
 endfunction