Lines Matching defs:div
158 (defun calc-poly-div (arg)
161 (let ((calc-poly-div-remainder nil))
163 (if (and calc-poly-div-remainder (null arg))
166 (calc-record calc-poly-div-remainder "prem")
167 (if (not (Math-zerop calc-poly-div-remainder))
169 (math-format-flat-expr calc-poly-div-remainder 0))
177 (defun calc-poly-div-rem (arg)
468 (math-div (math-mul (nth 2 math-simplify-expr)
569 (setcar np (if math-simplify-divisor-nover (math-div 1 temp) temp))
608 (math-div expr val))))
649 (math-mul (math-div (nth 1 lin) t1)
652 (math-div (car lin) t1)))
653 (math-div (nth 2 math-simplify-expr) t1))))
742 (math-div (nth 1 (nth 1 math-simplify-expr))
772 (math-div 1
791 (math-div 1 (math-known-sin (car n) (nth 1 n) 120 300)))))
795 (math-div 1 (math-known-sin (car n) (nth 1 n) '(frac 2 3) 300)))))
797 (math-div
802 (math-div
816 (math-div 1 (math-known-sin (car n) (nth 1 n) 120 0)))))
820 (math-div 1 (math-known-sin (car n) (nth 1 n) '(frac 2 3) 0)))))
822 (math-div 1 (nth 1 (nth 1 math-simplify-expr))))
824 (math-div
829 (math-div (list 'calcFunc-sqrt
900 (math-div (nth 1 (nth 1 math-simplify-expr))
904 (math-div (list 'calcFunc-sqrt
910 (math-div (math-sub 1 (list 'calcFunc-cos (nth 1 m)))
912 (math-div (list 'calcFunc-sin (nth 1 math-simplify-expr))
921 (math-div 1 (math-known-tan (car n) (nth 1 n) 120)))))
925 (math-div 1 (math-known-tan (car n) (nth 1 n) '(frac 2 3))))))
927 (math-div (list 'calcFunc-sqrt
931 (math-div (nth 1 (nth 1 math-simplify-expr))
935 (math-div 1 (nth 1 (nth 1 math-simplify-expr))))))
980 (math-div (nth 1 (nth 1 math-simplify-expr))
1004 (math-div 1
1024 (math-div (nth 1 (nth 1 math-simplify-expr))
1029 (math-div (list 'calcFunc-sqrt
1035 (math-div (math-sub (list 'calcFunc-cosh (nth 1 m)) 1)
1037 (math-div (list 'calcFunc-sinh (nth 1 math-simplify-expr))
1045 (math-div
1051 (math-div 1 (nth 1 (nth 1 math-simplify-expr))) 1)
1062 (math-div 1 (nth 1 (nth 1 math-simplify-expr))))
1065 (math-div
1071 (math-div (list 'calcFunc-sqrt
1080 (math-div (list 'calcFunc-sqrt
1085 (math-div (nth 1 (nth 1 math-simplify-expr))
1090 (math-div 1 (nth 1 (nth 1 math-simplify-expr))))))
1098 (math-div (math-half-circle t) 6))
1113 (math-div (math-half-circle t) 3))
1115 (math-div (math-mul (math-half-circle t) 2) 3))
1128 (math-div (math-half-circle t) 4))
1160 (math-div (list 'calcFunc-sqrt
1216 (math-div (nth 2 (nth 1 math-simplify-expr)) 2)))
1218 (list '^ (nth 1 (nth 1 math-simplify-expr)) (math-div 1 4)))
1277 (math-div (list 'calcFunc-sqrt (math-add 1 (nth 1 x)))
1330 (math-div (nth 2 math-simplify-expr) 2)))
1467 (list (nth 1 expr) (math-div 1 (nth 2 expr)))
1469 (list (math-div 1 (nth 2 expr)) (nth 1 expr))
1473 (math-div (nth 2 (nth 1 expr)) (nth 2 expr)))
1476 (list (math-div 1 (car res))
1477 (math-div (nth 1 expr)
1711 (mapcar (function (lambda (x) (math-div x (nth 2 expr))))