]> pd.if.org Git - pdclib/blob - functions/math/sqrt.c
Merged PDPCLIB and Therx code.
[pdclib] / functions / math / sqrt.c
1 // ----------------------------------------------------------------------------
2 // $Id$
3 // ----------------------------------------------------------------------------
4 // Public Domain C Library - http://pdclib.sourceforge.net
5 // This code is Public Domain. Use, modify, and redistribute at will.
6 // ----------------------------------------------------------------------------
7
8 // ----------------------------------------------------------------------------
9 // C++
10
11 float sqrt( float x ) { /* TODO */ };
12 long double sqrt( long double x ) { /* TODO */ };
13
14 // ----------------------------------------------------------------------------
15 // Standard C
16
17 double sqrt( double x ) { /* TODO */ };
18
19 /* Therx code
20 {
21     double i = x / 2;
22     if ( x < 0 )
23     {
24         return 0;
25     }
26     // (15 DP) HOW GET MORE?
27     while ( ( fabs( i - ( x / i ) ) / i ) > 0.000000000000001)
28     {
29         i = ( i + ( x / i ) ) / 2;
30     }
31     return i;
32 }
33 */
34
35 float sqrtf( float x ) { /* TODO */ };
36 long double sqrtl( long double x ) { /* TODO */ };