mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-07 02:02:51 -06:00
13 lines
429 B
Plaintext
13 lines
429 B
Plaintext
concrete TenseGer of Tense =
|
|
CatGer [Tense,Temp], TenseX [Ant,Pol,AAnter,ASimul,PNeg,PPos] ** open ResGer in {
|
|
|
|
lin
|
|
TTAnt t a = {s = t.s ++ a.s ; t = t.t ; a = a.a ; m = t.m} ;
|
|
|
|
TPres = {s = [] ; t = Pres ; m = MIndic} ;
|
|
TPast = {s = [] ; t = Past ; m = MIndic} ; --# notpresent
|
|
TFut = {s = [] ; t = Fut ; m = MIndic} ; --# notpresent
|
|
TCond = {s = [] ; t = Cond ; m = MIndic} ; --# notpresent
|
|
|
|
}
|