sregset.spad line 32 [edit on github]
A internal package for removing redundant quasi-components and redundant branches when decomposing a variety by means of quasi-components of regular triangular sets.
algebraicSort(lts) sorts lts w.r.t supDimElseRittWu.
branchIfCan(leq, ts, lineq, b1, b2, b3, b4, b5) is an internal subroutine, exported only for development.
infRittWu?(lp1, lp2) is an internal subroutine, exported only for development.
internalInfRittWu?(lp1, lp2) is an internal subroutine, exported only for development.
internalSubPolSet?(lp1, lp2) returns true iff lp1 is a sub-set of lp2 assuming that these lists are sorted increasingly w.r.t. infRittWu?.
internalSubQuasiComponent?(ts, us) returns a boolean b value if the fact the regular zero set of us contains that of ts can be decided (and in that case b gives this inclusion) otherwise returns "failed".
moreAlgebraic?(ts, us) returns false iff ts and us are both empty, or ts has less elements than us, or some variable is algebraic w.r.t. us and is not w.r.t. ts.
prepareDecompose(lp, lts, b1, b2) is an internal subroutine, exported only for development.
removeSuperfluousCases(llpwt) is an internal subroutine, exported only for development.
removeSuperfluousQuasiComponents(lts) removes from lts any ts such that subQuasiComponent?(ts, us) holds for another us in lts.
startTableGcd!(s1, s2, s3) is an internal subroutine, exported only for development.
stopTableGcd!() is an internal subroutine, exported only for development.
subCase?(lpwt1, lpwt2) is an internal subroutine, exported only for development.
subPolSet?(lp1, lp2) returns true iff lp1 is a sub-set of lp2.
subQuasiComponent?(ts, us) returns true iff internalSubQuasiComponent?(ts, us) returns true.
subQuasiComponent?(ts, lus) returns true iff subQuasiComponent?(ts, us) holds for one us in lus.
subTriSet?(ts, us) returns true iff ts is a sub-set of us.
supDimElseRittWu(ts, us) returns true iff ts has less elements than us otherwise if ts has higher rank than us w.r.t. Ritt and Wu ordering.