838 |
} |
} |
839 |
|
|
840 |
DEFUN ("ceiling", Fceiling, Sceiling, 1, 2, 0, |
DEFUN ("ceiling", Fceiling, Sceiling, 1, 2, 0, |
841 |
doc: /* Return the smallest integer no less than ARG. (Round toward +inf.) |
doc: /* Return the smallest integer no less than ARG. |
842 |
|
This rounds the value towards +inf. |
843 |
With optional DIVISOR, return the smallest integer no less than ARG/DIVISOR. */) |
With optional DIVISOR, return the smallest integer no less than ARG/DIVISOR. */) |
844 |
(arg, divisor) |
(arg, divisor) |
845 |
Lisp_Object arg, divisor; |
Lisp_Object arg, divisor; |
848 |
} |
} |
849 |
|
|
850 |
DEFUN ("floor", Ffloor, Sfloor, 1, 2, 0, |
DEFUN ("floor", Ffloor, Sfloor, 1, 2, 0, |
851 |
doc: /* Return the largest integer no greater than ARG. (Round towards -inf.) |
doc: /* Return the largest integer no greater than ARG. |
852 |
|
This rounds the value towards +inf. |
853 |
With optional DIVISOR, return the largest integer no greater than ARG/DIVISOR. */) |
With optional DIVISOR, return the largest integer no greater than ARG/DIVISOR. */) |
854 |
(arg, divisor) |
(arg, divisor) |
855 |
Lisp_Object arg, divisor; |
Lisp_Object arg, divisor; |