1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-04 11:40:22 +00:00

(calcFunc-ldiv): New function.

This commit is contained in:
Jay Belanger 2005-11-14 20:12:35 +00:00
parent 882108c7b3
commit d883348df8

View File

@ -1854,6 +1854,10 @@
(math-mul-zero b a))))
(list '/ a b)))
;;; Division from the left.
(defun calcFunc-ldiv (a b)
(math-mul (math-pow a -1) b))
(defun calcFunc-mod (a b)
(math-normalize (list '% a b)))