((/nonstd/fft/fft-trig-with-axioms.lisp::p-halve (nil nil nil nil (if) nil nil) (nil nil (powerlist-p) (p-tie /) nil nil nil) ((x x) (2) (recursive-call recursive-call) nil nil nil nil) (nil nil (p-untie-l p-untie-r) nil nil nil nil) ((x x) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/fft/fft-trig-with-axioms.lisp::p-offset (nil nil nil nil (if) nil nil) (nil nil (powerlist-p) (p-tie +) nil nil nil) ((p x p) nil nil (recursive-call recursive-call) nil nil nil) ((x x) nil (p-untie-l p-untie-r) nil nil nil nil) ((p p) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/fft/fft-trig-with-axioms.lisp::p-exponents (nil nil nil nil (if) nil nil) (nil nil (acl2::zp) (* let) nil nil nil) ((n acl2-pi (sqrt-expnts (p-halve (p-exponents (1- n))))) (2) nil (p-tie) nil nil nil) ((sqrt-expnts) nil nil (p-offset) nil nil nil) ((acl2-pi sqrt-expnts) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/fft/fft-trig-with-axioms.lisp::complex-expt (nil nil nil (complex) nil nil nil) (nil nil (acl2-cosine acl2-sine) nil nil nil nil) ((x x) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/fft/fft-trig-with-axioms.lisp::p-complex-expt (nil nil nil nil (if) nil nil) (nil nil (powerlist-p complex-expt) (p-tie) nil nil nil) ((x x) nil (recursive-call recursive-call) nil nil nil nil) (nil nil (p-untie-l p-untie-r) nil nil nil nil) ((x x) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/fft/fft-trig-with-axioms.lisp::p-expt-omega (nil nil (p-complex-expt) nil nil nil nil) (nil nil (p-exponents) nil nil nil nil) ((n) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/fft/fft-trig-with-axioms.lisp::p-expt-omega-sqrt (nil nil (p-complex-expt) nil nil nil nil) (nil nil (p-halve) nil nil nil nil) (nil nil (p-exponents) nil nil nil nil) ((n) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/fft/fft-trig-with-axioms.lisp::p-acl2-number-list (nil nil nil nil (if) nil nil) (nil nil (powerlist-p acl2::acl2-numberp) (and) nil nil nil) ((x x) nil (recursive-call recursive-call) nil nil nil nil) (nil nil (p-untie-l p-untie-r) nil nil nil nil) ((x x) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/fft/fft-trig-with-axioms.lisp::p-ft-expt-omega (nil nil nil (eval-poly) nil nil nil) ((x) nil (p-expt-omega) nil nil nil nil) (nil nil (p-depth) nil nil nil nil) ((x) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/fft/fft-trig-with-axioms.lisp::p-fft-expt-omega (nil nil nil nil (if) nil nil) (nil nil (powerlist-p acl2::fix) (p-tie) nil nil nil) ((x x) nil nil (p-+ p--) nil nil nil) (nil nil (recursive-call recursive-call) (p-* p-*) nil nil nil) (nil nil (p-unzip-l p-expt-omega-sqrt recursive-call p-unzip-l p-expt-omega-sqrt recursive-call) nil nil nil nil) ((x x) nil (1- p-unzip-r 1- p-unzip-r) nil nil nil nil) ((x x) nil (p-depth p-depth) nil nil nil nil)))