added Facebook grammar from SummerSchool tutorial on best practices for grammar writing

This commit is contained in:
ramona.enache
2013-08-21 13:05:22 +00:00
parent 1f4b55735e
commit 9f1a2e5b67
6 changed files with 109 additions and 0 deletions

View File

@@ -0,0 +1,16 @@
instance LexFacebookEng of LexFacebook =
open SyntaxEng,
ParadigmsEng,
--ExtraEng,
IrregEng in
{
oper
nounFromS s = mkNP (mkNP the_Det (mkCN (mkN "fact"))) (SyntaxEng.mkAdv that_Subj s) ;
checkIn np = mkVP (mkV2 (partV (mkV "check") "in") (mkPrep "to")) np ;
beFriends np = mkVP (mkVP (dirV2 become_V) (mkNP a_Art plNum (mkCN (mkN "friend")))) (SyntaxEng.mkAdv (mkPrep "with") np) ;
like np1 np2 = mkS (mkCl np1 (mkVP (dirV2 (mkV "like")) np2)) ;
}