4 lines
77 B
C
4 lines
77 B
C
/* $Header$ */
|
|
double _rnd(r) double r; {
|
|
return(r + (r<0 ? -0.5 : 0.5));
|
|
}
|