mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 13:09:33 -06:00
17 lines
685 B
Plaintext
17 lines
685 B
Plaintext
concrete SentencesRus of Sentences = NumeralRus ** SentencesI - [
|
|
NameNN, SHave, SHaveNo, SHaveNoMass, QDoHave, AHaveCurr
|
|
] with
|
|
(Syntax = SyntaxRus),
|
|
(Symbolic = SymbolicRus),
|
|
(Lexicon = LexiconRus), (Grammar = GrammarRus) ** open Prelude, SyntaxRus, (P = ParadigmsRus) in {
|
|
lin
|
|
SHave p obj = mkS (mkCl (mkVP have_V3 obj p.name)) ;
|
|
SHaveNo p obj = mkS (mkCl (mkVP have_not_V3 (mkNP obj) p.name)) ;
|
|
SHaveNoMass p obj = mkS (mkCl (mkVP have_not_V3 (mkNP obj) p.name)) ;
|
|
QDoHave p obj = mkQS (mkQCl (mkCl (mkVP have_V3 obj p.name))) ;
|
|
|
|
AHaveCurr p curr = mkCl (mkVP have_V3 (mkNP aPl_Det curr) p.name) ;
|
|
|
|
lin NameNN = mkNP (P.mkN "NN") ;
|
|
|
|
} |