diff options
| author | dos-reis <gdr@axiomatics.org> | 2009-05-11 12:21:28 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2009-05-11 12:21:28 +0000 |
| commit | 9be496672521ccbeb6bef0cebb563c6124fc84ca (patch) | |
| tree | 8a13ce0a685493de7e7536e30271bee7648649dd /src/interp/i-output.boot | |
| parent | d3eeff8c0c553fd276f475590b2967bf388bdbed (diff) | |
| download | open-axiom-9be496672521ccbeb6bef0cebb563c6124fc84ca.tar.gz | |
* interp/property.lisp: "not" is prefix operator with "not " for
rendering.
* interp/i-output.boot ($allClassicOps): Include not.
* algebra/boolean.spad.pamphlet (PropositionalFormula): Rework.
Diffstat (limited to 'src/interp/i-output.boot')
| -rw-r--r-- | src/interp/i-output.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/i-output.boot b/src/interp/i-output.boot index 41dacca2..ca24779d 100644 --- a/src/interp/i-output.boot +++ b/src/interp/i-output.boot @@ -2592,10 +2592,10 @@ maPrin u == --% Rendering of InputForm $allClassicOps == - ["~","#","**","^","*","/","rem","quo","+","-","@","::", "pretend"] + ["~","#","not","**","^","*","/","rem","quo","+","-","@","::", "pretend"] isUnaryPrefix op == - op in '(_~ _# _-) + op in '(_~ _# _- _not) primaryForm2String x == x = nil => '"" |