forked from GitHub/gf-core
69 lines
2.5 KiB
Plaintext
69 lines
2.5 KiB
Plaintext
|
|
instance LexRestaurantSpa of LexRestaurant = open SyntaxSpa,GrammarSpa,ParadigmsSpa in {
|
|
|
|
flags encoding = utf8 ;
|
|
|
|
oper
|
|
restaurant_N = mkN "restaurante" ;
|
|
food_N = mkN "comida" ;
|
|
staff_N = variants {mkN "personal" ; mkN "servicio"} ;
|
|
wine_N = mkN "vino" ;
|
|
pizza_N = mkN "pizza" ;
|
|
cheese_N = mkN "queso" ;
|
|
fish_N = mkN "pescado" ;
|
|
dish_N = mkN "platillo" ;
|
|
drink_N = mkN "bebida" ;
|
|
dessert_N = mkN "postre" ;
|
|
|
|
recommend_V2 = mkV2 (mkV "recomendar" "recomiendo") ;
|
|
|
|
chinese_A = mkA "chino" ;
|
|
french_A = mkA "francés" "francesa" "franceses" "francesas" "francesamente";
|
|
italian_A = mkA "italiano" ;
|
|
japanese_A = mkA "japonés" ;
|
|
mexican_A = mkA "mexicano" ;
|
|
thai_A = mkA "tailandés" "tailandesa" "tailandeses" "tailandesas" "tailandesamente";
|
|
expensive_A = mkA "caro" ;
|
|
cheap_A = mkA "barato" ;
|
|
nice_A = mkA "agradable" ;
|
|
clean_A = mkA "limpio" ;
|
|
dirty_A = mkA "sucio" ;
|
|
fresh_A = mkA "fresco" ;
|
|
delicious_A = variants {mkA "delicioso"; mkA "exquisito"; mkA "sabroso"} ;
|
|
fatty_A = mkA "grasoso" ;
|
|
tasteless_A = variants {mkA "insípido"; mkA "insulso"} ;
|
|
authentic_A = mkA "auténtico" ;
|
|
efficient_A = mkA "eficiente" ;
|
|
courteous_A = mkA "cortés" ;
|
|
helpful_A = mkA "servicial" ;
|
|
friendly_A = mkA "amigable" ;
|
|
personal_A = mkA "personal" ;
|
|
warm_A = mkA "cálido" ;
|
|
prompt_A = mkA "rápido" ;
|
|
attentive_A = mkA "atento" ;
|
|
inefficient_A = variants {mkA "ineficiente" ; mkA "incompetente"} ;
|
|
rude_A = variants {mkA "grosero" ; mkA "descortés"} ;
|
|
impersonal_A = variants {mkA "impersonal" ; mkA "frío"} ;
|
|
slow_A = mkA "lento" ;
|
|
unattentive_A = mkA "desatento" ;
|
|
good_A = mkA "bueno" ;
|
|
great_A = mkA "magnífico" ;
|
|
excellent_A = mkA "excelente" ;
|
|
bad_A = mkA "malo" ;
|
|
awful_A = mkA "terrible" ;
|
|
horrible_A = variants {mkA "horrible" ; mkA "espantoso"} ;
|
|
disgusting_A = mkA "repugnante" ;
|
|
boring_A = mkA "aburrido" ;
|
|
diverse_A = mkA "variado" ;
|
|
|
|
noAdv_AdV = mkAdV "" ;
|
|
strongly_AdV = mkAdV "enfáticamente" ;
|
|
completely_AdV = mkAdV (variants {"completamente"; "totalmente"; "definitivamente"; "absolutamente"}) ;
|
|
certainly_AdV = mkAdV "ciertamente" ;
|
|
honestly_AdV = mkAdV "honestamente" ;
|
|
really_AdV = mkAdV (variants {"realmente"; "verdaderamente"}) ;
|
|
reluctantly_AdV = mkAdV ("a" ++ "regañadientes") ;
|
|
hardly_AdV = mkAdV "difícilmente" ;
|
|
|
|
}
|