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 ) ; }
|