msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

work on checking equations

Browse Source
This commit is contained in:
aarne
2004-10-26 11:24:32 +00:00
parent 18c0f62519
commit b73e3b2b56
5 changed files with 15 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
grammars/logic/Logic.gf
View File

@@ -81,7 +81,7 @@ def
ImplE _ _ (ImplI _ _ b) a = b a ;
NegE _ (NegI _ b) a = b a ;
UnivE _ _ (UnivI _ _ b) a = b a ;
ExistE _ _ _ (ExistI _ _ a b) d = d a b ;
ExistE _ _ _ (ExistI A B a b) d = d a b ;
-- Hypo and Pron are identities
Hypo _ a = a ;