Parent Directory
|
Revision Log
|
Patch
revision 2496 by mahesh, Fri Dec 18 01:32:28 2009 UTC | revision 2497 by jpye, Wed Aug 17 09:34:25 2011 UTC | |
---|---|---|
# | Line 288 double datan(register double d) | Line 288 double datan(register double d) |
288 | ||
289 | double datan2(register double d) | double datan2(register double d) |
290 | { | { |
291 | return -ldexp(d/(1.0+d*d),1); | return -2*d/sqr(1+d*d); |
292 | } | } |
293 | ||
294 | #ifdef HAVE_ERF | #ifdef HAVE_ERF |
|
john.pye@anu.edu.au | ViewVC Help |
Powered by ViewVC 1.1.22 |