mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-13 14:59:32 -06:00
30 lines
841 B
Plaintext
30 lines
841 B
Plaintext
--# -path=.:present
|
|
|
|
incomplete concrete FoodsI of Foods = open Syntax, LexFoods in {
|
|
lincat
|
|
Phrase = Utt ;
|
|
Item = NP ;
|
|
Kind = CN ;
|
|
Quality = AP ;
|
|
lin
|
|
Is item quality = mkUtt (mkCl item quality) ;
|
|
Isnt item quality = mkUtt (mkS negativePol (mkCl item quality)) ;
|
|
This kind = mkNP this_Quant kind ;
|
|
That kind = mkNP that_Quant kind ;
|
|
These kind = mkNP this_Quant plNum kind ;
|
|
Those kind = mkNP that_Quant plNum kind ;
|
|
QKind quality kind = mkCN quality kind ;
|
|
Very quality = mkAP very_AdA quality ;
|
|
|
|
Wine = mkCN wine_N ;
|
|
Pizza = mkCN pizza_N ;
|
|
Cheese = mkCN cheese_N ;
|
|
Fish = mkCN fish_N ;
|
|
Fresh = mkAP fresh_A ;
|
|
Warm = mkAP warm_A ;
|
|
Italian = mkAP italian_A ;
|
|
Expensive = mkAP expensive_A ;
|
|
Delicious = mkAP delicious_A ;
|
|
Boring = mkAP boring_A ;
|
|
}
|