diff --git a/lib/src/translator/todo/TopDictionarySpa.gf b/lib/src/translator/todo/TopDictionarySpa.gf index 5a882b4c6..865ac27ac 100644 --- a/lib/src/translator/todo/TopDictionarySpa.gf +++ b/lib/src/translator/todo/TopDictionarySpa.gf @@ -1,6 +1,6 @@ concrete TopDictionarySpa of TopDictionary = CatSpa ** open ParadigmsSpa, MorphoSpa, IrregSpa, (L=LexiconSpa), (S=StructuralSpa), (E = ExtraSpa), Prelude in { - +---- checked by IL till less_Adv in the BNC order oper mkInterj : Str -> Interj = \s -> lin Interj (ss s) ; oper mkDet : Str -> Det = \s -> lin Det {s,sp @@ -12,7 +12,7 @@ oper optProDrop : Pron -> Pron = \p -> p | E.ProDrop p ; lin of_Prep = ParadigmsSpa.genitive ; lin and_Conj = S.and_Conj ; lin in_Prep = S.in_Prep ; -lin have_VV = mkVV tener_V ; +lin have_VV = mkVV tener_V ; ---- subcat lin have_VS = mkVS tener_V ; lin have_V2V = mkV2V tener_V ; lin have_V2 = S.have_V2 ; @@ -30,13 +30,13 @@ lin do_V2 = mkV2 hacer_V ; lin do_V = hacer_V ; lin at_Prep = ParadigmsSpa.dative ; lin by_Prep = mkPrep "por" ; -lin but_Conj = variants{} ; -- +lin but_Conj = mkConj "pero" ; lin from_Prep = S.from_Prep ; lin they_Pron = optProDrop S.they_Pron ; lin theyFem_Pron = optProDrop E.they8fem_Pron ; lin she_Pron = optProDrop S.she_Pron ; lin or_Conj = S.or_Conj ; -lin as_Subj = variants{} ; -- +lin as_Subj = ss "como" ** {m = Indic} ; lin we_Pron = optProDrop S.we_Pron ; lin weFem_Pron = optProDrop E.we8fem_Pron ; lin say_VV = mkVV decir_V ; @@ -81,12 +81,12 @@ lin know_V = conocer_V ; lin time_N = mkN "tiempo" ; lin time_2_N = mkN "vez" "veces" feminine ; lin time_1_N = mkN "tiempo" ; -lin take_VA = mkVA prender_V ; -lin take_V2V = mkV2V prender_V ; -lin take_V2A = mkV2A prender_V ; -lin take_V2 = mkV2 prender_V ; -lin take_V = prender_V ; -lin so_Adv = mkAdv "sí" ; +lin take_VA = mkVA (mkV "tomar") | mkVA (mkV "coger") | mkVA (mkV "sacar") | mkVA prender_V ; ---- subcat +lin take_V2V = mkV2V (mkV "tomar") | mkV2V (mkV "coger") | mkV2V (mkV "sacar") | mkV2V prender_V ; ---- subcat +lin take_V2A = mkV2A (mkV "tomar") | mkV2A (mkV "coger") | mkV2A (mkV "sacar") | mkV2A prender_V ; ---- subcat +lin take_V2 = mkV2 (mkV "tomar") | mkV2 (mkV "coger") | mkV2 (mkV "sacar") | mkV2 prender_V ; +lin take_V = mkV "tomar" | mkV "coger" | mkV "sacar" | prender_V ; +lin so_Adv = mkAdv "si" ; lin year_N = L.year_N ; lin into_Prep = mkPrep "en" ; lin then_Adv = mkAdv "entonces" ; @@ -99,33 +99,33 @@ lin come_VS = mkVS venir_V ; lin come_VA = mkVA venir_V ; lin come_V2 = mkV2 venir_V ; lin come_V = L.come_V ; -lin than_Subj = variants{} ; -- +lin than_Subj = ss "que" ** {m = Indic} ; ---- why is this a Subj? lin more_Adv = mkAdv "más" ; -lin about_Prep = ParadigmsSpa.genitive ; +lin about_Prep = S.on_Prep | ParadigmsSpa.genitive ; lin now_Adv = L.now_Adv ; lin last_A = mkA "último" ; -lin last_1_A = variants{} ; -- -lin last_2_A = variants{} ; -- +lin last_1_A = mkA "último" ; +lin last_2_A = mkA "último" ; lin other_A = mkA "otro" ; lin give_V3 = L.give_V3 ; -lin give_V2 = mkV2 (dar_V) | mkV2 (mkV "entregar") ; +lin give_V2 = mkV2 dar_V | mkV2 (mkV "entregar") ; lin give_V = dar_V | mkV "entregar" ; lin just_Adv = mkAdv "por si acaso" | mkAdv "por si las moscas" ; lin people_N = mkN "gente" feminine ; lin also_Adv = mkAdv "también" | mkAdv "además" ; -lin well_Adv = variants{} ; -- -lin only_Adv = mkAdv "apenas" | mkAdv "solo" ; +lin well_Adv = mkAdv "bueno" ; +lin only_Adv = mkAdv "solo" | mkAdv "apenas" ; lin new_A = L.new_A ; lin when_Subj = S.when_Subj ; -lin way_N = mkN "medios" masculine ; -lin way_2_N = variants{} ; -- -lin way_1_N = variants{} ; -- -lin look_VV = mkVV (mkV (mkV "cuidar") "de") ; -lin look_VA = mkVA (mkV (mkV "cuidar") "de") ; -lin look_V2V = mkV2V (mkV (mkV "cuidar") "de") ; -lin look_V2 = mkV2 (mkV (mkV "cuidar") "de") ; -lin look_V = mkV (mkV "cuidar") "de" ; -lin like_Prep = variants{} ; -- +lin way_N = mkN "manera" | mkN "medio" | mkN "forma" ; +lin way_2_N = mkN "manera" | mkN "medio" | mkN "forma" ; +lin way_1_N = mkN "camino" ; +lin look_VV = deVV (mkV "cuidar") ; +lin look_VA = mkVA (mkV "parecer") ; +lin look_V2V = mkV2V (mkV "mirar") ; +lin look_V2 = mkV2 "mirar" ; +lin look_V = mkV "mirar" ; +lin like_Prep = mkPrep "como" ; lin use_VV = mkVV (mkV "usar") | mkVV (mkV "utilizar") ; lin use_V2V = mkV2V (mkV "usar") | mkV2V (mkV "utilizar") ; lin use_V2 = mkV2 (mkV "usar") | mkV2 (mkV "utilizar") ; @@ -136,7 +136,7 @@ lin find_VS = mkVS (creer_V) | mkVS (encontrar_V) ; lin find_V2V = mkV2V (creer_V) | mkV2V (encontrar_V) ; lin find_V2A = mkV2A (creer_V) | mkV2A (encontrar_V) ; lin find_V2 = L.find_V2 ; -lin find_V = creer_V | encontrar_V ; +lin find_V = encontrar_V | creer_V ; --- split lin man_N = L.man_N ; lin want_VV = S.want_VV ; lin want_VS = mkVS (querer_V) | mkVS (mkV "desear") ; @@ -145,71 +145,71 @@ lin want_V2 = mkV2 (querer_V) | mkV2 (mkV "desear") ; lin want_V = querer_V | mkV "desear" ; lin day_N = L.day_N ; lin between_Prep = S.between_Prep ; -lin even_Adv = mkAdv "aun" ; +lin even_Adv = mkAdv "aún" | mkAdv "incluso" | mkAdv "hasta" ; lin there_Adv = S.there_Adv ; lin many_Det = S.many_Det ; lin after_Prep = S.after_Prep ; lin down_Adv = mkAdv "abajo" ; -lin yeah_Interj = variants{} ; -- -lin so_Subj = variants{} ; -- +lin yeah_Interj = ss "sí" ; +lin so_Subj = ss "así que" ** {m = Indic} ; lin thing_N = mkN "cosa" ; -lin tell_VV = mkVV (mkV "reprender") | mkVV (mkV "amonestar") ; -lin tell_VS = mkVS (mkV "reprender") | mkVS (mkV "amonestar") ; -lin tell_V3 = mkV3 (mkV "reprender") | mkV3 (mkV "amonestar") ; -lin tell_1_V3 = variants{} ; -- -lin tell_2_V3 = variants{} ; -- -lin tell_V2V = mkV2V (mkV "reprender") | mkV2V (mkV "amonestar") ; -lin tell_V2S = mkV2S (mkV "reprender") | mkV2S (mkV "amonestar") ; -lin tell_V2Q = mkV2Q (mkV "reprender") ParadigmsSpa.dative | mkV2Q (mkV "amonestar") ParadigmsSpa.dative ; -lin tell_V2 = mkV2 (mkV "reprender") | mkV2 (mkV "amonestar") ; -lin tell_V = mkV "reprender" | mkV "amonestar" ; +lin tell_VV = mkVV (mkV "mandar") ; +lin tell_VS = mkVS (mkV "contar") ; +lin tell_V3 = mkV3 (mkV "contar") ; +lin tell_1_V3 = mkV3 (mkV "contar") ; +lin tell_2_V3 = mkV3 (mkV "distinguir"); +lin tell_V2V = mkV2V (mkV "contar") ; +lin tell_V2S = mkV2S (mkV "contar") ; +lin tell_V2Q = mkV2Q (mkV "contar") on_Prep ; +lin tell_V2 = mkV2 (mkV "contar") ; +lin tell_V = mkV "contar" ; lin through_Prep = S.through_Prep ; lin back_Adv = mkAdv "atrás" ; lin still_Adv = mkAdv "sin embargo" | mkAdv "no obstante" ; lin child_N = L.child_N ; lin here_Adv = mkAdv "aquí" | mkAdv "acá" ; -lin over_Prep = variants{} ; -- +lin over_Prep = mkPrep "a través de" ; --- split mkPrep "encima de" lin too_Adv = mkAdv "también" ; lin put_VS = mkVS (poner_V) | mkVS (mkV "colocar") | mkVS (mkV "situar") ; lin put_V2V = mkV2V (poner_V) | mkV2V (mkV "colocar") | mkV2V (mkV "situar") ; lin put_V2 = L.put_V2 ; lin put_V = poner_V | mkV "colocar" | mkV "situar" ; lin on_Adv = mkAdv "sobre" ; -lin no_Interj = mkInterj "sin comentarios" ; -lin work_VV = mkVV (mkV "fermentar") ; -lin work_V2 = mkV2 (mkV "fermentar") ; -lin work_V = mkV "fermentar" ; -lin work_2_V = variants{} ; -- -lin work_1_V = variants{} ; -- +lin no_Interj = mkInterj "no" ; +lin work_VV = mkVV (mkV "trabajar") ; +lin work_V2 = mkV2 (mkV "trabajar") ; +lin work_V = mkV "trabajar" ; +lin work_2_V = mkV "funcionar" ; +lin work_1_V = mkV "trabajar" ; lin become_VS = mkVS (mkV "volverse") | mkVS (mkV "hacerse") | mkVS (mkV "convertirse") | mkVS (mkV (mkV "llegar") "a ser") ; lin become_VA = L.become_VA ; lin become_V2 = mkV2 (mkV "volverse") | mkV2 (mkV "hacerse") | mkV2 (mkV "convertirse") | mkV2 (mkV (mkV "llegar") "a ser") ; lin become_V = mkV "volverse" | mkV "hacerse" | mkV "convertirse" | mkV (mkV "llegar") "a ser" ; lin old_A = L.old_A ; -lin government_N = variants{} ; -- -lin mean_VV = mkVV (mkV "significar") | mkVV (mkV (mkV "querer") "decir") ; -lin mean_VS = mkVS (mkV "significar") | mkVS (mkV (mkV "querer") "decir") ; -lin mean_VA = mkVA (mkV "significar") | mkVA (mkV (mkV "querer") "decir") ; -lin mean_V2V = mkV2V (mkV "significar") | mkV2V (mkV (mkV "querer") "decir") ; -lin mean_V2 = mkV2 (mkV "significar") | mkV2 (mkV (mkV "querer") "decir") ; -lin mean_V = mkV "significar" | mkV (mkV "querer") "decir" ; -lin part_N = mkN "parte integral" ; +lin government_N = mkN "gobierno" ; +lin mean_VV = mkVV (mkV "significar") | mkVV (mkV querer_V "decir") ; +lin mean_VS = mkVS (mkV "significar") | mkVS (mkV querer_V "decir") ; +lin mean_VA = mkVA (mkV "significar") | mkVA (mkV querer_V "decir") ; +lin mean_V2V = mkV2V (mkV "significar") | mkV2V (mkV querer_V "decir") ; +lin mean_V2 = mkV2 (mkV "significar") | mkV2 (mkV querer_V "decir") ; +lin mean_V = mkV "significar" | mkV querer_V "decir" ; +lin part_N = mkN "parte" feminine ; lin leave_VV = mkVV (mkV "dejar") ; lin leave_VS = mkVS (mkV "dejar") ; lin leave_V2V = mkV2V (mkV "dejar") ; lin leave_V2 = L.leave_V2 ; lin leave_V = mkV "dejar" ; -lin life_N = mkN "vida" masculine ; -lin great_A = mkA "Magno" | mkA "Grande" ; -lin case_N = mkN "caja" ; +lin life_N = mkN "vida" feminine ; +lin great_A = mkA "grande" ; +lin case_N = mkN "caso" ; lin woman_N = L.woman_N ; -lin over_Adv = mkAdv "antedicho" ; +lin over_Adv = mkAdv "por encima" | mkAdv "encima" | mkAdv "arriba" ; lin seem_VV = mkVV (parecer_V) ; lin seem_VS = mkVS (parecer_V) ; lin seem_VA = mkVA (parecer_V) ; lin seem_V2 = mkV2 (parecer_V) ; lin seem_V = parecer_V ; -lin work_N = mkN "trabajo" feminine ; +lin work_N = mkN "trabajo" masculine ; lin need_VV = mkVV (mkV "necesitar") ; lin need_VV = mkVV (mkV "necesitar") ; lin need_VS = mkVS (mkV "necesitar") ; @@ -218,50 +218,50 @@ lin need_V2 = mkV2 (mkV "necesitar") ; lin need_V = mkV "necesitar" ; lin feel_VS = mkVS (parecer_V) ; lin feel_VA = mkVA (parecer_V) ; -lin feel_V2 = mkV2 (parecer_V) ; -lin feel_V = parecer_V ; +lin feel_V2 = mkV2 (mkV "sentir") | mkV2 (parecer_V) ; +lin feel_V = mkV "sentir" | parecer_V ; lin system_N = mkN "sistema" masculine ; lin each_Det = mkDet "cada" ; -lin may_2_VV = variants{} ; -- -lin may_1_VV = variants{} ; -- +lin may_2_VV = mkVV (mkV "poder" "puedo") ; +lin may_1_VV = mkVV (mkV "poder" "puedo") ; lin much_Adv = mkAdv "mucho" ; -lin ask_VV = mkVV (pedir_V) ; -lin ask_VS = mkVS (pedir_V) ; -lin ask_VQ = mkVQ (pedir_V) ; +lin ask_VV = mkVV (pedir_V) | mkVV (mkV "preguntar") ; +lin ask_VS = mkVS (mkV "preguntar") | mkVS (pedir_V) ; +lin ask_VQ = mkVQ (mkV "preguntar") | mkVQ (pedir_V) ; lin ask_V2V = mkV2V (pedir_V) ; -lin ask_V2 = mkV2 (pedir_V) ; -lin ask_V = pedir_V ; +lin ask_V2 = mkV2 (mkV "preguntar") | mkV2 (pedir_V) ; +lin ask_V = mkV "preguntar" | pedir_V ; lin group_N = mkN "grupo" ; lin number_N = L.number_N ; -lin number_3_N = variants{} ; -- -lin number_2_N = variants{} ; -- -lin number_1_N = variants{} ; -- +lin number_3_N = mkN "número" | compN (mkN "número") "gramatical" ; +lin number_2_N = mkN "cantidad" feminine ; +lin number_1_N = mkN "número" | mkN "cifra" ; lin yes_Interj = mkInterj "sí" ; -lin however_Adv = mkAdv "por más que" ; -lin another_Det = variants{} ; -- +lin however_Adv = mkAdv "sin embargo" | mkAdv "por más que" ; +lin another_Det = mkDet "otro" ; lin again_Adv = mkAdv "otra vez" | mkAdv "de nuevo" | mkAdv "nuevamente" ; lin world_N = mkN "mundial" ; -lin area_N = variants{} ; -- -lin area_6_N = variants{} ; -- -lin area_5_N = variants{} ; -- -lin area_4_N = variants{} ; -- -lin area_3_N = variants{} ; -- -lin area_2_N = variants{} ; -- -lin area_1_N = variants{} ; -- +lin area_N = mkN "área" ; +lin area_6_N = mkN "superficie" feminine ; +lin area_5_N = mkN "zona" ; --- ? +lin area_4_N = mkN "esfera" ; --- ? +lin area_3_N = mkN "zona" ; +lin area_2_N = mkN "rama" ; +lin area_1_N = mkN "zona" | mkN "región" feminine ; lin show_VS = mkVS (mostrar_V) ; lin show_VQ = mkVQ (mostrar_V) ; lin show_V2V = mkV2V (mostrar_V) ; lin show_V2 = mkV2 (mostrar_V) ; lin show_V = mostrar_V ; -lin course_N = mkN "rumbo" ; -lin company_2_N = variants{} ; -- -lin company_1_N = variants{} ; -- +lin course_N = mkN "curso" ; --- split mkN "rumbo" ; +lin company_2_N = mkN "compañía" ; +lin company_1_N = mkN "empresa" ; lin under_Prep = S.under_Prep ; -lin problem_N = mkN "problema" masculine | mkN "dificultad" feminine | mkN "lío" ; -lin against_Prep = variants{} ; -- +lin problem_N = mkN "problema" masculine | mkN "dificultad" feminine ; +lin against_Prep = mkPrep "contra" ; lin never_Adv = mkAdv "nunca" | mkAdv "jamás" ; -lin most_Adv = mkAdv "ello más" ; -lin service_N = mkN "servicio" feminine ; +lin most_Adv = mkAdv "lo más" ; +lin service_N = mkN "servicio" ; lin try_VV = mkVV (probar_V) ; lin try_V2V = mkV2V (probar_V) ; lin try_V2 = mkV2 (probar_V) ; @@ -272,178 +272,178 @@ lin call_V2A = mkV2A (mkV "llamar") ; lin call_V2 = mkV2 (mkV "llamar") ; lin call_V = mkV "llamar" ; lin hand_N = L.hand_N ; -lin party_N = mkN "partido" ; --mkN "fiestero" | mkN "fiestera" | mkN "marchoso" | mkN "marchosa" ; +lin party_N = mkN "partido" ; lin party_2_N = mkN "partido" ; lin party_1_N = mkN "fiesta" ; -lin high_A = mkA "alto" | mkA "lujoso" | mkA "exclusivo" ; +lin high_A = mkA "alto" ; lin about_Adv = mkAdv "alrededor" ; lin something_NP = S.something_NP ; lin school_N = L.school_N ; lin in_Adv = mkAdv "en resumen" ; -lin in_1_Adv = variants{} ; -- -lin in_2_Adv = variants{} ; -- +lin in_1_Adv = mkAdv "dentro" ; +lin in_2_Adv = mkAdv "adentro" ; lin small_A = L.small_A ; lin place_N = mkN "casa" ; lin before_Prep = S.before_Prep ; -lin while_Subj = variants{} ; -- +lin while_Subj = ss "mientras" ** {m = Indic} ; lin away_Adv = mkAdv "lejos" | mkAdv "ausente" ; -lin away_2_Adv = variants{} ; -- -lin away_1_Adv = variants{} ; -- -lin keep_VV = mkVV (mkV "criar") ; -lin keep_VS = mkVS (mkV "criar") ; -lin keep_VA = mkVA (mkV "criar") ; -lin keep_V2A = mkV2A (mkV "criar") ; -lin keep_V2 = mkV2 (mkV "criar") ; -lin keep_V = mkV "criar" ; +lin away_2_Adv = mkAdv "fuera" | mkAdv "afuera" ; +lin away_1_Adv = mkAdv "lejos" | mkAdv "ausente" | mkAdv "fuera" ; +lin keep_VV = mkVV (mkV "continuar") ; +lin keep_VS = mkVS mantener_V ; +lin keep_VA = mkVA (reflV mantener_V) ; +lin keep_V2A = mkV2A mantener_V ; +lin keep_V2 = mkV2 mantener_V ; +lin keep_V = mantener_V ; lin point_N = mkN "punto" ; -lin point_2_N = variants{} ; -- -lin point_1_N = variants{} ; -- +lin point_2_N = mkN "punto" ; +lin point_1_N = mkN "momento" ; lin house_N = L.house_N ; lin different_A = mkA "diferente" | mkA "distinto" ; lin country_N = L.country_N ; -lin really_Adv = variants{} ; -- -lin provide_VS = mkVS (proveer_V) ; -lin provide_V2 = mkV2 (proveer_V) ; -lin provide_V = proveer_V ; -lin week_N = mkN "semana" masculine ; -lin hold_VS = mkVS (mkV (mkV "seguir") "en") | mkVS (mkV "conservar") | mkVS (mkV (mkV "mantenerse") "en") ; -lin hold_V3 = mkV3 (mkV (mkV "seguir") "en") | mkV3 (mkV "conservar") | mkV3 (mkV (mkV "mantenerse") "en") ; -lin hold_V2V = mkV2V (mkV (mkV "seguir") "en") | mkV2V (mkV "conservar") | mkV2V (mkV (mkV "mantenerse") "en") ; +lin really_Adv = mkAdv "realmente" | mkAdv "de verdad" ; +lin provide_VS = mkVS (proveer_V) | mkVS disponer_V ; +lin provide_V2 = mkV2 (proveer_V) | mkV2 disponer_V ; +lin provide_V = proveer_V | disponer_V ; +lin week_N = mkN "semana" ; +lin hold_VS = mkVS (mkV "guardar") | mkVS (mkV "conservar") | mkVS mantener_V ; +lin hold_V3 = mkV3 (mkV "guardar") | mkV3 (mkV "conservar") | mkV3 mantener_V ; +lin hold_V2V = mkV2V (mkV "guardar") | mkV2V (mkV "conservar") | mkV2V mantener_V ; lin hold_V2 = L.hold_V2 ; -lin hold_V = mkV (mkV "seguir") "en" | mkV "conservar" | mkV (mkV "mantenerse") "en" ; +lin hold_V = mkV "guardar" | mkV "conservar" | reflV mantener_V ; lin large_A = mkA "grande" ; -lin member_N = mkN "miembro" | mkN "miembro" ; -lin off_Adv = mkAdv "fuera de curso" ; -lin always_Adv = variants{}; -- S.always_AdV ; -- comment=CHECKED +lin member_N = mkN "miembro" ; +lin off_Adv = mkAdv "fuera" ; +lin always_Adv = mkAdv "siempre" ; lin follow_VS = mkVS (seguir_V) ; lin follow_V2 = mkV2 (seguir_V) ; lin follow_V = seguir_V ; lin without_Prep = S.without_Prep ; -lin turn_VA = mkVA (mkV (mkV "hacer") "la vista gorda") ; -lin turn_V2A = mkV2A (mkV (mkV "hacer") "la vista gorda") ; -lin turn_V2 = mkV2 (mkV (mkV "hacer") "la vista gorda") ; +lin turn_VA = mkVA (mkV "ponerse") ; +lin turn_V2A = mkV2A (mkV "convertir") ; +lin turn_V2 = mkV2 turn_V ; lin turn_V = L.turn_V ; -lin end_N = mkN "muerte" feminine ; -lin end_2_N = variants{} ; -- -lin end_1_N = variants{} ; -- -lin within_Prep = variants{} ; -- +lin end_N = mkN "fin" | mkN "final" ; +lin end_2_N = mkN "extremo" ; +lin end_1_N = end_N ; +lin within_Prep = mkPrep "dentro de" ; lin local_A = mkA "local" ; -lin where_Subj = variants{} ; -- +lin where_Subj = ss "donde" ** {m = Indic} ; lin during_Prep = S.during_Prep ; -lin bring_V3 = mkV3 (mkV "lograr") ; -lin bring_V2V = mkV2V (mkV "lograr") ; -lin bring_V2 = mkV2 (mkV "lograr") ; +lin bring_V3 = mkV3 traer_V ; +lin bring_V2V = mkV2V traer_V ; +lin bring_V2 = mkV2 traer_V ; lin most_Det = mkDet "la mayoría de" ; -lin word_N = mkN "quince minutos de fama" ; +lin word_N = mkN "palabra" ; lin begin_V2 = mkV2 (comenzar_V) | mkV2 (mkV "iniciar") | mkV2 (empezar_V) ; lin begin_V = comenzar_V | mkV "iniciar" | empezar_V ; lin although_Subj = S.although_Subj ; lin example_N = mkN "ejemplo" ; -lin next_Adv = variants{} ; -- -lin family_N = mkN "familia" masculine ; +lin next_Adv = mkAdv "después" | mkAdv "luego" ; +lin family_N = mkN "familia" ; lin rather_Adv = mkAdv "más bien" ; lin fact_N = mkN "hecho" ; -lin like_VV = variants{}; -- L.like_V2 ; -lin like_VS = variants{}; -- L.like_V2 ; -lin like_V2V = variants{}; -- L.like_V2 ; +lin like_VV = mkVV (mkV "gustar") ; ---- with dative +lin like_VS = mkVS (mkV "gustar") ; ---- with dative +lin like_V2V = mkV2V (mkV "gustar") ; ---- with dative lin like_V2 = L.like_V2 ; lin social_A = mkA "social" ; -lin write_VV = mkVV (mkV "apuntar") ; -lin write_VS = mkVS (mkV "apuntar") ; +lin write_VV = mkVV (mkV "escribir") ; +lin write_VS = mkVS (mkV "escribir") ; lin write_V2 = L.write_V2 ; -lin write_V = mkV "apuntar" ; +lin write_V = mkV "escribir" | mkV "apuntar" ; lin state_N = mkN "estado" ; -lin state_2_N = variants{} ; -- -lin state_1_N = variants{} ; -- +lin state_2_N = mkN "estado" | mkN "estatus" ; +lin state_1_N = mkN "estado" ; lin percent_N = mkN "por ciento" ; lin quite_Adv = S.quite_Adv ; lin both_Det = mkDet "ambos" | mkDet "los dos" ; -lin start_V2 = mkV2 (mkV (mkV "comenzar") "con mal pie") ; -lin start_V = mkV (mkV "comenzar") "con mal pie" ; -lin run_VS = mkVS (perseguir_V) ; -lin run_V2 = mkV2 (perseguir_V) ; +lin start_V2 = mkV2 comenzar_V ; +lin start_V = comenzar_V ; +lin run_VS = mkVS run_V ; +lin run_V2 = mkV2 run_V ; lin run_V = L.run_V ; lin long_A = L.long_A ; -lin right_Adv = variants{} ; -- -lin right_2_Adv = variants{} ; -- -lin right_1_Adv = variants{} ; -- -lin set_VV = mkVV (mkV "apartar") ; -lin set_VS = mkVS (mkV "apartar") ; -lin set_V2 = mkV2 (mkV "apartar") ; -lin set_V = mkV "apartar" ; +lin right_Adv = mkAdv "correctemente" ; +lin right_2_Adv = mkAdv "a la derecha" ; +lin right_1_Adv = mkAdv "correctemente" ; +lin set_VV = aVV comenzar_V | mkVV (mkV "establecer") ; ---- ? +lin set_VS = mkVS suponer_V ; ---- subcat +lin set_V2 = mkV2 poner_V ; +lin set_V = poner_V ; lin help_VV = mkVV (mkV "ayudar") ; lin help_VS = mkVS (mkV "ayudar") ; lin help_V2V = mkV2V (mkV "ayudar") ; lin help_V2 = mkV2 (mkV "ayudar") ; lin help_V = mkV "ayudar" ; lin every_Det = S.every_Det ; -lin home_N = mkN "hogar" feminine ; +lin home_N = mkN "hogar" ; lin month_N = mkN "mes" masculine ; -lin side_N = mkN "lado" feminine ; +lin side_N = mkN "lado" ; lin night_N = L.night_N ; lin important_A = L.important_A ; lin eye_N = L.eye_N ; lin head_N = L.head_N ; lin information_N = mkN "información" feminine ; lin question_N = L.question_N ; -lin business_N = mkN "como si nada ocurriera" | mkN "zona de conflicto" ; +lin business_N = mkN "negocio" | mkN "empresa" ; ---- negocios lin play_VV = mkVV (jugar_V) ; lin play_V2 = L.play_V2 ; lin play_V = L.play_V ; -lin play_3_V2 = variants{} ; -- -lin play_3_V = variants{} ; -- -lin play_2_V2 = variants{} ; -- -lin play_2_V = variants{} ; -- -lin play_1_V2 = variants{} ; -- -lin play_1_V = variants{} ; -- -lin power_N = mkN "corte de electricidad" ; -lin money_N = mkN "efectivo" ; +lin play_3_V2 = mkV2 (mkV "tocar") ; +lin play_3_V = mkV "tocar" ; +lin play_2_V2 = mkV2 jugar_V ; +lin play_2_V = jugar_V ; +lin play_1_V2 = mkV2 jugar_V ; +lin play_1_V = jugar_V ; +lin power_N = mkN "poder" ; --- split mkN "electricidad" ; +lin money_N = mkN "dinero" ; lin change_N = mkN "cambio" ; -lin move_VV = mkVV (mkV (mkV "ir") "adelante") ; -lin move_V2V = mkV2V (mkV (mkV "ir") "adelante") ; -lin move_V2A = mkV2A (mkV (mkV "ir") "adelante") ; -lin move_V2 = mkV2 (mkV (mkV "ir") "adelante") ; -lin move_V = mkV (mkV "ir") "adelante" ; -lin move_2_V = variants{} ; -- -lin move_1_V = variants{} ; -- +lin move_VV = mkVV (mkV "mover" "muevo") ; +lin move_V2V = mkV2V (mkV "mover" "muevo") ; +lin move_V2A = mkV2A (mkV "mover" "muevo") ; +lin move_V2 = mkV2 (mkV "mover" "muevo") ; +lin move_V = mkV "mover" "muevo" ; +lin move_2_V = mkV "mudarse" ; +lin move_1_V = mkV "mover" "muevo" ; lin interest_N = mkN "interés" masculine ; -lin interest_4_N = variants{} ; -- -lin interest_2_N = variants{} ; -- -lin interest_1_N = variants{} ; -- +lin interest_4_N = mkN "interés" masculine ; +lin interest_2_N = mkN "interés" masculine ; +lin interest_1_N = mkN "interés" masculine ; lin order_N = mkN "orden" feminine ; lin book_N = L.book_N ; lin often_Adv = mkAdv "a menudo" | mkAdv "frecuentemente" | mkAdv "seguido" ; lin development_N = mkN "desarrollo" ; lin young_A = L.young_A ; lin national_A = mkA "nacional" ; -lin pay_V3 = mkV3 (mkV "prestar") ; -lin pay_V2V = mkV2V (mkV "prestar") ; -lin pay_V2 = mkV2 (mkV "prestar") ; -lin pay_V = mkV "prestar" ; +lin pay_V3 = mkV3 (mkV "pagar") ; +lin pay_V2V = mkV2V (mkV "pagar") ; +lin pay_V2 = mkV2 (mkV "pagar") ; +lin pay_V = mkV "pagar" ; lin hear_VS = mkVS (oír_V) ; lin hear_V2V = mkV2V (oír_V) ; lin hear_V2 = L.hear_V2 ; lin hear_V = oír_V ; -lin room_N = mkN "cuarto" | mkN "habitación" | mkN "pieza" | mkN "sala" | mkN " recámara" ; -lin room_1_N = variants{} ; -- -lin room_2_N = variants{} ; -- -lin whether_Subj = variants{} ; -- +lin room_N = mkN "cuarto" | mkN "habitación" | mkN "pieza" | mkN "sala" | mkN "recámara" ; +lin room_1_N = mkN "cuarto" | mkN "habitación" ; +lin room_2_N = mkN "sitio" ; +lin whether_Subj = ss "si" ** {m = Indic} ; lin water_N = L.water_N ; -lin form_N = mkN "formulario" | mkN "forma" ; +lin form_N = mkN "formulario" | mkN "forma" ; --- split lin car_N = L.car_N ; lin other_N = mkN "otro" | mkN "otra" ; lin yet_Adv = mkAdv "todavía" ; -lin yet_2_Adv = variants{} ; -- -lin yet_1_Adv = variants{} ; -- +lin yet_2_Adv = mkAdv "aún" ; +lin yet_1_Adv = mkAdv "todavía" ; lin perhaps_Adv = mkAdv "quizá" | mkAdv "quizás" | mkAdv "tal vez" ; lin meet_V2V = mkV2V (conocer_V) ; lin meet_V2 = mkV2 (conocer_V) ; lin meet_V = conocer_V ; -lin level_N = mkN "paso a nivel" ; -lin level_2_N = variants{} ; -- -lin level_1_N = variants{} ; -- -lin until_Subj = variants{} ; -- -lin though_Subj = variants{} ; -- +lin level_N = mkN "nivel" ; +lin level_2_N = mkN "planta" ; +lin level_1_N = mkN "nivel" ; +lin until_Subj = ss "hasta que" ** {m = Conjunct} ; +lin though_Subj = ss "aunque" ** {m = Conjunct} ; lin policy_N = mkN "política" ; lin include_VV = mkVV (incluir_V) ; lin include_V2 = mkV2 (incluir_V) ; @@ -456,31 +456,31 @@ lin council_N = mkN "concejo" ; lin already_Adv = L.already_Adv ; lin possible_A = mkA "posible" ; lin nothing_NP = S.nothing_NP ; -lin line_N = mkN "línea" masculine ; +lin line_N = mkN "línea" ; lin allow_VS = mkVS (mkV "permitir") | mkVS (mkV "conceder") ; lin allow_V2V = mkV2V (mkV "permitir") | mkV2V (mkV "conceder") ; lin allow_V2 = mkV2 (mkV "permitir") | mkV2 (mkV "conceder") ; lin allow_V = mkV "permitir" | mkV "conceder" ; -lin need_N = mkN "necesidad" feminine | mkN "necesidades" feminine ; -lin effect_N = mkN "efectos" masculine | mkN "efectos especiales" ; +lin need_N = mkN "necesidad" feminine ; +lin effect_N = mkN "efecto" ; lin big_A = L.big_A ; lin use_N = mkN "uso" ; -lin lead_VS = mkVS (mkV "partir") | mkVS (comenzar_V) ; -lin lead_V2V = mkV2V (mkV "partir") | mkV2V (comenzar_V) ; -lin lead_V2 = mkV2 (mkV "partir") | mkV2 (comenzar_V) ; -lin lead_V = mkV "partir" | comenzar_V ; -lin stand_VV = mkVV (mkV "esperar") ; -lin stand_VS = mkVS (mkV "esperar") ; -lin stand_V2 = mkV2 (mkV "esperar") ; +lin lead_VS = mkVS (mkV (mkV "llevar") "a") ; ---- ? +lin lead_V2V = mkV2V (mkV "llevar") ; +lin lead_V2 = mkV2 (mkV "dirigir") | mkV2 conducir_V ; +lin lead_V = mkV "dirigir" | conducir_V ; +lin stand_VV = mkVV (mkV "tolerar") | mkVV (mkV "aguantar") ; --can't stand +lin stand_VS = mkVS (reflV mantener_V) | mkVS (mkV "tolerar") ; ---- subcat +lin stand_V2 = mkV2 mantener_V | mkV2 (mkV "aguantar") | mkV2 (mkV "tolerar") ; lin stand_V = L.stand_V ; lin idea_N = mkN "idea" ; -lin study_N = mkN "hora de estudio" ; -lin lot_N = mkN "destino" ; -lin live_VV = mkVV (mkV (mkV "vive") "y deja vivir") ; -lin live_V2 = mkV2 (mkV (mkV "vive") "y deja vivir") ; +lin study_N = mkN "estudio" ; +lin lot_N = mkN "grupo" | compN (mkN "billete") "de lotería" ; --- split +lin live_VV = mkVV (mkV "vivir") ; +lin live_V2 = mkV2 (mkV "vivir") ; lin live_V = L.live_V ; -lin job_N = mkN "oficina de empleo" ; -lin since_Subj = variants{} ; -- +lin job_N = mkN "trabajo" ; +lin since_Subj = ss "desde que" ** {m = Indic} ; lin name_N = L.name_N ; lin result_N = mkN "resultado" ; lin body_N = mkN "cuerpo" ; @@ -488,39 +488,39 @@ lin happen_VV = mkVV (mkV "suceder") | mkVV (mkV "ocurrir") | mkVV (mkV "pasar") lin happen_V2 = mkV2 (mkV "suceder") | mkV2 (mkV "ocurrir") | mkV2 (mkV "pasar") ; lin happen_V = mkV "suceder" | mkV "ocurrir" | mkV "pasar" ; lin friend_N = L.friend_N ; -lin right_N = mkN "ángulo recto" ; -lin least_Adv = variants{} ; -- -lin right_A = mkA "como nuevo" ; -lin right_2_A = variants{} ; -- -lin right_1_A = variants{} ; -- +lin right_N = mkN "derecho" ; --- split +lin least_Adv = mkAdv "lo menos" ; +lin right_A = mkA "correcto" ; +lin right_2_A = mkA "correcto" ; +lin right_1_A = mkA "derecho" ; lin almost_Adv = mkAdv "casi" ; lin much_Det = S.much_Det ; lin carry_V2 = mkV2 (mkV "llevar") | mkV2 (mkV "cargar") ; lin carry_V = mkV "llevar" | mkV "cargar" ; lin authority_N = mkN "autoridad" feminine ; -lin authority_2_N = variants{} ; -- -lin authority_1_N = variants{} ; -- -lin long_Adv = variants{} ; -- +lin authority_2_N = mkN "autoridad" feminine ; +lin authority_1_N = mkN "autoridad" feminine ; +lin long_Adv = mkAdv "mucho tiempo" ; lin early_A = mkA "prematuro" | mkA "temprano" ; lin view_N = mkN "visión" feminine ; -lin view_2_N = variants{} ; -- -lin view_1_N = variants{} ; -- +lin view_2_N = mkN "opinión" | compN (mkN "punto") "de vista" ; +lin view_1_N = mkN "vista" ; lin public_A = mkA "público" ; -lin together_Adv = mkAdv "junto" ; +lin together_Adv = mkAdv "juntos" | mkAdv "junto" ; lin talk_V2 = mkV2 (mkV "hablar") | mkV2 (mkV "conversar") ; lin talk_V = mkV "hablar" | mkV "conversar" ; lin report_N = mkN "informe" masculine ; -lin after_Subj = variants{} ; -- +lin after_Subj = ss "después de que" ** {m = Conjunct} ; lin only_Predet = S.only_Predet ; -lin before_Subj = variants{} ; -- -lin bit_N = mkN "bocado" ; -lin face_N = mkN "gesto" | mkN "cara" | mkN "mueca" ; -lin sit_VA = mkVA (mkV "sentarse") ; -lin sit_V2 = mkV2 (mkV "sentarse") ; +lin before_Subj = ss "antés de que" ** {m = Conjunct} ; +lin bit_N = mkN "bocado" ; --- split mkN "bit" +lin face_N = mkN "cara" | mkN "rostro" | mkN "mueca" ; +lin sit_VA = mkVA (reflV (mkV "sentar" "siento")) ; +lin sit_V2 = mkV2 (reflV (mkV "sentar" "siento")) ; lin sit_V = L.sit_V ; -lin market_N = mkN "economía de mercado" ; -lin market_1_N = variants{} ; -- -lin market_2_N = variants{} ; -- +lin market_N = mkN "mercado" ; +lin market_1_N = mkN "mercado" ; +lin market_2_N = mkN "mercado" | mkN "bolsa" ; lin appear_VV = mkVV (aparecer_V) ; lin appear_VS = mkVS (aparecer_V) ; lin appear_VA = mkVA (aparecer_V) ; @@ -534,24 +534,25 @@ lin able_A = mkA "competente" ; lin political_A = mkA "político" ; lin later_Adv = mkAdv "más tarde" | mkAdv "después" ; lin hour_N = mkN "hora" ; -lin rate_N = mkN "proporción" feminine ; -lin law_N = mkN "orden público" ; -lin law_2_N = variants{} ; -- -lin law_1_N = variants{} ; -- +lin rate_N = mkN "proporción" | mkN "nivel" | mkN "precio" ; --- split +lin law_N = mkN "ley" feminine ; +lin law_2_N = mkN "derecho" ; +lin law_1_N = mkN "ley" feminine ; lin door_N = L.door_N ; lin court_N = mkN "corte" masculine ; -lin court_2_N = variants{} ; -- -lin court_1_N = variants{} ; -- +lin court_2_N = mkN "tribunal" ; +lin court_1_N = mkN "corte" ; lin office_N = mkN "oficina" ; -lin let_VS = mkVS (mkV (mkV "borrón") "y cuenta nueva") ; -lin let_V2V = mkV2V (mkV (mkV "borrón") "y cuenta nueva") ; -lin let_V2 = mkV2 (mkV (mkV "borrón") "y cuenta nueva") ; -lin let_V = mkV (mkV "borrón") "y cuenta nueva" ; +lin let_VS = mkVS (mkV "dejar") ; +lin let_V2V = mkV2V (mkV "dejar") ; +lin let_V2 = mkV2 (mkV "dejar") ; +lin let_V = mkV "dejar" ; lin war_N = L.war_N ; lin produce_V2 = mkV2 (producir_V) ; lin produce_V = producir_V ; lin reason_N = L.reason_N ; lin less_Adv = mkAdv "menos" ; +---- checked by IL till less_Adv in the BNC order lin minister_N = mkN "ministro" ; lin minister_2_N = variants{} ; -- lin minister_1_N = variants{} ; -- @@ -899,9 +900,9 @@ lin account_N = mkN "cuenta" ; lin explain_VS = mkVS (mkV "explicar") ; lin explain_V2 = mkV2 (mkV "explicar") ; lin stay_VS = mkVS (mkV "mantenerse") ; -lin stay_VA = mkVA (mkV "mantenerse") ; -lin stay_V2 = mkV2 (mkV "mantenerse") ; -lin stay_V = mkV "mantenerse" ; +lin stay_VA = mkVA (reflV mantener_V) ; +lin stay_V2 = mkV2 (reflV mantener_V) ; +lin stay_V = reflV mantener_V ; lin few_Det = S.few_Det ; lin wait_VV = mkVV (mkV "esperar") | mkVV (mkV "aguardar") ; lin wait_V2 = L.wait_V2 ;