On 07/27/2012 09:26 AM, Bruce Evans wrote:

%     hm1 = -1;
%     for (i=0;i<12;i++) hm1 += val[i];
%     return (cpack(0.5 * log1p(hm1), atan2(y, x)));

It is the trailing terms that I think don't work right here.  You sort
them and add from high to low, but normally it is necessary to add
from low to high (consider terms [1, DBL_EPSILON/2, DBL_EPSILON/4]).
Adding from high to low cancels with the -1 term, but then only
particular values work right.  Also, I don't see how adding the low
terms without extra precision preserves enough precision.

I understand what you are saying. But in this case adding in order of smallest to largest (adding -1 last) won't work. If all the signs in the same direction, it would work. But -1 has the wrong sign.

But I can also tell you that I haven't thought my algorithm through every special case. I can tell you it seems to work in all the examples I tried. But I don't have a mathematical proof.
_______________________________________________
freebsd-bugs@freebsd.org mailing list
http://lists.freebsd.org/mailman/listinfo/freebsd-bugs
To unsubscribe, send any mail to "freebsd-bugs-unsubscr...@freebsd.org"

Reply via email to