Lines Matching defs:div
2032 (calc-binary-op "/" 'calcFunc-div arg 0 'calcFunc-inv '/)))
2437 ( / . math-div )
2573 ((eq (car a) 'frac) (math-div (math-float (nth 1 a)) (nth 2 a)))
2968 (let ((res (math-div-bignum-digit (cdr a) b)))
2974 (let ((res (math-div-bignum (cdr a) (cdr b))))
2990 (car (math-div-bignum-digit (cdr a) b)))))
2996 (res (math-div-bignum-big (math-mul-bignum-digit (cdr a) d 0)
3005 (defun math-div-bignum (a b)
3010 (res (math-div-bignum-big (math-mul-bignum-digit a d 0)
3016 (car (math-div-bignum-digit (cdr res) d)))))
3017 (let ((res (math-div-bignum-digit a (car b))))
3021 (defun math-div-bignum-digit (a b)
3023 (let* ((res (math-div-bignum-digit (cdr a) b))
3030 (defun math-div-bignum-big (a b alen blen) ; [l.l l L]
3033 (let* ((res (math-div-bignum-big (cdr a) b (1- alen) blen))
3035 (res2 (math-div-bignum-part num b blen)))
3040 (defun math-div-bignum-part (a b blen) ; a < b*1000 [D.l l L]
3044 (math-div-bignum-try a b (math-mul-bignum-digit b guess 0) guess)))
3046 (defun math-div-bignum-try (a b c guess) ; [D.l l l D]
3049 (math-div-bignum-try a b (math-sub-bignum c b) (1- guess))
3054 (defun math-div (a b)
3058 (math-div-by-zero a b))
3063 (math-div-zero a b)))
3074 (math-div-float (math-make-float a 0)
3078 (calc-div-fractions a b))
3085 (math-div-float a b)))
3087 (math-div-objects-fancy a b))))
3089 (math-div-symb-fancy a b))))
3091 (defun math-div-float (a b) ; [F F F]