aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/op.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/op.spad.pamphlet')
-rw-r--r--src/algebra/op.spad.pamphlet4
1 files changed, 0 insertions, 4 deletions
diff --git a/src/algebra/op.spad.pamphlet b/src/algebra/op.spad.pamphlet
index d8987ace..3b05e876 100644
--- a/src/algebra/op.spad.pamphlet
+++ b/src/algebra/op.spad.pamphlet
@@ -88,9 +88,6 @@ BasicOperator(): Exports == Implementation where
++ is?(op, s) tests if the name of op is s.
has? : (%, Identifier) -> Boolean
++ \spad{has?(op,p)} tests if property \spad{s} is attached to \spad{op}.
- assert : ($, String) -> $
- ++ assert(op, s) attaches property s to op.
- ++ Argument op is modified "in place", i.e. no copy is made.
assert : (%, Identifier) -> $
++ \spad{assert(op, p)} attaches property \spad{p} to \spad{op}.
++ Argument op is modified "in place", i.e. no copy is made.
@@ -138,7 +135,6 @@ BasicOperator(): Exports == Implementation where
case search(STRING(p)$Lisp, rep(op).props) is
val@None => just val
otherwise => nothing
- assert(op: %, s: String) == setProperty(op, s, NIL$Lisp)
assert(op: %, p: Identifier) == setProperty(op, p, NIL$Lisp)
has?(op: %, name: Identifier) == key?(STRING(name)$Lisp, rep(op).props)
weight(op, n) == setProperty(op, WEIGHT, n pretend None)