Lines Matching defs:power
146 (list n (math-power-of-2 (math-abs n)))
197 (defvar math-power-of-2-cache (list 1 2 4 8 16 32 64 128 256 512 1024))
198 (defvar math-big-power-of-2-cache nil)
199 (defun math-power-of-2 (n) ; [I I] [Public]
201 (or (nth n math-power-of-2-cache)
202 (let* ((i (length math-power-of-2-cache))
203 (val (nth (1- i) math-power-of-2-cache)))
206 math-power-of-2-cache (nconc math-power-of-2-cache
210 (let ((found (assq n math-big-power-of-2-cache)))
214 (setq math-big-power-of-2-cache
215 (cons (cons n po2) math-big-power-of-2-cache))
220 (p math-power-of-2-cache)
231 (setq math-power-of-2-cache (nconc math-power-of-2-cache
292 (calc-record-why "*Warning: Modulo is not a power of 2"))
434 (math-quotient (math-clip a w) (math-power-of-2 (- n))))
436 (math-clip (math-mul a (math-power-of-2 n)) w))))))
460 (let ((two-to-sizem1 (math-power-of-2 (1- w)))
466 (t (let ((two-to-n (math-power-of-2 (- n))))
508 (if (Math-natnum-lessp a (math-power-of-2 (- -1 w)))
510 (math-sub a (math-power-of-2 (- w)))))
666 (math-radix-float-power afigs)))))
690 (explo -1) (vlo (math-radix-float-power explo))
691 (exphi 1) (vhi (math-radix-float-power exphi))
700 vhi (math-radix-float-power exphi)))
704 vlo (math-radix-float-power explo))))
707 vmid (math-radix-float-power expmid))
712 (let* ((sc (math-round (math-mul a (math-radix-float-power
777 (defun math-radix-float-power (n)
794 (math-radix-float-power
797 (math-radix-float-power