Return to pari_ftab.c CVS log

Up to [local] / OpenXM / src / ox_pari

Annotation of OpenXM/src/ox_pari/pari_ftab.c, Revision 1.3

1.1       noro        1: #include "ox_pari.h"
                      2:
                      3: /* type=1 : one num/poly/mat arg */
1.2       noro        4: /* type=2 : 1starg=num/poly/mat arg, 2ndarg=0(flag) */
1.1       noro        5:
                      6: struct parif parif_tab[] = {
                      7: /* (ulong)allocatemoremem(ulong) */
                      8:   {"allocatemem",(GEN (*)())allocatemoremem,0},
                      9: /* num/num */
                     10:   {"abs",gabs,1},
                     11:   {"erfc",gerfc,1},
                     12:   {"arg",garg,1},
                     13:   {"isqrt",racine,1},
                     14:   {"gamma",ggamma,1},
                     15:   {"zeta",gzeta,1},
                     16:   {"floor",gfloor,1},
                     17:   {"frac",gfrac,1},
                     18:   {"imag",gimag,1},
                     19:   {"conj",gconj,1},
                     20:   {"ceil",gceil,1},
1.2       noro       21:   {"isprime",gisprime,2},
1.1       noro       22:   {"bigomega",gbigomega,1},
                     23:   {"denom",denom,1},
                     24:   {"numer",numer,1},
                     25:   {"lngamma",glngamma,1},
                     26:   {"logagm",glogagm,1},
                     27:   {"classno",classno,1},
                     28:   {"classno2",classno2,1},
                     29:   {"dilog",dilog,1},
                     30:   {"disc",discsr,1},
                     31:   {"discf",discf,1},
                     32:   {"nextprime",nextprime,1},
                     33:   {"eintg1",eint1,1},
                     34:   {"eta",eta,1},
                     35:   {"issqfree",gissquarefree,1},
                     36:   {"issquare",gcarreparfait,1},
                     37:   {"gamh",ggamd,1},
                     38:   {"hclassno",classno3,1},
                     39:
                     40:   /* num/array */
                     41:   {"binary",binaire,1},
1.2       noro       42:   {"factorint",factorint,2},
1.1       noro       43:   {"factor",Z_factor,1},
                     44:   {"cf",gcf,1},
                     45:   {"divisors",divisors,1},
                     46:   {"smallfact",smallfact,1},
                     47:
                     48:   /* poly/poly */
                     49:   {"centerlift",centerlift,1},
                     50:   {"content",content,1},
                     51:
                     52:   /* poly/array */
                     53:   {"galois",galois,1},
                     54:   {"roots",roots,1},
1.3     ! noro       55:   {"factpol",factpol,1},
1.1       noro       56:
                     57:   /* mat/mat */
                     58:   {"adj",adj,1},
                     59:   {"lll",lll,1},
                     60:   {"lllgen",lllgen,1},
                     61:   {"lllgram",lllgram,1},
                     62:   {"lllgramgen",lllgramgen,1},
                     63:   {"lllgramint",lllgramint,1},
                     64:   {"lllgramkerim",lllgramkerim,1},
                     65:   {"lllgramkerimgen",lllgramkerimgen,1},
                     66:   {"lllint",lllint,1},
                     67:   {"lllkerim",lllkerim,1},
                     68:   {"lllkerimgen",lllkerimgen,1},
                     69:   {"trans",gtrans,1},
                     70:   {"eigen",eigen,1},
                     71:   {"hermite",hnf,1},
                     72:   {"mat",gtomat,1},
                     73:   {"matrixqz2",matrixqz2,1},
                     74:   {"matrixqz3",matrixqz3,1},
                     75:   {"hess",hess,1},
                     76:   {"ker",ker,1},
                     77:   {"keri",keri,1},
                     78:   {"kerint",kerint,1},
                     79:   {"kerintg1",kerint1,1},
                     80:
                     81:   /* mat/poly */
                     82:   {"det",det,1},
                     83:   {"det2",det2,1},
                     84:
                     85:   /* not examined yet */
                     86:   {"image",image,1},
                     87:   {"image2",image2,1},
                     88:   {"indexrank",indexrank,1},
                     89:   {"indsort",indexsort,1},
                     90:   {"initalg",initalg,1},
                     91:   {"isfund",gisfundamental,1},
                     92:   {"ispsp",gispsp,1},
                     93:   {"jacobi",jacobi,1},
                     94:   {"jell",jell,1},
                     95:   {"length",(GEN(*)())glength,1},
                     96:   {"lexsort",lexsort,1},
                     97:   {"lift",lift,1},
                     98:   {"lindep",lindep,1},
                     99:   {"modreverse",polymodrecip,1},
                    100:   {"mu",gmu,1},
                    101:   {"norm",gnorm,1},
                    102:   {"norml2",gnorml2,1},
                    103:   {"numdiv",numbdiv,1},
                    104:   {"omega",gomega,1},
                    105:   {"order",order,1},
                    106:   {"ordred",ordred,1},
                    107:   {"phi",phi,1},
                    108:   {"pnqn",pnqn,1},
                    109:   {"primroot",gener,1},
                    110:   {"psi",gpsi,1},
                    111:   {"quadgen",quadgen    ,1},
                    112:   {"quadpoly",quadpoly    ,1},
                    113:   {"recip",polrecip       ,1},
                    114:   {"redreal",redreal       ,1},
                    115:   {"regula",regula  ,1},
                    116:   {"reorder",reorder  ,1},
                    117:   {"rhoreal",rhoreal       ,1},
                    118:   {"sigma",sumdiv,1},
                    119:   {"signat",signat,1},
                    120:   {"simplify",simplify,1},
                    121:   {"smith",smith,1},
                    122:   {"smith2",smith2,1},
                    123:   {"sort",sort,1},
                    124:   {"sqr",gsqr,1},
                    125:   {"sqred",sqred,1},
                    126:   {"sqrt",gsqrt,1},
                    127:   {"supplement",suppl,1},
                    128:   {"trace",gtrace,1},
                    129:   {"trunc",gtrunc,1},
                    130:   {"unit",fundunit,1},
                    131:   {"wf",wf,1},
                    132:   {"wf2",wf2,1},
                    133:
                    134:    /* obsolete or useless */
                    135: #if 0
                    136:   {"matsize",matsize,1},
                    137:   {"real",greal,1},
                    138:   {"round",ground,1},
                    139:   {"vec",gtovec,1},
                    140:   {"reverse",recip  ,1},
                    141:   {"polred",polred,1},
                    142:   {"polred2",polred2,1},
                    143:   {"smalldiscf",smalldiscf,1},
                    144:   {"smallpolred",smallpolred,1},
                    145:   {"smallpolred2",smallpolred2,1},
                    146: #endif
                    147: };
                    148:
                    149: struct parif *search_parif(char *name)
                    150: {
                    151:   int tablen,i;
                    152:
                    153:   tablen = sizeof(parif_tab)/sizeof(struct parif);
                    154:   for ( i = 0; i < tablen; i++ ) {
                    155:     if ( !strcmp(parif_tab[i].name,name) )
                    156:       return &parif_tab[i];
                    157:   }
                    158:   return 0;
                    159: }
                    160: