9 lines
93 B
C
9 lines
93 B
C
/* $Header$ */
|
|
|
|
_sgn(v)
|
|
double v;
|
|
{
|
|
if( v>0) return(1);
|
|
if( v<0) return(-1);
|
|
return(0);
|
|
}
|