diff options
| author | dos-reis <gdr@axiomatics.org> | 2008-11-24 02:44:35 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2008-11-24 02:44:35 +0000 |
| commit | 103c8a62af0e8ea55a76aa6b33c496c03f6837e6 (patch) | |
| tree | dc749054bbbaac55721e1b26678f0f2df248fec8 /src/algebra/sex.spad.pamphlet | |
| parent | f61d3a323d0b382ec67245137f23f18936fdb107 (diff) | |
| download | open-axiom-103c8a62af0e8ea55a76aa6b33c496c03f6837e6.tar.gz | |
* algebra/lodop.spad.pamphlet (OrdinaryDifferentialRing): Tidy.
* algebra/sex.spad.pamphlet (SExpressionCategory): Fix breakage
from last commit.
Diffstat (limited to 'src/algebra/sex.spad.pamphlet')
| -rw-r--r-- | src/algebra/sex.spad.pamphlet | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/algebra/sex.spad.pamphlet b/src/algebra/sex.spad.pamphlet index 0508df35..f5776682 100644 --- a/src/algebra/sex.spad.pamphlet +++ b/src/algebra/sex.spad.pamphlet @@ -29,7 +29,8 @@ SExpressionCategory(Str, Sym, Int, Flt, Expr): Category == Decl where Decl == Join(SetCategory,ConvertibleFrom Str, ConvertibleFrom Sym,_ ConvertibleFrom Int, ConvertibleFrom Flt,_ - ConvertibleFrom Flt, ConvertibleFrom List %) with + ConvertibleFrom Flt, ConvertibleFrom Expr,_ + ConvertibleFrom List %) with eq: (%,%) -> Boolean ++ eq(s, t) is true if EQ(s,t) is true in Lisp. null?: % -> Boolean |