Mercurial > emacs
comparison lisp/calc/calc-frac.el @ 88123:375f2633d815
New directory
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Mon, 08 Sep 2003 11:56:09 +0000 |
parents | 695cf19ef79e |
children | 68c22ea6027c |
comparison
equal
deleted
inserted
replaced
52428:27bc8b966642 | 88123:375f2633d815 |
---|---|
223 (math-reject-arg a "*Division by zero") | 223 (math-reject-arg a "*Division by zero") |
224 (math-make-frac (math-trunc a) (math-trunc b))) | 224 (math-make-frac (math-trunc a) (math-trunc b))) |
225 (math-reject-arg b 'integerp)) | 225 (math-reject-arg b 'integerp)) |
226 (math-reject-arg a 'integerp))) | 226 (math-reject-arg a 'integerp))) |
227 | 227 |
228 ;;; arch-tag: 89d65274-0b3b-42d8-aacd-eaf86da5b4ea | |
229 ;;; calc-frac.el ends here | 228 ;;; calc-frac.el ends here |