remove undesired bound

This commit is contained in:
Nelynx 2025-03-26 20:27:53 +01:00
parent 34d6393207
commit 8d435326a9

View File

@ -672,7 +672,7 @@ proc MalgrFormVect(matrix v, list #)
//"determinacyIdeal=";determinacyIdeal; //
while (reduce(rv, determinacyIdeal)[1] != 0 && D <20)
while (reduce(rv, determinacyIdeal)[1] != 0)
{
//"rv=";rv;//
D++;
@ -688,7 +688,7 @@ proc MalgrFormVect(matrix v, list #)
wv = module(subst(matrix(wv), X(i), mappingf[i]));
}
//"wv en OX=";wv;//
rv = rv[1] - wv[1];
//"reduccion = ";reduce(rv, determinacyIdeal)[1]; //
}