Home
last modified time | relevance | path

Searched refs:lorbh (Results 1 – 13 of 13) sorted by relevance

/dports/math/gap/gap-4.11.0/pkg/cohomolo-1.6.8/standalone/progs.d/findpres/
H A Dconpdc1.c6 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 Dconpdc2.c6 extern int nfuse,tree[],perm[],gorb[],lorbg[],lorbh[],base[],
24 for (i=1;i<=lnt;i++) j+=(lorbh[i]-1); in cnprg2()
H A Dconpdcd.c26 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 Dconpdc1.c7 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 Doptp.c7 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 Dsylp2.c6 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 Dnormp1.c8 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 Doptd.c17 base[MB],lorbc[MB],lorbg[MB],lorbh[MB],pno[MP/2],*pptr[MP], variable
H A Dnormd.c28 nbase[MB],lorbg[NPT],lorbn[NPT],lorbh[MB],ntno[NPT],reg[NPT], variable
H A Dconpdc2.c6 extern int nfuse,tree[],perm[],gorb[],lorbg[],lorbh[],base[],
24 for (i=1;i<=lnt;i++) j+=(lorbh[i]-1); in cnprg2()
H A Dconpdcd.c26 tree[TRSP],perm[PSP],gorb[NPT+1],lorbg[MB],lorbh[MB],base[MB], variable
H A Dsnd.c33 nbase[MB],lorbg[NPT],lorbn[NPT],lorbh[MB],ntno[NPT],reg[NPT+1], variable
H A Dnormp2.c8 nbase[],lorbg[],lorbn[],lorbh[],ntno[],reg[],endorno[],
251 { if (intbase(imbpt,ntct,&sth,&nbh,hbase,lorbh,svhptr)== -1) return(-1); in nprg2()