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" ; }