ack/lang/pc/libpc/rnd.c

4 lines
62 B
C
Raw Normal View History

1984-07-20 10:44:57 +00:00
double _rnd(r) double r; {
return(r + (r<0 ? -0.5 : 0.5));
}