Mercurial > hg > octave-lyh

comparison scripts/elfun/acoth.m @ 6046:34f96dd5441b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-10-10 16:10:25 by jwe]
author jwe
date Tue, 10 Oct 2006 16:10:31 +0000
parents 4c8a2e4e0717
children 93c65f2a5668
comparison
equal deleted inserted replaced
6045:421d8a903df7 6046:34f96dd5441b
25 ## Author: jwe 25 ## Author: jwe
26 26
27 function w = acoth (z) 27 function w = acoth (z)
28 28
29 if (nargin != 1) 29 if (nargin != 1)
30 usage ("acoth (z)"); 30 print_usage ();
31 endif 31 endif
32 32
33 w = atanh (1 ./ z); 33 w = atanh (1 ./ z);
34 34
35 endfunction 35 endfunction