version 1.4, 2019/03/29 01:57:46 |
version 1.5, 2020/08/26 06:03:31 |
|
|
#include "ox_pari.h" |
#include "ox_pari.h" |
|
|
/* type=1 : one num/poly/mat arg */ |
/* type=1 : one num/poly/mat arg with prec */ |
/* type=2 : 1starg=num/poly/mat arg, 2ndarg=0(flag) */ |
/* type=2 : 1starg=num/poly/mat arg, 2ndarg(int) */ |
|
/* type=3 : one GEN, return ulong */ |
|
|
struct parif parif_tab[] = { |
struct parif parif_tab[] = { |
/* (ulong)allocatemoremem(ulong) */ |
|
{"allocatemem",(GEN (*)())allocatemoremem,0}, |
|
/* num/num */ |
/* num/num */ |
{"abs",gabs,1}, |
{"abs",gabs,1}, |
{"erfc",gerfc,1}, |
{"erfc",gerfc,1}, |
{"arg",garg,1}, |
{"arg",garg,1}, |
{"isqrt",racine,1}, |
{"isqrt",sqrtint,1}, |
{"gamma",ggamma,1}, |
{"gamma",ggamma,1}, |
{"zeta",gzeta,1}, |
{"zeta",gzeta,1}, |
{"floor",gfloor,1}, |
{"floor",gfloor,1}, |
Line 18 struct parif parif_tab[] = { |
|
Line 17 struct parif parif_tab[] = { |
|
{"imag",gimag,1}, |
{"imag",gimag,1}, |
{"conj",gconj,1}, |
{"conj",gconj,1}, |
{"ceil",gceil,1}, |
{"ceil",gceil,1}, |
{"isprime",gisprime,2}, |
|
{"bigomega",gbigomega,1}, |
|
{"denom",denom,1}, |
{"denom",denom,1}, |
{"numer",numer,1}, |
{"numer",numer,1}, |
{"lngamma",glngamma,1}, |
{"lngamma",glngamma,1}, |
{"logagm",glogagm,1}, |
{"logagm",glog,1}, |
{"classno",classno,1}, |
{"classno",classno,1}, |
{"dilog",dilog,1}, |
{"dilog",dilog,1}, |
{"disc",discsr,1}, |
{"discf",nfdisc,1}, |
{"discf",discf,1}, |
|
{"nextprime",nextprime,1}, |
{"nextprime",nextprime,1}, |
{"eintg1",eint1,1}, |
{"eintg1",eint1,1}, |
{"eta",eta,1}, |
{"eta",eta,1}, |
{"issqfree",gissquarefree,1}, |
|
{"issquare",gcarreparfait,1}, |
|
{"gamh",ggamd,1}, |
{"gamh",ggamd,1}, |
{"hclassno",classno3,1}, |
{"hclassno",hclassno,1}, |
|
|
/* num/array */ |
/* num/array */ |
{"binary",binaire,1}, |
{"binary",binaire,1}, |
{"factorint",factorint,2}, |
{"factor",factor,1}, |
{"factor",Z_factor,1}, |
|
{"cf",gcf,1}, |
{"cf",gcf,1}, |
{"divisors",divisors,1}, |
{"divisors",divisors,1}, |
{"smallfact",smallfact,1}, |
{"smallfact",factor,1}, |
|
|
/* poly/poly */ |
/* poly/poly */ |
{"centerlift",centerlift,1}, |
{"centerlift",centerlift,1}, |
{"content",content,1}, |
{"content",content,1}, |
|
|
/* poly/array */ |
/* poly/array */ |
{"galois",galois,1}, |
{"galois",polgalois,1}, |
{"roots",roots,1}, |
{"roots",roots,1}, |
{"factpol",factpol,1}, |
{"factpol",factor,1}, |
|
|
/* mat/mat */ |
/* mat/mat */ |
{"adj",adj,1}, |
{"adj",adj,1}, |
Line 69 struct parif parif_tab[] = { |
|
Line 62 struct parif parif_tab[] = { |
|
{"eigen",eigen,1}, |
{"eigen",eigen,1}, |
{"hermite",hnf,1}, |
{"hermite",hnf,1}, |
{"mat",gtomat,1}, |
{"mat",gtomat,1}, |
{"matrixqz2",matrixqz2,1}, |
|
{"matrixqz3",matrixqz3,1}, |
|
{"hess",hess,1}, |
{"hess",hess,1}, |
{"ker",ker,1}, |
{"ker",ker,1}, |
{"keri",keri,1}, |
{"keri",keri,1}, |
{"kerint",kerint,1}, |
{"kerint",kerint,1}, |
{"kerintg1",kerint1,1}, |
|
|
|
/* mat/poly */ |
/* mat/poly */ |
{"det",det,1}, |
{"det",det,1}, |
{"det2",det2,1}, |
{"det2",det2,1}, |
|
|
|
{"factorint",factorint,2,0}, |
|
{"isprime",gisprime,2,0}, |
|
{"disc",poldisc0,2,-1}, |
|
|
|
{"bigomega",(GEN(*)())bigomega,3}, |
|
{"issqfree",(GEN(*)())issquarefree,3}, |
|
{"isfund",(GEN(*)())isfundamental,3}, |
|
{"ispsp",(GEN(*)())BPSW_psp,3}, // miller-rabin |
|
|
|
#if 1 |
/* not examined yet */ |
/* not examined yet */ |
{"image",image,1}, |
{"image",image,1}, |
{"image2",image2,1}, |
{"image2",image2,1}, |
{"indexrank",indexrank,1}, |
{"indexrank",indexrank,1}, |
{"indsort",indexsort,1}, |
{"indsort",indexsort,1}, |
{"initalg",initalg,1}, |
{"initalg",initalg,1}, |
{"isfund",gisfundamental,1}, |
|
{"ispsp",gispsp,1}, |
|
{"jacobi",jacobi,1}, |
{"jacobi",jacobi,1}, |
{"jell",jell,1}, |
{"jell",jell,1}, |
{"length",(GEN(*)())glength,1}, |
{"length",(GEN(*)())glength,1}, |
Line 96 struct parif parif_tab[] = { |
|
Line 94 struct parif parif_tab[] = { |
|
{"lift",lift,1}, |
{"lift",lift,1}, |
{"lindep",lindep,1}, |
{"lindep",lindep,1}, |
{"modreverse",polymodrecip,1}, |
{"modreverse",polymodrecip,1}, |
{"mu",gmu,1}, |
|
{"norm",gnorm,1}, |
{"norm",gnorm,1}, |
{"norml2",gnorml2,1}, |
{"norml2",gnorml2,1}, |
{"numdiv",numbdiv,1}, |
{"numdiv",numbdiv,1}, |
{"omega",gomega,1}, |
{"omega",(GEN(*)())omega,1}, |
{"order",order,1}, |
{"order",order,1}, |
{"ordred",ordred,1}, |
|
{"phi",phi,1}, |
|
{"pnqn",pnqn,1}, |
{"pnqn",pnqn,1}, |
{"primroot",gener,1}, |
|
{"psi",gpsi,1}, |
{"psi",gpsi,1}, |
{"quadgen",quadgen ,1}, |
{"quadgen",quadgen ,1}, |
{"quadpoly",quadpoly ,1}, |
{"quadpoly",quadpoly ,1}, |
{"recip",polrecip ,1}, |
{"recip",polrecip ,1}, |
{"redreal",redreal ,1}, |
{"redreal",redreal ,1}, |
{"regula",regula ,1}, |
{"regula",quadregulator ,1}, |
{"reorder",reorder ,1}, |
|
{"rhoreal",rhoreal ,1}, |
{"rhoreal",rhoreal ,1}, |
{"sigma",sumdiv,1}, |
{"sigma",sumdiv,1}, |
{"signat",signat,1}, |
{"signat",qfsign,1}, |
{"simplify",simplify,1}, |
{"simplify",simplify,1}, |
{"smith",smith,1}, |
{"smith",smith,1}, |
{"smith2",smith2,1}, |
{"smith2",smith2,1}, |
{"sort",sort,1}, |
{"sort",sort,1}, |
{"sqr",gsqr,1}, |
{"sqr",gsqr,1}, |
{"sqred",sqred,1}, |
{"sqred",qfgaussred,1}, |
{"sqrt",gsqrt,1}, |
{"sqrt",gsqrt,1}, |
{"supplement",suppl,1}, |
{"supplement",suppl,1}, |
{"trace",gtrace,1}, |
{"trace",gtrace,1}, |
{"trunc",gtrunc,1}, |
{"trunc",gtrunc,1}, |
{"unit",fundunit,1}, |
{"unit",quadunit,1}, |
{"wf",wf,1}, |
#endif |
{"wf2",wf2,1}, |
|
|
|
/* obsolete or useless */ |
/* obsolete or useless */ |
#if 0 |
#if 0 |
|
{"reorder",reorder ,1}, |
|
{"phi",phi,1}, |
|
{"primroot",gener,1}, |
|
{"wf",wf,1}, |
|
{"wf2",wf2,1}, |
|
{"ordred",ordred,1}, |
|
{"mu",gmu,1}, |
{"matsize",matsize,1}, |
{"matsize",matsize,1}, |
{"real",greal,1}, |
{"real",greal,1}, |
{"round",ground,1}, |
{"round",ground,1}, |