mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-21 09:02:50 -06:00
Action category, more doc in Phrasebook
This commit is contained in:
@@ -1,7 +1,7 @@
|
||||
-- (c) 2009 Aarne Ranta under LGPL
|
||||
|
||||
concrete WordsEng of Words = SentencesEng **
|
||||
open SyntaxEng, ParadigmsEng in {
|
||||
open SyntaxEng, ParadigmsEng, IrregEng in {
|
||||
lin
|
||||
Wine = mkCN (mkN "wine") ;
|
||||
Beer = mkCN (mkN "beer") ;
|
||||
@@ -27,4 +27,17 @@ concrete WordsEng of Words = SentencesEng **
|
||||
Dollar = mkCN (mkN "dollar") ;
|
||||
Lei = mkCN (mkN "leu" "lei") ;
|
||||
|
||||
English = mkNP (mkPN "English") ;
|
||||
Finnish = mkNP (mkPN "Finnish") ;
|
||||
French = mkNP (mkPN "French") ;
|
||||
Romanian = mkNP (mkPN "Romanian") ;
|
||||
Swedish = mkNP (mkPN "Swedish") ;
|
||||
|
||||
AWant p obj = mkCl p (mkV2 (mkV "want")) obj ;
|
||||
ALike p item = mkCl p (mkV2 (mkV "like")) item ;
|
||||
AHave p kind = mkCl p have_V2 (mkNP kind) ;
|
||||
ASpeak p lang = mkCl p (mkV2 IrregEng.speak_V) lang ;
|
||||
ALove p q = mkCl p (mkV2 (mkV "love")) q ;
|
||||
|
||||
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user