/* * Written by Michael Shalayeff. Public Domain */ /* LINTLIBRARY */ #include #include #include double sqrt(double x) { __asm__ __volatile__ ("fsqrt,dbl %0, %0" : "+f" (x)); return (x); } #ifdef lint /* PROTOLIB1 */ long double sqrtl(long double); #else /* lint */ __weak_alias(sqrtl, sqrt); #endif /* lint */