diff options
| author | adelon <22380201+adelon@users.noreply.github.com> | 2024-06-25 17:15:27 +0200 |
|---|---|---|
| committer | adelon <22380201+adelon@users.noreply.github.com> | 2024-06-25 17:15:27 +0200 |
| commit | 6417e942447763385bed9dd3ba630b64d08bfefc (patch) | |
| tree | 96b8294f21325e8984879c69f24d8a0f1b9fe371 | |
| parent | 868857d2764a26668e32d3e4f9764f728fb162a4 (diff) | |
Add `\neg`
| -rw-r--r-- | source/Syntax/Lexicon.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/source/Syntax/Lexicon.hs b/source/Syntax/Lexicon.hs index b5e4f58..463dd18 100644 --- a/source/Syntax/Lexicon.hs +++ b/source/Syntax/Lexicon.hs @@ -109,6 +109,7 @@ prefixOps = , ([Just (Command "fst"), Just InvisibleBraceL, Nothing, Just InvisibleBraceR], (NonAssoc, "fst")) , ([Just (Command "snd"), Just InvisibleBraceL, Nothing, Just InvisibleBraceR], (NonAssoc, "snd")) , ([Just (Command "pow"), Just InvisibleBraceL, Nothing, Just InvisibleBraceR], (NonAssoc, "pow")) + , ([Just (Command "neg"), Just InvisibleBraceL, Nothing, Just InvisibleBraceR], (NonAssoc, "neg")) , (ConsSymbol, (NonAssoc, "cons")) , (PairSymbol, (NonAssoc, "pair")) -- NOTE Is now defined and hence no longer necessary , (ApplySymbol, (NonAssoc, "apply")) |