http://www.ousob.com --- Legacy Redefined #include <math.h> #include <extend50.h> CLIPPER b_sqrt() { int gotAproblem = 0; double result; double number = _parnd(1); if( !PCOUNT || !ISNUM(1) ) { gotAproblem++; } if( number < 0 ) { gotAproblem++; } if( !gotAproblem ) { result = sqrt( number ); } _retnd( result ); }