comparison lisp/calc/calc-cplx.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
356 ((eq (car a) 'neg) 356 ((eq (car a) 'neg)
357 (math-neg (calcFunc-im (nth 1 a)))) 357 (math-neg (calcFunc-im (nth 1 a))))
358 (t (calc-record-why 'numberp a) 358 (t (calc-record-why 'numberp a)
359 (list 'calcFunc-im a))))) 359 (list 'calcFunc-im a)))))
360 360
361 ;;; arch-tag: de73a331-941c-4507-ae76-46c76adc70dd
362 ;;; calc-cplx.el ends here 361 ;;; calc-cplx.el ends here