GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-24 03:52:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

moved phrases like 'I am hungry' from Greetings to Words to make them more general

Browse Source
This commit is contained in:
aarne
2010-03-30 21:48:24 +00:00
parent b4abd2ebba
commit 4867b91778
18 changed files with 61 additions and 57 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
examples/phrasebook/WordsFre.gf
View File

@@ -4,6 +4,7 @@ concrete WordsFre of Words = SentencesFre ** open
SyntaxFre,
DiffPhrasebookFre,
IrregFre,
(E = ExtraFre),
ParadigmsFre in
{
flags coding=utf8 ;
@@ -47,6 +48,12 @@ Boring = mkAPA "ennuyeux" ;
Romanian = mkNP (mkPN "roumain") ;
Swedish = mkNP (mkPN "suédois") ;
AHungry p = mkCl p (E.ComplCN have_V2 (mkCN (mkN "faim" feminine))) ;
AThirsty p = mkCl p (E.ComplCN have_V2 (mkCN (mkN "soif" feminine))) ;
ATired p = mkCl p (mkA "fatigué") ;
AScared p = mkCl p (E.ComplCN have_V2 (mkCN (mkN "peur" feminine))) ;
AUnderstand p = mkCl p (mkV IrregFre.comprendre_V2) ;
oper
mkAPA : (_ : Str) -> AP = \x -> mkAP (mkA x) ;