refreshed the tutorial

This commit is contained in:
aarne
2008-10-01 13:13:10 +00:00
parent 0c964105d9
commit 81a93979ad
3 changed files with 424 additions and 597 deletions

View File

@@ -1,6 +1,6 @@
module SemBase where
import GSyntax
import Base
import Logic
-- translation of Base syntax to Logic
@@ -8,7 +8,6 @@ import Logic
iS :: GS -> Prop
iS s = case s of
GPredAP np ap -> iNP np (iAP ap)
GConjS c s t -> iConj c (iS s) (iS t)
iNP :: GNP -> (Exp -> Prop) -> Prop
iNP np p = case np of