This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "OCT: A portable Lisp implementation for quad-double precision floats". The branch, master has been updated via 8481ee30bafaec66ccb99a330e1aee392c4d894b (commit) from 25a15317f76cba7a1c38341edf5a418020e9b477 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 8481ee30bafaec66ccb99a330e1aee392c4d894b Author: Raymond Toy <toy.raymond@gmail.com> Date: Mon Mar 7 17:55:50 2011 -0500 Oops. Use jacobi-dn, not dn. diff --git a/qd-elliptic.lisp b/qd-elliptic.lisp index c29d9ce..9240eb0 100644 --- a/qd-elliptic.lisp +++ b/qd-elliptic.lisp @@ -194,7 +194,7 @@ ;; cn(u,m) = (1+sqrt(mu1))/mu * (dn(v,mu)^2-sqrt(mu1))/dn(v,mu) (multiple-value-bind (v mu root-mu1) (ascending-transform u m) - (let ((d (dn v mu))) + (let ((d (jacobi-dn v mu))) (* (/ (+ 1 root-mu1) mu) (/ (- (* d d) root-mu1) - d))))) \ No newline at end of file + d))))) ----------------------------------------------------------------------- Summary of changes: qd-elliptic.lisp | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) hooks/post-receive -- OCT: A portable Lisp implementation for quad-double precision floats