mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-22 19:22:50 -06:00
20 lines
418 B
Plaintext
20 lines
418 B
Plaintext
-- From Angelov, Bringert, Ranta (2009)
|
|
concrete ZeroEng of Zero = {
|
|
lincat
|
|
S = Str ;
|
|
NP = {s : Str; n : Number} ;
|
|
VP = {s : Number => Str} ;
|
|
lin
|
|
And s1 s2 = s1 ++ "and" ++ s2 ;
|
|
Pred np vp = np.s ++ vp.s ! np.n ;
|
|
John = {s = "John"; n = Sg} ;
|
|
We = {s = "we"; n = Pl} ;
|
|
Walk = {s = table {
|
|
Sg => "walks";
|
|
Pl => "walk"
|
|
}
|
|
} ;
|
|
param
|
|
Number = Sg | Pl ;
|
|
}
|