/[ascend]/trunk/ascend/compiler/func.c
ViewVC logotype

Diff of /trunk/ascend/compiler/func.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch 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

Legend:
Removed from v.2496  
changed lines
  Added in v.2497

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22