/dports/math/gap/gap-4.11.0/pkg/cohomolo-1.6.8/standalone/progs.d/findpres/ |
H A D | conpdc1.c | 6 tree[],perm[],gorb[],lorbg[],lorbh[],base[], 87 { lorbh[i]=1; svhptr[i]=sv+npt*(nb+i-1)-1; in cnprg1() 98 { fscanf(ip,"%d",lorbh+i); if (lorbh[i]!=base[i]) w=1; } in cnprg1() 101 for (i=1;i<=nb;i++) fscanf(ip,"%d",lorbh+i); in cnprg1() 117 { j=lorbg[i]; fac=fac*j; j=lorbh[i]; fac=fac/j; ind=fac; coh_index[i]=ind; in cnprg1() 153 allok=(lorbh[bno]==1); in cnprg1()
|
H A D | conpdc2.c | 6 extern int nfuse,tree[],perm[],gorb[],lorbg[],lorbh[],base[], 24 for (i=1;i<=lnt;i++) j+=(lorbh[i]-1); in cnprg2()
|
H A D | conpdcd.c | 26 tree[TRSP],perm[PSP],gorb[NPT+1],lorbg[MB],lorbh[MB],base[MB], variable
|
/dports/math/gap/gap-4.11.0/pkg/cohomolo-1.6.8/standalone/progs.d/ |
H A D | conpdc1.c | 7 tree[],perm[],gorb[],lorbg[],lorbh[],base[], 91 { lorbh[i]=1; svhptr[i]=sv+npt*(nb+i-1)-1; in cnprg1() 102 { fscanf(ip,"%d",lorbh+i); if (lorbh[i]!=base[i]) w=1; } in cnprg1() 105 for (i=1;i<=nb;i++) fscanf(ip,"%d",lorbh+i); in cnprg1() 121 { j=lorbg[i]; fac=fac*j; j=lorbh[i]; fac=fac/j; ind=fac; coh_index[i]=ind; in cnprg1() 157 allok=(lorbh[bno]==1); in cnprg1()
|
H A D | optp.c | 7 base[],lorbc[],lorbg[],lorbh[],order[],pno[], 70 { for (i=1;i<=nb;i++) fscanf(ip,"%hd",lorbh+i); in optprog() 96 { sth=0; hing=1; hsvth=1; for (i=1;i<=nb;i++) lorbh[i]=lorbg[i];} in optprog() 151 { cthere=0; np2=stcom-2; if (gp(sth,nb,lorbh,svptr2)== -1) return(-1); in optprog() 299 p=lorbh; q=lorbc; r=p+nb; in nc() 366 if (c) printbaselo(nb,base,lorbc); else printbaselo(nb,base,lorbh); in outp() 480 for (i=1;i<=nb;i++) lorbh[i]=lorbc[i]; in core() 504 for (i=1;i<=nb;i++) lorbh[i]=lorbc[i]; in rhc() 524 for (i=1;i<=nb;i++) lorbg[i]=lorbh[i]; in rgh()
|
H A D | sylp2.c | 6 perm[],sv[],cp[],orb[],space[],expcp[],lorbg[],lorbh[], 68 { j=lorbg[i]; lorbh[i]=1; in sylprog() 72 while (j%prime==0) {lorbh[i]*=prime; j/=prime; } in sylprog() 73 if (lorbh[i]>1) fnt=i; in sylprog() 80 for (i=1;i<=nb;i++) printf("%4d",lorbh[i]); printf(".\n"); in sylprog() 153 while (lorbdef[bno]<lorbh[bno]) in sylprog()
|
H A D | normp1.c | 8 nbase[],lorbg[],lorbn[],lorbh[],ntno[],reg[],endorno[], 75 readbaselo(nbh,hbase,lorbh); readpsv(sth,nbh,nph,svhptr); in nprg1() 240 if (lorbg[cb]==lorbh[cb]) in nprg1() 334 if (lorbh[ntno[regbno]]>=3) in nprg1() 454 if ((intbase(bpt,nnth,&sth,&nbh,hbase,lorbh,svhptr))== -1) return(-1); in newbasept()
|
H A D | optd.c | 17 base[MB],lorbc[MB],lorbg[MB],lorbh[MB],pno[MP/2],*pptr[MP], variable
|
H A D | normd.c | 28 nbase[MB],lorbg[NPT],lorbn[NPT],lorbh[MB],ntno[NPT],reg[NPT], variable
|
H A D | conpdc2.c | 6 extern int nfuse,tree[],perm[],gorb[],lorbg[],lorbh[],base[], 24 for (i=1;i<=lnt;i++) j+=(lorbh[i]-1); in cnprg2()
|
H A D | conpdcd.c | 26 tree[TRSP],perm[PSP],gorb[NPT+1],lorbg[MB],lorbh[MB],base[MB], variable
|
H A D | snd.c | 33 nbase[MB],lorbg[NPT],lorbn[NPT],lorbh[MB],ntno[NPT],reg[NPT+1], variable
|
H A D | normp2.c | 8 nbase[],lorbg[],lorbn[],lorbh[],ntno[],reg[],endorno[], 251 { if (intbase(imbpt,ntct,&sth,&nbh,hbase,lorbh,svhptr)== -1) return(-1); in nprg2()
|