diff options
| author | dos-reis <gdr@axiomatics.org> | 2014-08-26 10:14:22 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2014-08-26 10:14:22 +0000 |
| commit | 65dfcc0a0e53c2fa74f62fe2eb69d7e37149475f (patch) | |
| tree | 43d9e0fd6ccef39606f59bf5a25242447ed6195d /src | |
| parent | ef059f3f675f384c68c15076dbcf220be1e01eee (diff) | |
| download | open-axiom-65dfcc0a0e53c2fa74f62fe2eb69d7e37149475f.tar.gz | |
(iBesselKGrad)[FunctionalSpecialFunction]: Fix thinko
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 7 | ||||
| -rw-r--r-- | src/algebra/combfunc.spad.pamphlet | 2 |
2 files changed, 7 insertions, 2 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index f3318a06..1a2e80f0 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,4 +1,9 @@ -2014-08-26 Gabriel Dos Reis <gdr@axiomatics.org> +2014-08-26 Raoul B. <raoulb@bluewin.ch> + + * algebra/combfunc.spad.pamphlet + (iBesselKGrad)[FunctionalSpecialFunction]: Fix thinko. + +2014-08-26 Gabriel Dos Reis <gdr@integrable-solutions.net> * Makefile.am (oa_src_include_headers): Remove. These headers are now linked by configure. diff --git a/src/algebra/combfunc.spad.pamphlet b/src/algebra/combfunc.spad.pamphlet index d89697fd..80be59fd 100644 --- a/src/algebra/combfunc.spad.pamphlet +++ b/src/algebra/combfunc.spad.pamphlet @@ -768,7 +768,7 @@ FunctionalSpecialFunction(R, F): Exports == Implementation where ahalf * (besselI (n-1,x) + besselI (n+1,x)) iBesselKGrad(l: List F): F == n := first l; x := second l - ahalf * (besselK (n-1,x) + besselK (n+1,x)) + ahalf * (-besselK (n-1,x) - besselK (n+1,x)) ipolygammaGrad(l: List F): F == n := first l; x := second l polygamma(n+1, x) |