remove undesired bound
This commit is contained in:
parent
34d6393207
commit
8d435326a9
@ -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]; //
|
||||
}
|
||||
|
||||
Loading…
Reference in New Issue
Block a user