diff options
| author | dos-reis <gdr@axiomatics.org> | 2013-05-16 22:35:43 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2013-05-16 22:35:43 +0000 |
| commit | db6604e49863925f964409d031004b90867f8ac9 (patch) | |
| tree | fd3752048666bee5d5aa1b1af65c781094973979 /src/algebra | |
| parent | 1b0bb495c53cbd98069caeb30089c5ff778aceb3 (diff) | |
| download | open-axiom-db6604e49863925f964409d031004b90867f8ac9.tar.gz | |
* algebra/polset.spad.pamphlet (GeneralPolynomialSet): Remove
redundant FiniteAggregate.
* algebra/triset.spad.pamphlet (TriangularSetCategory): Likewise.
Diffstat (limited to 'src/algebra')
| -rw-r--r-- | src/algebra/polset.spad.pamphlet | 2 | ||||
| -rw-r--r-- | src/algebra/triset.spad.pamphlet | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/algebra/polset.spad.pamphlet b/src/algebra/polset.spad.pamphlet index b52209a6..5f20c1c8 100644 --- a/src/algebra/polset.spad.pamphlet +++ b/src/algebra/polset.spad.pamphlet @@ -375,7 +375,7 @@ GeneralPolynomialSet(R,E,VarSet,P) : Exports == Implementation where LP ==> List P PtoP ==> P -> P - Exports == Join(PolynomialSetCategory(R,E,VarSet,P),FiniteAggregate P) with + Exports == PolynomialSetCategory(R,E,VarSet,P) with convert : LP -> $ ++ \axiom{convert(lp)} returns the polynomial set whose members ++ are the polynomials of \axiom{lp}. diff --git a/src/algebra/triset.spad.pamphlet b/src/algebra/triset.spad.pamphlet index 4efdd114..63913bab 100644 --- a/src/algebra/triset.spad.pamphlet +++ b/src/algebra/triset.spad.pamphlet @@ -51,7 +51,7 @@ import List TriangularSetCategory(R:IntegralDomain,E:OrderedAbelianMonoidSup,_ V:OrderedSet,P:RecursivePolynomialCategory(R,E,V)): Category == - Join(PolynomialSetCategory(R,E,V,P),FiniteAggregate P) with + PolynomialSetCategory(R,E,V,P) with shallowlyMutable infRittWu? : ($,$) -> Boolean |