added simple tenses

This commit is contained in:
krangelov
2019-09-03 21:37:14 +02:00
parent 026ecba0e7
commit b53ac90c3c
7 changed files with 22 additions and 21 deletions
+3 -4
View File
@@ -4,10 +4,9 @@ concrete CatTur of Cat = CommonX - [CAdv,AdN] ** open ResTur, Prelude in {
lincat
S = {s : Gerundification => Str} ;
S = {s, subord : Str} ;
-- TODO: parameterize by tense.
Cl = {s : Gerundification => Str} ;
Cl = {s : Tense => Str; subord : Str} ;
-- Noun
@@ -50,6 +49,6 @@ concrete CatTur of Cat = CommonX - [CAdv,AdN] ** open ResTur, Prelude in {
linref
V = \v -> v.s ! VInfinitive ;
V2 = v.s ! VInfinitive ++ v.c.s ;
V2 = \v -> v.s ! VInfinitive ++ v.c.s ;
}