Searched refs:permlength (Results 1 – 2 of 2) sorted by relevance
508 OP permlength = callocobject(); local519 weight_partition(part,permlength);520 sub(permlength,S_PA_I(part,i),permlength);522 add(zw,permlength,permlength);523 INC_INTEGER(permlength);526 m_il_v(S_I_I(permlength),code); freeall(permlength);527 for (l=(INT)0;l<S_I_I(permlength);l++) M_I_I((INT)0,S_V_I(code,l));
16 static short permlength; /* the length of the permutation */ variable377 permlength = S_P_LI(perm);378 if (permlength > SR_LENGTH)387 ms[0][2]=permlength;390 for (i=0; i<permlength ; i++)397 for (i=1; i<permlength ; i++)403 for (i=permlength-2 ;i>=0; i--)