5 lines
110 B
C
5 lines
110 B
C
|
SIGNR(statlink, n)
|
||
|
int *statlink ;
|
||
|
register double n ;
|
||
|
{ return( n < 0.0 ? - 1 : n == 0.0 ? 0 : 1 ) ; }
|