Mercurial > hg > octave-lyh

diff scripts/specfun/factorial.m @ 6542:90bc7594a7f8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-04-19 03:19:11 by jwe]
author jwe
date Thu, 19 Apr 2007 03:19:12 +0000
parents 25cad08843a0
children 93c65f2a5668
line wrap: on
line diff
--- a/scripts/specfun/factorial.m
+++ b/scripts/specfun/factorial.m
@@ -35,6 +35,6 @@
 
 %!assert (factorial(5), prod(1:5))
 %!assert (factorial([1,2;3,4]), [1,2;6,24])
-%!assert (factorial(70), exp(sum(log(1:70))), -10*eps)
+%!assert (factorial(70), exp(sum(log(1:70))), -128*eps)
 %!fail ('factorial(5.5)', "must all be nonnegative integers")
 %!fail ('factorial(-3)', "must all be nonnegative integers")