27 |
;;; Code: |
;;; Code: |
28 |
|
|
29 |
;; This file is autoloaded from calc-ext.el. |
;; This file is autoloaded from calc-ext.el. |
|
(require 'calc-ext) |
|
30 |
|
|
31 |
|
(require 'calc-ext) |
32 |
(require 'calc-macs) |
(require 'calc-macs) |
33 |
|
|
|
(defun calc-Need-calc-poly () nil) |
|
|
|
|
|
|
|
34 |
(defun calcFunc-pcont (expr &optional var) |
(defun calcFunc-pcont (expr &optional var) |
35 |
(cond ((Math-primp expr) |
(cond ((Math-primp expr) |
36 |
(cond ((Math-zerop expr) 1) |
(cond ((Math-zerop expr) 1) |
1170 |
(defun calcFunc-expandpow (x n) |
(defun calcFunc-expandpow (x n) |
1171 |
(math-normalize (math-expand-power x n))) |
(math-normalize (math-expand-power x n))) |
1172 |
|
|
1173 |
|
(provide 'calc-poly) |
1174 |
|
|
1175 |
;;; arch-tag: d2566c51-2ccc-45f1-8c50-f3462c2953ff |
;;; arch-tag: d2566c51-2ccc-45f1-8c50-f3462c2953ff |
1176 |
;;; calc-poly.el ends here |
;;; calc-poly.el ends here |