class ALEXMAT_TWIST |
---|
printApoly(apoly:POLYS_INTI) |
---|
#LOGOUT+"\n"; LOGOUT::flush; |
---|
end; |
---|
LOGOUT::Title("Twisted Alexander","Polynomial"); |
---|
if (i>0) and (apoly[i]>=0.inti) then #LOGOUT+"+"; end; |
---|
loop i::=0.upto!(apoly.degree); |
---|
end; |
---|
#LOGOUT+apoly[i]; |
---|
printApoly(apoly:POLYS_INTI) |
---|
#LOGOUT+"\n"; LOGOUT::flush; |
---|
end; |
---|
LOGOUT::Title("Twisted Alexander","Polynomial"); |
---|
if (i>0) and (apoly[i]>=0.inti) then #LOGOUT+"+"; end; |
---|
loop i::=0.upto!(apoly.degree); |
---|
end; |
---|
#LOGOUT+apoly[i]; |
---|
apoly:=apoly.shift_deg(-(apoly.low_deg)); |
---|
**** | if (trimN=1)and(compoN>1) then apoly:=apoly/(#POLYS_INTI(1.inti,1)-1.inti);end; |
end; |
---|
AMat:=AMat.minor_matrix_column(i); |
---|
sub2:ARRAY{INT}:=#(degG-p0); loop sub2[0.up!]:=jPivot[p0.upto!(degG-1)]; end; |
---|
shared rep_deg:INT; |
---|
**** | degree of representation matrix |
if Relator[i].w.has_ind(3) then |
---|