Home
last modified time | relevance | path

Searched refs:pexpt (Results 1 – 25 of 35) sorted by relevance

12

/dports/math/maxima/maxima-5.43.2/src/
H A Dresult.lisp51 (pexpt
55 (pexpt (makprod (second res) nil)
68 (t (list (pexpt (caddr p1) (cadr p2))
72 (list (pexpt (caddr p2) (cadr p1))
138 for h = 1 then (pquotient (pexpt g d) h^1-d)
141 for h^1-d = (if (equal h 1) 1 (pexpt h (1- d)))
142 if (zerop degq) return (if (pzerop q) q (pquotient (pexpt q d) h^1-d))
156 (setq c (ptimeschk c (pexpt (p-lc v)
164 (pquotient (pexpt (pquotientchk r a) (p-le v)) c))))
167 a (pexpt (p-lc v) (+ (p-le u) 1 (- (p-le v)))))
H A Drat3b.lisp78 (cons (pexpt v 2) 1)))
128 (pexpt (cadr denom) 2)))))))))
207 ($algebraic (ratreduce (pexpt (car x) n) (pexpt (cdr x) n)))
208 (t (cons (pexpt (car x) n) (pexpt (cdr x) n)))))
H A Drat3a.lisp432 (pplus (ptimes ans (pexpt val (- last-le (pt-le terms))))
436 (ptimes ans (pexpt val last-le))))))
565 (defun pexpt (p n) function
571 ((minusp n) (pquotient 1 (pexpt p (- n))))
586 (pcoefadd (* n (p-le p)) (pexpt (p-lc p) n) nil)))
606 (2 (pexpt rest 2))
953 (setq mult (ptimes mult (pexpt lc (- deg (pt-le p)))))
977 (setq a (pexpt a e))
979 (prog2 (setq a (pexpt (p-lc q) e))
H A Drat3c.lisp243 q (pquotientchk-safe (prem p q) (pexpt (p-lc p) d))
253 for h = 1 then (pquotientchk-safe (pexpt g d) h^1-d)
257 (pexpt h (1- d)))
270 (if quop (setq lc (pexpt (pt-lc v) (1+ k))))
272 (if quop (setq quo (cons (ptimes (pt-lc u) (pexpt (pt-lc v) k))
278 (t (pctimes1 (pexpt lcv k) u))))
281 (setq u (pctimes1 (pexpt lcv (- (1- k) m)) u))))
H A Dsinint.lisp43 (push (pexpt (car rf) n) pd))
104 (setq thebot (pexpt arootf kx))
226 (ratdifference (cons (pexpt (polcoef p2e 1) 2) 1)
293 (pexpt (ptimes 2 (polcoef p2e 2)) 2)
296 (pcoefadd 0 (pexpt (polcoef p2e 1) 2) ()))))
441 (pexpt (car a) (cadr a))
H A Dlesfac.lisp51 (ptimes (pexpt (pget (caar a)) ;CHECK FOR ALG. TRUNC.
292 (ptimes (pexpt (getunhack (car p)) (cadr p)) (pflat1 (caddr p))))
297 ((null a) (ptimes ans (pexpt val ld)))
298 (setq ans (pplus (ptimes ans (pexpt val (- ld (car a))))
H A Dnalgfa.lisp36 (ptimes ans (pexpt val (- ld (car a))))
38 ((null a) (ptimes ans (pexpt val ld)))))))
81 ((pexpt p1 (cadr p2)))))
83 (pexpt p2 (cadr p1)))
172 (pexpt (cadr (ratrep* alg)) (car p))
H A Drat3d.lisp183 ((alg p) (pexpt p (expt modulus (1- (car (alg p))))))
239 (setq d (pplus (pexpt b 2) (ptimes -4 (ptimes a c))))
286 (pdifference poly (pexpt ans n))))
H A Drisch.lisp266 (setq thebot (pexpt arootf kx))
619 (r+ (r* (car y) (pexpt (list mainvar 1 1) k))
729 (setq p (ptimes p (pexpt (cadar alist) alphar)))))
734 (setq p (ptimes p (pexpt (cadar flist) alphar)))))
829 (setq y (r+ y (setq ymu (r* ymu (pexpt (list logeta 1 1) mu) ))))
860 (setq y (r+ y (setq ymu (r* ymu (pexpt (list logeta 1 1) mu)))))
921 l3 (setq y (r+ y (r* (car temp) (pexpt (list logeta 1 1) rmu))))
H A Dalgfac.lisp274 a (pexpt a modulus)
286 (setq ans (pplus ans (ptimes (pexpt (car a) n) (car l))))
H A Dlaplac.lisp729 (setq apart (pexpt (car factor) (cadr factor)))
775 (setq y (pexpt q k))
/dports/math/maxima/maxima-5.43.2/share/affine/
H A Dsub-proj.lisp69 (cond ((atom poly) (setq poly (ptimes poly (pexpt denom deg))))
75 (pexpt denom (- deg degree)))))
80 (ptimes cof (pexpt denom (- deg degree)))))))))
93 (t(setq poly (ptimes poly (pexpt denom deg)))))
117 (ptimes (pexpt repl(car tail))
159 (cond (reduce (ratreduce answ (pexpt denom deg)))
160 (t (cons answ (pexpt denom deg)))))
337 (pexpt mon (- (p-le r) (p-le divisor)))))
H A Dpolybas.lisp65 (cond ((atom poly) (ptimes poly (pexpt denom degree)))
74 (pexpt (cdr (assoc (p-var poly) a-list :test #'equal))
85 (pexpt mon deg)
89 (t (ptimes (pexpt denom degree) poly))))
H A Daquotient.lisp358 (t (ptimes f (setq creqd (pexpt (p-cof g)
488 (setq v (afp-quotient r (ptimes gg (pexpt h delta))))
490 (setq g^delta (pexpt gg delta))
493 (pexpt h (- delta 1))))
512 do (setq numer (one-ptimes numer (pexpt fact deg)))
518 do (setq denom (one-ptimes denom (pexpt fact (- deg))))
634 do (setq answ (ptimes answ (pexpt (p-cof pol) deg)))
/dports/print/ghostscript7-base/ghostscript-7.07/src/
H A Dgdevpdfc.c63 cie_values_are_exponential(floatp va, floatp vb, floatp k, float *pexpt) in cie_values_are_exponential() argument
74 *pexpt = p; in cie_values_are_exponential()
79 cie_scalar_cache_is_exponential(const gx_cie_scalar_cache * pc, float *pexpt) in cie_scalar_cache_is_exponential() argument
86 pexpt); in cie_scalar_cache_is_exponential()
94 cie_vector_cache_is_exponential(const gx_cie_vector_cache * pc, float *pexpt) in cie_vector_cache_is_exponential() argument
101 pexpt); in cie_vector_cache_is_exponential()
/dports/print/ghostscript7-x11/ghostscript-7.07/src/
H A Dgdevpdfc.c63 cie_values_are_exponential(floatp va, floatp vb, floatp k, float *pexpt) in cie_values_are_exponential() argument
74 *pexpt = p; in cie_values_are_exponential()
79 cie_scalar_cache_is_exponential(const gx_cie_scalar_cache * pc, float *pexpt) in cie_scalar_cache_is_exponential() argument
86 pexpt); in cie_scalar_cache_is_exponential()
94 cie_vector_cache_is_exponential(const gx_cie_vector_cache * pc, float *pexpt) in cie_vector_cache_is_exponential() argument
101 pexpt); in cie_vector_cache_is_exponential()
/dports/print/ghostscript8-base/ghostscript-8.71/base/
H A Dgdevpdfc.c90 float *pexpt) in cie_values_are_exponential() argument
101 *pexpt = p; in cie_values_are_exponential()
106 cie_scalar_cache_is_exponential(const gx_cie_scalar_cache * pc, float *pexpt) in cie_scalar_cache_is_exponential() argument
112 pexpt); in cie_scalar_cache_is_exponential()
120 cie_vector_cache_is_exponential(const gx_cie_vector_cache * pc, float *pexpt) in cie_vector_cache_is_exponential() argument
126 pexpt); in cie_vector_cache_is_exponential()
/dports/print/ghostscript8-x11/ghostscript-8.71/base/
H A Dgdevpdfc.c90 float *pexpt) in cie_values_are_exponential() argument
101 *pexpt = p; in cie_values_are_exponential()
106 cie_scalar_cache_is_exponential(const gx_cie_scalar_cache * pc, float *pexpt) in cie_scalar_cache_is_exponential() argument
112 pexpt); in cie_scalar_cache_is_exponential()
120 cie_vector_cache_is_exponential(const gx_cie_vector_cache * pc, float *pexpt) in cie_vector_cache_is_exponential() argument
126 pexpt); in cie_vector_cache_is_exponential()
/dports/math/mcsim/mcsim-6.2.0/sim/
H A Dmh.c326 if (plevel->pexpt == NULL)
329 pos = &(plevel->pexpt->os);
615 if (plevel->pexpt == NULL)
2258 PEXPERIMENT pExpt = plevel->pexpt;
2398 if (plevel->pexpt == NULL)
2401 pos = &(plevel->pexpt->os);
2638 PEXPERIMENT pExpt = plevel->pexpt;
2688 PEXPERIMENT pExpt = plevel->pexpt;
3364 PEXPERIMENT pExpt = plevel->pexpt;
3613 pos = &(plevel->pexpt->os);
[all …]
H A Dsimi.c2359 if (!(plevel->pexpt = (PEXPERIMENT) malloc(sizeof(EXPERIMENT)))) in NewExperiment()
2362 panal->pexpCurrent = plevel->pexpt; in NewExperiment()
2497 plevel->pexpt = NULL; in SetLevel()
2607 if (plevel->pexpt != NULL) { in FreeOneLevel()
2608 FreeList(&plevel->pexpt->plistParmMods, &FreeVarMod, FALSE); in FreeOneLevel()
2610 POUTSPEC pos = &plevel->pexpt->os; in FreeOneLevel()
2634 free(plevel->pexpt); in FreeOneLevel()
H A Dsim.h482 PEXPERIMENT pexpt; /* Ptr to expt struct, NULL if not expt member
/dports/print/ghostscript9-base/ghostscript-9.06/base/
H A Dgdevpdfc.c97 float *pexpt) in cie_values_are_exponential() argument
108 *pexpt = p; in cie_values_are_exponential()
113 cie_scalar_cache_is_exponential(const gx_cie_scalar_cache * pc, float *pexpt) in cie_scalar_cache_is_exponential() argument
119 pexpt); in cie_scalar_cache_is_exponential()
127 cie_vector_cache_is_exponential(const gx_cie_vector_cache * pc, float *pexpt) in cie_vector_cache_is_exponential() argument
133 pexpt); in cie_vector_cache_is_exponential()
/dports/print/ghostscript9-x11/ghostscript-9.06/base/
H A Dgdevpdfc.c97 float *pexpt) in cie_values_are_exponential() argument
108 *pexpt = p; in cie_values_are_exponential()
113 cie_scalar_cache_is_exponential(const gx_cie_scalar_cache * pc, float *pexpt) in cie_scalar_cache_is_exponential() argument
119 pexpt); in cie_scalar_cache_is_exponential()
127 cie_vector_cache_is_exponential(const gx_cie_vector_cache * pc, float *pexpt) in cie_vector_cache_is_exponential() argument
133 pexpt); in cie_vector_cache_is_exponential()
/dports/print/ghostscript9-agpl-base/ghostscript-9.52/devices/vector/
H A Dgdevpdfc.c98 float *pexpt) in cie_values_are_exponential() argument
109 *pexpt = p; in cie_values_are_exponential()
114 cie_scalar_cache_is_exponential(const gx_cie_scalar_cache * pc, float *pexpt) in cie_scalar_cache_is_exponential() argument
120 pexpt); in cie_scalar_cache_is_exponential()
128 cie_vector_cache_is_exponential(const gx_cie_vector_cache * pc, float *pexpt) in cie_vector_cache_is_exponential() argument
134 pexpt); in cie_vector_cache_is_exponential()
/dports/print/ghostscript9-agpl-x11/ghostscript-9.52/devices/vector/
H A Dgdevpdfc.c98 float *pexpt) in cie_values_are_exponential() argument
109 *pexpt = p; in cie_values_are_exponential()
114 cie_scalar_cache_is_exponential(const gx_cie_scalar_cache * pc, float *pexpt) in cie_scalar_cache_is_exponential() argument
120 pexpt); in cie_scalar_cache_is_exponential()
128 cie_vector_cache_is_exponential(const gx_cie_vector_cache * pc, float *pexpt) in cie_vector_cache_is_exponential() argument
134 pexpt); in cie_vector_cache_is_exponential()

12