diff options
| author | dos-reis <gdr@axiomatics.org> | 2009-09-29 07:42:49 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2009-09-29 07:42:49 +0000 |
| commit | 9bef621350fff8de58a30cada7c1a64d76b778fb (patch) | |
| tree | fd9c6c5608f1ac55891ebec171de798375143974 /src/algebra/xpoly.spad.pamphlet | |
| parent | 8c21fa51748d435b43b06fff98ff3b2e5af8c435 (diff) | |
| download | open-axiom-9bef621350fff8de58a30cada7c1a64d76b778fb.tar.gz | |
* algebra/xpoly.spad.pamphlet (OrderedFreeMonoid): Really make an
OrderedMonoid.
Diffstat (limited to 'src/algebra/xpoly.spad.pamphlet')
| -rw-r--r-- | src/algebra/xpoly.spad.pamphlet | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/xpoly.spad.pamphlet b/src/algebra/xpoly.spad.pamphlet index a862c711..708f697f 100644 --- a/src/algebra/xpoly.spad.pamphlet +++ b/src/algebra/xpoly.spad.pamphlet @@ -42,7 +42,7 @@ OrderedFreeMonoid(S: OrderedSet): OFMcategory == OFMdefinition where NNI ==> NonNegativeInteger REC ==> Record(gen:S, exp:NNI) - OFMcategory == Join(FreeMonoidCategory S,OrderedSet) with + OFMcategory == Join(FreeMonoidCategory S,OrderedMonoid) with first: % -> S ++ \spad{first(x)} returns the first letter of \spad{x}. rest: % -> % |