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