mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-10 11:42:51 -06:00
Add Phrasebook to testsuite. Move grammars into subfolders. Add run-bench script.
This commit is contained in:
25
testsuite/lpgf/phrasebook/SentencesRus.gf
Normal file
25
testsuite/lpgf/phrasebook/SentencesRus.gf
Normal file
@@ -0,0 +1,25 @@
|
||||
concrete SentencesRus of Sentences = NumeralRus ** SentencesI - [
|
||||
NameNN, SHave, SHaveNo, SHaveNoMass, QDoHave, AHaveCurr,
|
||||
IMale, IFemale, YouFamMale, YouFamFemale, YouPolMale, YouPolFemale
|
||||
] with
|
||||
(Syntax = SyntaxRus),
|
||||
(Symbolic = SymbolicRus),
|
||||
(Lexicon = LexiconRus), (Grammar = GrammarRus) ** open Prelude, SyntaxRus, ExtraRus, (P = ParadigmsRus), (R = ResRus), (M = MorphoRus) 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") ;
|
||||
IMale = mkPerson (M.pronYa R.Masc) ;
|
||||
IFemale = mkPerson (M.pronYa R.Fem) ;
|
||||
YouFamMale = mkPerson (M.pronTu R.Masc) ;
|
||||
YouFamFemale = mkPerson (M.pronTu R.Fem) ;
|
||||
YouPolMale = mkPerson (M.pronVu R.Masc) ;
|
||||
YouPolFemale = mkPerson (M.pronVu R.Fem) ;
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user