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