aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/domain.spad.pamphlet
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-04-26 02:05:39 +0000
committerdos-reis <gdr@axiomatics.org>2010-04-26 02:05:39 +0000
commit95a8891a808572509f7449aa32022df42f8b7ab8 (patch)
treeb68be5fd0d707dfc45eb4db560775b1ca01849f3 /src/algebra/domain.spad.pamphlet
parentf50462616a6319727efb50c267a105166f5275e8 (diff)
downloadopen-axiom-95a8891a808572509f7449aa32022df42f8b7ab8.tar.gz
* algebra/carten.spad.pamphlet (CartesianTensor): Satisfy
instantiation of Eltable. * algebra/clifford.spad.pamphlet (QuadraticForm): Likewise. * algebra/domain.spad.pamphlet (DomainTemplate): Likewise. * algebra/files.spad.pamphlet (Library): Likewise. * algebra/aggcat.spad.pamphlet (LinearAggregate): Extend instantiation of Eltable. * algebra/naalg.spad.pamphlet (FiniteRankNonAssociativeAlgebra): Likewise. * algebra/pscat.spad.pamphlet (UnivariatePowerSeriesCategory): Likewise. * algebra/sex.spad.pamphlet (SExpressionCategory): Likewise. * algebra/Makefile.pamphlet: Update rules.
Diffstat (limited to 'src/algebra/domain.spad.pamphlet')
-rw-r--r--src/algebra/domain.spad.pamphlet4
1 files changed, 1 insertions, 3 deletions
diff --git a/src/algebra/domain.spad.pamphlet b/src/algebra/domain.spad.pamphlet
index 0ee4b5bb..19fde086 100644
--- a/src/algebra/domain.spad.pamphlet
+++ b/src/algebra/domain.spad.pamphlet
@@ -203,11 +203,9 @@ CategoryConstructor(): Public == Private where
++ Represntation of domain templates resulting from
++ compiling a domain constructor
DomainTemplate(): Public == Private where
- Public == SetCategory with
+ Public == Join(SetCategory, Eltable(NonNegativeInteger,Syntax)) with
#: % -> NonNegativeInteger
++ \spad{# x} returns the length of the domain template \spad{x}.
- elt: (%,NonNegativeInteger) -> Syntax
- ++ \spad{x.i} yields the entry at slot \spad{i} in \spad{x}.
Private == add
Rep == PrimitiveArray Syntax
#x == # rep x