/dports/math/maxima/maxima-5.43.2/src/ |
H A D | result.lisp | 51 (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 D | rat3b.lisp | 78 (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 D | rat3a.lisp | 432 (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 D | rat3c.lisp | 243 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 D | sinint.lisp | 43 (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 D | lesfac.lisp | 51 (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 D | nalgfa.lisp | 36 (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 D | rat3d.lisp | 183 ((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 D | risch.lisp | 266 (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 D | algfac.lisp | 274 a (pexpt a modulus) 286 (setq ans (pplus ans (ptimes (pexpt (car a) n) (car l))))
|
H A D | laplac.lisp | 729 (setq apart (pexpt (car factor) (cadr factor))) 775 (setq y (pexpt q k))
|
/dports/math/maxima/maxima-5.43.2/share/affine/ |
H A D | sub-proj.lisp | 69 (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 D | polybas.lisp | 65 (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 D | aquotient.lisp | 358 (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 D | gdevpdfc.c | 63 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 D | gdevpdfc.c | 63 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 D | gdevpdfc.c | 90 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 D | gdevpdfc.c | 90 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 D | mh.c | 326 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 D | simi.c | 2359 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 D | sim.h | 482 PEXPERIMENT pexpt; /* Ptr to expt struct, NULL if not expt member
|
/dports/print/ghostscript9-base/ghostscript-9.06/base/ |
H A D | gdevpdfc.c | 97 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 D | gdevpdfc.c | 97 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 D | gdevpdfc.c | 98 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 D | gdevpdfc.c | 98 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()
|