First 1300 words in TopDictionarySpa

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 reduce_V in the BNC order
+---- checked by IL till science_N in the BNC order
 oper  mkInterj : Str -> Interj 
     = \s -> lin Interj (ss s) ;
 oper  mkDet : Str -> Det = \s -> lin Det {s,sp 
@@ -238,7 +238,7 @@ 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 "sin embargo" | mkAdv "por más que" ;
-lin another_Det = mkDet "otro" ; 
+lin another_Det = mkDeterminer "otro" "otra" Sg False ;
 lin again_Adv = mkAdv "otra vez" | mkAdv "de nuevo" | mkAdv "nuevamente" ;
 lin world_N = mkN "mundial" ;
 lin area_N = mkN "área" ;
@@ -357,7 +357,7 @@ 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 both_Det = mkDeterminer "ambos" "ambas" Pl False | mkDet "los dos" ;
 lin start_V2 = mkV2 comenzar_V  ;
 lin start_V = comenzar_V ;
 lin run_VS = mkVS run_V ;
@@ -635,7 +635,7 @@ lin remember_V = mkV "recordar" "recuerdo" | reflV (mkV "acordar" "acuerdo") ;
 lin position_N = mkN "posición" feminine ;
 lin low_A = mkA "bajo" ;
 lin cost_N = mkN "costo" ;
-lin little_Det = mkDet "poco" ;
+lin little_Det = mkDeterminer "poco" "poca" Sg False ;
 lin matter_N = mkN "materia" ;
 lin matter_1_N = mkN "materia" | mkN "sustancia" ;
 lin matter_2_N = mkN "asunto" ;
@@ -713,7 +713,7 @@ lin condition_N = mkN "condición" feminine ;
 lin condition_1_N = mkN "condición" ;
 lin condition_2_N = mkN "condición" | mkN "estado" ;
 lin paper_N = L.paper_N ;
-lin off_Prep = mkPrep "a parte de" ; ---- ? just took this from the french lexicon
+lin off_Prep = mkPrep "de" ;
 lin major_A = mkA "mayor" ;
 lin describe_VS = mkVS (describir_V) ;
 lin describe_V2 = mkV2 (describir_V) ;
@@ -950,7 +950,7 @@ lin similar_A = mkA "similar" | mkA "semejante" | mkA "parecido" ;
 lin story_N = mkN "cuento" | mkN "historia" ;
 lin quality_N = mkN "cualidad" feminine ;
 lin tax_N = mkN "impuesto" | mkN "tasa" ;
-lin worker_N = mkN "obrero" ;
+lin worker_N = mkN "obrero" | mkN "trabajador" ;
 lin nature_N = mkN "naturaleza" ;
 lin structure_N = mkN "estructura" ;
 lin data_N = mkN "información" | mkN "dato" ; ---- datos plurale tantum
@@ -991,7 +991,7 @@ lin join_V = mkV "unirse" | reflV reunir_V ;
 lin reduce_V2 = mkV2 (reducir_V) ;
 lin reduce_V = reducir_V ;
 ---- checked by IL till reduce_V in the BNC order
-lin establish_V2 = mkV2 (mkV "nombrar") ;
+lin establish_V2 = mkV2 (mkV "establecer") ;
 lin wall_N = mkN "pared" feminine ;
 lin face_V2 = mkV2 (mkV "enfrentar") | mkV2 (mkV "encarar") ;
 lin face_V = mkV "enfrentar" | mkV "encarar" ;
@@ -999,8 +999,8 @@ lin easy_A = mkA "fácil" ;
 lin private_A = mkA "privado" ;
 lin computer_N = L.computer_N ;
 lin hospital_N = mkN "hospital" masculine ;
-lin chapter_N = mkN "sede" feminine ;
+lin chapter_N = mkN "capítulo" ;
-lin scheme_N = mkN "ardid" | mkN "artimaña" | mkN "maquinación" feminine | mkN "estratagema" | mkN "treta" | mkN "intriga" ;
+lin scheme_N = mkN "esquema" masculine ;
 lin theory_N = mkN "teoría" ;
 lin choose_VV = mkVV (escoger_V) | mkVV (elegir_V) ;
 lin choose_VS = mkVS (escoger_V) | mkVS (elegir_V) ;
@@ -1012,79 +1012,79 @@ lin wish_VS = mkVS (mkV "desear") ;
 lin wish_V2V = mkV2V (mkV "desear") ;
 lin wish_V2 = mkV2 (mkV "desear") ;
 lin wish_V = mkV "desear" ;
-lin property_N = mkN "propiedad" masculine ;
+lin property_N = mkN "propiedad" feminine ;
-lin property_2_N = variants{} ; -- 
+lin property_2_N = mkN "propiedad" feminine ;
-lin property_1_N = variants{} ; -- 
+lin property_1_N = mkN "característica" ; 
 lin achieve_V2 = mkV2 (conseguir_V) | mkV2 (mkV "lograr") ;
 lin financial_A = mkA "financiero" ;
-lin poor_A = mkA "más pobre que una rata" ;
+lin poor_A = mkA "pobre" ;
-lin poor_3_A = variants{} ; -- 
+lin poor_3_A = mkA "pobre" | mkA "mediocre" ;
-lin poor_2_A = variants{} ; -- 
+lin poor_2_A = mkA "pobre" ;
-lin poor_1_A = variants{} ; -- 
+lin poor_1_A = mkA "pobre" ;
 lin officer_N = mkN "oficial" feminine ;
-lin officer_3_N = variants{} ; -- 
+lin officer_3_N = mkN "oficial" | mkN "agente" ;
-lin officer_2_N = variants{} ; -- 
+lin officer_2_N = mkN "oficial" ;
-lin officer_1_N = variants{} ; -- 
+lin officer_1_N = mkN "oficial" ;
-lin up_Prep = variants{} ; -- 
+lin up_Prep = mkPrep "encima de" ;
-lin charge_N = variants{} ; -- 
+lin charge_N = mkN "carga" ;
-lin charge_2_N = variants{} ; -- 
+lin charge_2_N = mkN "acusación" ;
-lin charge_1_N = variants{} ; -- 
+lin charge_1_N = mkN "carga" ;
 lin director_N = mkN "director" masculine | mkN "directora" ;
-lin drive_VS = mkVS (mkV "correr") | mkVS (mkV "ahuyentar") | mkVS (mkV "largar") ;
+lin drive_VS = mkVS (mkV "conducir") ;
-lin drive_V2V = mkV2V (mkV "correr") | mkV2V (mkV "ahuyentar") | mkV2V (mkV "largar") ;
+lin drive_V2V = mkV2V (mkV "conducir") ;
-lin drive_V2 = mkV2 (mkV "correr") | mkV2 (mkV "ahuyentar") | mkV2 (mkV "largar") ;
+lin drive_V2 = mkV2 (mkV "conducir") ;
-lin drive_V = mkV "correr" | mkV "ahuyentar" | mkV "largar" ;
+lin drive_V = mkV "conducir" ;
 lin deal_V2 = mkV2 (mkV "repartir") | mkV2 (mkV "asignar") ;
 lin deal_V = mkV "repartir" | mkV "asignar" ;
-lin place_V2 = mkV2 (mkV "clasificarse") | mkV2 (mkV "colocarse") ;
+lin place_V2 = mkV2 (mkV "colocar") | mkV2 (mkV "colocarse") ;
 lin approach_N = mkN "enfoque" masculine | mkN "planteamiento" ;
 lin chance_N = mkN "oportunidad" feminine | mkN "posibilidad" feminine ;
 lin application_N = mkN "aplicación" feminine ;
 lin seek_VV = mkVV (mkV "buscar") ;
 lin seek_V2 = L.seek_V2 ;
 lin foreign_A = mkA "extranjero" | mkA "forastero" ;
-lin foreign_2_A = variants{} ; -- 
+lin foreign_2_A = mkA "extraño" ;
-lin foreign_1_A = variants{} ; -- 
+lin foreign_1_A = mkA "extranjero" ;
-lin along_Prep = variants{} ; -- 
+lin along_Prep = mkPrep "por" | mkPrep "a lo largo de" ;
-lin top_N = mkN "dominador" | mkN "dominadora" ;
+lin top_N = mkN "cima" ; --- split
-lin amount_N = mkN "cantidad" feminine | mkN "monto" ;
+lin amount_N = mkN "cantidad" feminine ;
 lin son_N = mkN "hijo" ;
 lin operation_N = mkN "operación" feminine ;
-lin fail_VV = mkVV (mkV "fracasar") | mkVV (mkV "zozobrar") ;
+lin fail_VV = mkVV (mkV "fallar") ; ---- subcat
-lin fail_V2V = mkV2V (mkV "fracasar") | mkV2V (mkV "zozobrar") ;
+lin fail_V2V = mkV2V (mkV "fallar") ;
-lin fail_V2 = mkV2 (mkV "fracasar") | mkV2 (mkV "zozobrar") ;
+lin fail_V2 = mkV2 (mkV "fracasar") | mkV2 (mkV "fallar") ;
-lin fail_V = mkV "fracasar" | mkV "zozobrar" ;
+lin fail_V = mkV "fracasar" | mkV "fallar" ;
 lin human_A = mkA "humano" ;
 lin opportunity_N = mkN "oportunidad" feminine ;
 lin simple_A = mkA "simple" | mkA "sencillo" ;
 lin leader_N = mkN "líder" masculine | mkN "dirigente" masculine ;
 lin look_N = mkN "vistazo" | mkN "ojeada" | mkN "mirada" ;
-lin share_N = mkN "acción" feminine ;
+lin share_N = mkN "cuota" ;
 lin production_N = mkN "producción" feminine ;
 lin recent_A = mkA "reciente" ;
-lin firm_N = variants{} ; -- 
+lin firm_N = mkN "firma" | mkN "empresa" ; --- split
-lin picture_N = mkN "cine" masculine ;
+lin picture_N = mkN "imagen" feminine ;
-lin source_N = mkN "código fuente" ;
+lin source_N = mkN "fuente" ;
 lin security_N = mkN "seguridad" feminine | mkN "confianza" ;
-lin serve_VV = mkVV (mkV (mkV "estar") "bien hecho") ;
+lin serve_VV = mkVV servir_V ;
-lin serve_VS = mkVS (mkV (mkV "estar") "bien hecho") ;
+lin serve_VS = mkVS servir_V ;
-lin serve_V2 = mkV2 (mkV (mkV "estar") "bien hecho") ;
+lin serve_V2 = mkV2 servir_V ;
-lin serve_V = mkV (mkV "estar") "bien hecho" ;
+lin serve_V = servir_V ;
-lin according_to_Prep = variants{} ; -- 
+lin according_to_Prep = mkPrep "según" ;
-lin end_VA = mkVA (mkV "acabarse") | mkVA (mkV "terminarse") ;
+lin end_VA = mkVA (mkV "acabarse") ;
-lin end_V2 = mkV2 (mkV "acabarse") | mkV2 (mkV "terminarse") ;
+lin end_V2 = mkV2 (mkV "acabar") ;
-lin end_V = mkV "acabarse" | mkV "terminarse" ;
+lin end_V = mkV "acabarse" ;
 lin contract_N = mkN "contrato" ;
 lin wide_A = L.wide_A ;
 lin occur_V = mkV "ocurrir" ;
 lin agreement_N = mkN "acuerdo" | mkN "convenio" ;
-lin better_Adv = mkAdv "mejor" | mkAdv "mejores" ;
+lin better_Adv = mkAdv "mejor" ;
 lin kill_V2 = L.kill_V2 ;
 lin kill_V = mkV "matar" ;
 lin act_VA = mkVA (mkV "comportarse") ;
-lin act_V2V = mkV2V (mkV "comportarse") ;
+lin act_V2V = mkV2V (mkV "actuar") ; ---- subcat
-lin act_V2 = mkV2 (mkV "comportarse") ;
+lin act_V2 = mkV2 (mkV "actuar") ;
-lin act_V = mkV "comportarse" ;
+lin act_V = mkV "actuar" | mkV "comportarse" ;
 lin site_N = mkN "sitio" ;
 lin either_Adv = mkAdv "tampoco" ;
 lin labour_N = mkN "parto" ;
@@ -1093,12 +1093,12 @@ lin plan_VS = mkVS (mkV "planear") ;
 lin plan_V2V = mkV2V (mkV "planear") ;
 lin plan_V2 = mkV2 (mkV "planear") ;
 lin plan_V = mkV "planear" ;
-lin various_A = mkA "varios" ;
+lin various_A = mkA "vario" | mkA "diverso" ;
-lin since_Prep = variants{} ; -- 
+lin since_Prep = mkPrep "desde" ;
 lin test_N = mkN "examen" masculine | mkN "test" masculine ;
 lin eat_V2 = L.eat_V2 ;
 lin eat_V = mkV "comer" ;
-lin loss_N = mkN "derrota" ;
+lin loss_N = mkN "pérdida" ;
 lin close_VS = mkVS (cerrar_V) ;
 lin close_VA = mkVA (cerrar_V) ;
 lin close_V2V = mkV2V (cerrar_V) ;
@@ -1109,109 +1109,108 @@ lin represent_V = mkV "representar" ;
 lin love_VV = mkVV (mkV "encantar") | mkVV (mkV "gustar") | mkVV (mkV "adorar") ;
 lin love_V2V = mkV2V (mkV "encantar") | mkV2V (mkV "gustar") | mkV2V (mkV "adorar") ;
 lin love_V2 = L.love_V2 ;
-lin colour_N = variants{} ; -- 
+lin colour_N = mkN "color" ;
-lin clearly_Adv = variants{} ; -- 
+lin clearly_Adv = mkAdv "claramente" ;
 lin shop_N = L.shop_N ;
 lin benefit_N = mkN "beneficio" | mkN "ventaja" ;
 lin animal_N = L.animal_N ;
 lin heart_N = L.heart_N ;
 lin election_N = mkN "elección" feminine ;
-lin purpose_N = mkN "decisión" feminine | mkN "determinación" | mkN "resolución" feminine ;
+lin purpose_N = mkN "propósito" ;
-lin standard_N = mkN "estandarte" masculine ;
+lin standard_N = mkN "estándar" masculine ;
-lin due_A = mkA "salir de cuentas" ;
+lin due_A = mkA "debido" ;
-lin secretary_N = mkN "serpentario" ;
+lin secretary_N = mkN "secretario" ;
 lin rise_VA = mkVA (mkV "levantarse") ;
 lin rise_V2 = mkV2 (mkV "levantarse") ;
 lin rise_V = mkV "levantarse" ;
-lin date_N = variants{} ; -- 
+lin date_N = mkN "cita" ; 
-lin date_7_N = variants{} ; -- 
+lin date_7_N = mkN "dátil" ; 
-lin date_3_N = variants{} ; -- 
+lin date_3_N = mkN "cita" ;
-lin date_3_N = variants{} ; -- 
+lin date_1_N = mkN "fecha" ;
-lin date_1_N = variants{} ; -- 
+lin hard_A = mkA "duro" | mkA "fuerte" ;
-lin hard_A = mkA "fuerte" ;
+lin hard_2_A = mkA "difícil" | mkA "arduo" ;
-lin hard_2_A = variants{} ; -- 
+lin hard_1_A = mkA "duro" ;
-lin hard_1_A = variants{} ; -- 
 lin music_N = L.music_N ;
 lin hair_N = L.hair_N ;
-lin prepare_VV = mkVV (mkV "preparar") ;
+lin prepare_VV = aVV (mkV "preparar") ;
 lin prepare_VS = mkVS (mkV "preparar") ;
 lin prepare_V2V = mkV2V (mkV "preparar") ;
 lin prepare_V2 = mkV2 (mkV "preparar") ;
 lin prepare_V = mkV "preparar" ;
 lin factor_N = mkN "factor" ;
 lin other_A = mkA "otro" ;
-lin anyone_NP = variants{} ; -- 
+lin anyone_NP = makeNP "cualquiera" Masc Sg ;
-lin pattern_N = mkN "diseño" | mkN "estampado" ;
+lin pattern_N = mkN "patrón" | mkN "diseño" ;
-lin manage_VV = mkVV (mkV "manejar") ;
+lin manage_VV = mkVV (mkV "lograr") ; --manage to do sth
-lin manage_V2 = mkV2 (mkV "manejar") ;
+lin manage_V2 = mkV2 (mkV "manejar") | mkV2 (mkV "administrar") ;
-lin manage_V = mkV "manejar" ;
+lin manage_V = mkV "manejar" | mkV "administrar" ;
-lin piece_N = mkN "pieza de artillería" ;
+lin piece_N = mkN "pieza" ;
-lin discuss_VS = mkVS (mkV "discutir") | mkVS (mkV "conversar") ;
+lin discuss_VS = mkVS (mkV "conversar") | mkVS (mkV "discutir") ;
-lin discuss_V2 = mkV2 (mkV "discutir") | mkV2 (mkV "conversar") ;
+lin discuss_V2 = mkV2 (mkV "conversar") | mkV2 (mkV "discutir") ;
-lin prove_VS = mkVS (probar_V) ;
+lin prove_VS = mkVS (mkV "demostrar") | mkVS (probar_V) ;
-lin prove_VA = mkVA (probar_V) ;
+lin prove_VA = mkVA (mkV "resultar") ; --it proved right
-lin prove_V2V = mkV2V (probar_V) ;
+lin prove_V2V = mkV2V (mkV "demostrar") | mkV2V (probar_V) ;
-lin prove_V2 = mkV2 (probar_V) ;
+lin prove_V2 = mkV2 (mkV "demostrar") | mkV2 (probar_V) ;
-lin prove_V = probar_V ;
+lin prove_V = probar_V | mkV "resultar" ;
 lin front_N = mkN "frente" masculine ;
 lin evening_N = mkN "tarde" feminine ;
 lin royal_A = mkA "real" ;
 lin tree_N = L.tree_N ;
 lin population_N = mkN "población" feminine ;
-lin fine_A = mkA "bien" ;
+lin fine_A = mkA "fino" ;
-lin plant_N = mkN "fabricación" feminine ;
+lin plant_N = mkN "planta" ; --- split mkN "fábrica" 
 lin pressure_N = mkN "presión" feminine ;
 lin response_N = mkN "respuesta" ;
-lin catch_VS = mkVS (mkV (mkV "ir") "contento") | mkVS (mkV (mkV "coger") "el puntillo") ;
+lin catch_VS = mkVS (mkV "atrapar") ; ---- subcat
-lin catch_V2 = mkV2 (mkV (mkV "ir") "contento") | mkV2 (mkV (mkV "coger") "el puntillo") ;
+lin catch_V2 = mkV2 (mkV "atrapar") ;
-lin catch_V = mkV (mkV "ir") "contento" | mkV (mkV "coger") "el puntillo" ;
+lin catch_V = mkV "atrapar" ;
 lin street_N = mkN "calle" feminine ;
-lin pick_V2 = mkV2 (coger_V) ;
+lin pick_V2 = mkV2 (coger_V) | mkV2 recoger_V ;
-lin pick_V = coger_V ;
+lin pick_V = coger_V | recoger_V ;
-lin performance_N = mkN "rendimiento" | mkN "desempeño" | mkN "prestación" feminine ;
+lin performance_N = mkN "rendimiento" | mkN "desempeño" ;
-lin performance_2_N = variants{} ; -- 
+lin performance_2_N = mkN "actuación" ;
-lin performance_1_N = variants{} ; -- 
+lin performance_1_N = mkN "rendimiento" | mkN "desempeño" ;
 lin knowledge_N = mkN "conocimiento" ;
-lin despite_Prep = variants{} ; -- 
+lin despite_Prep = mkPrep "a pesar de" ;
 lin design_N = mkN "diseño" ;
 lin page_N = mkN "página" ;
-lin enjoy_VV = mkVV (mkV "divertirse") ;
+lin enjoy_VV = mkVV (reflV divertir_V) ;
-lin enjoy_V2 = mkV2 (mkV "divertirse") ;
+lin enjoy_V2 = mkV2 (mkV "disfrutar") | mkV2 (reflV divertir_V) ;
 lin individual_N = mkN "individuo" ;
 lin suppose_VS = mkVS (suponer_V) ;
 lin suppose_V2V = mkV2V (suponer_V) ;
 lin suppose_V2 = mkV2 (suponer_V) ;
-lin rest_N = mkN "masa invariante" | mkN "masa en reposo" ;
+lin rest_N = mkN "resto" ;
 lin instead_Adv = mkAdv "en vez de" ;
-lin wear_V2 = mkV2 (mkV "desgastarse") ;
+lin wear_V2 = mkV2 (mkV "llevar") ; --wear clothes 
-lin wear_V = mkV "desgastarse" ;
+lin wear_V = mkV "desgastarse" ; --wear out
 lin basis_N = mkN "base" feminine ;
 lin size_N = mkN "talla" ;
 lin environment_N = mkN "ambiente" | mkN "medio" | mkN "entorno" ;
-lin per_Prep = variants{} ; -- 
+lin per_Prep = mkPrep "por" ;
 lin fire_N = L.fire_N ;
-lin fire_2_N = variants{} ; -- 
+lin fire_2_N = L.fire_N ; --- info missing in senses-in-Dictionary
-lin fire_1_N = variants{} ; -- 
+lin fire_1_N = L.fire_N ; --- info missing in senses-in-Dictionary
 lin series_N = mkN "serie" feminine ;
 lin success_N = mkN "éxito" | mkN "acierto" ;
 lin natural_A = mkA "natural" ;
-lin wrong_A = mkA "malo" ;
+lin wrong_A = mkA "malo" | mkA "incorrecto" ; --- split ? morally wrong / wrong answer in an exam
-lin near_Prep = variants{} ; -- 
+lin near_Prep = mkPrep "cerca de" ;
-lin round_Adv = variants{} ; -- 
+lin round_Adv = mkAdv "alrededor" ;
 lin thought_N = mkN "pensamiento" ;
 lin list_N = mkN "lista" ;
-lin argue_VS = mkVS (mkV "argumentar") | mkVS (mkV "debatir") ;
+lin argue_VS = mkVS (mkV "argumentar") | mkVS (mkV "debatir") ; --- split
 lin argue_V2 = mkV2 (mkV "argumentar") | mkV2 (mkV "debatir") ;
 lin argue_V = mkV "argumentar" | mkV "debatir" ;
 lin final_A = mkA "final" | mkA "último" ;
-lin future_N = variants{} ; -- 
+lin future_N = mkN "futuro" | mkN "porvenir" ;
-lin future_3_N = variants{} ; -- 
+lin future_3_N = future_N ; --- info missing in senses-in-Dictionary
-lin future_1_N = variants{} ; -- 
+lin future_1_N = future_N ; --- info missing in senses-in-Dictionary
-lin introduce_V2 = mkV2 (mkV "presentar") ;
+lin introduce_V2 = mkV2 introducir_V | mkV2 (mkV "presentar") ;
 lin analysis_N = mkN "análisis" masculine ;
 lin enter_V2 = mkV2 (mkV "entrar") ;
 lin enter_V = mkV "entrar" ;
-lin space_N = mkN "era espacial" ;
+lin space_N = mkN "espacio" ;
 lin arrive_V2 = mkV2 (mkV "llegar") | mkV2 (mkV "arribar") ;
 lin arrive_V = mkV "llegar" | mkV "arribar" ;
 lin ensure_VS = mkVS (mkV "asegurar") | mkVS (mkV "asegurarse") ;
@@ -1219,84 +1218,85 @@ lin ensure_V2 = mkV2 (mkV "asegurar") | mkV2 (mkV "asegurarse") ;
 lin ensure_V = mkV "asegurar" | mkV "asegurarse" ;
 lin demand_N = mkN "demanda" | mkN "exigencia" ;
 lin statement_N = mkN "declaración" feminine ;
-lin to_Adv = mkAdv "además" ;
+lin to_Adv = mkAdv "a" ; ---- what is this?
-lin attention_N = mkN "trastorno por déficit de atención con hiperactividad" | mkN "TDAH" ;
+lin attention_N = mkN "atención" ;
 lin love_N = L.love_N ;
 lin principle_N = mkN "principio" ;
 lin pull_V2 = L.pull_V2 ;
-lin pull_V = mkV "trasnochar" | mkV (mkV "pasar") "la noche en claro" ;
+lin pull_V = mkV "tirar" ;
-lin set_N = mkN "batería" | mkN "juego" ;
+lin set_N = mkN "conjunto" ;
-lin set_2_N = variants{} ; -- 
+lin set_2_N = mkN "conjunto" ;
-lin set_1_N = variants{} ; -- 
+lin set_1_N = mkN "equipo" ;
 lin doctor_N = L.doctor_N ;
 lin choice_N = mkN "selección" feminine | mkN "decisión" feminine | mkN "opción" feminine ;
-lin refer_V2 = mkV2 (mkV "referirse") ;
+lin refer_V2 = mkV2 (reflV referir_V) to_Prep | mkV2 referir_V to_Prep ;
-lin refer_V = mkV "referirse" ;
+lin refer_V = reflV referir_V ;
 lin feature_N = mkN "característica" ;
-lin couple_N = mkN "un par de" | mkN "unos" ;
+lin couple_N = mkN "pareja" ;
 lin step_N = mkN "paso" ;
 lin following_A = mkA "siguiente" ;
-lin thank_V2 = mkV2 (agradecer_V) ;
+lin thank_V2 = mkV2 agradecer_V | mkV2 agradecer_V to_Prep ;
-lin machine_N = mkN "máquina" masculine ;
+lin machine_N = mkN "máquina" ;
-lin income_N = mkN "ingreso" ;
+lin income_N = mkN "ingreso" | mkN "renta" ; --- ingresos in plural
-lin training_N = mkN "capacitación" feminine | mkN "entrenamiento" ;
+lin training_N = mkN "formación" | mkN "entrenamiento" ;
 lin present_V2 = mkV2 (mkV "presentar") ;
 lin association_N = mkN "asociación" feminine ;
-lin film_N = mkN "director de cine" | mkN "director cinematográfico" ;
+lin film_N = mkN "película" ;
-lin film_2_N = variants{} ; -- 
+lin film_2_N = mkN "capa" ;
-lin film_1_N = variants{} ; -- 
+lin film_1_N = mkN "película" ;
 lin region_N = mkN "región" feminine ;
 lin effort_N = mkN "esfuerzo" ;
 lin player_N = mkN "jugador" | mkN "jugadora" ;
-lin everyone_NP = variants{} ; -- 
+lin everyone_NP = makeNP "todo el mundo" Masc Sg | makeNP "todos" Masc Pl ;
 lin present_A = mkA "presente" ;
-lin award_N = mkN "laudo" ;
+lin award_N = mkN "premio" ;
 lin village_N = L.village_N ;
 lin control_V2 = mkV2 (mkV "controlar") ;
 lin control_V = mkV "controlar" ;
-lin organisation_N = variants{} ; -- 
+lin organisation_N = mkN "organización" ;
-lin whatever_Det = variants{} ; -- 
+lin whatever_Det = mkDet "cualquier" ;
 lin news_N = mkN "agencia de información" | mkN "agencia de noticias" ;
 lin nice_A = mkA "bonito" | mkA "bello" | mkA "lindo" ;
 lin difficulty_N = mkN "dificultad" feminine ;
 lin modern_A = mkA "moderno" ;
-lin cell_N = mkN "célula" ;
+lin cell_N = mkN "célula" ; --- split
 lin close_A = mkA "cercano" ;
 lin current_A = mkA "actual" ;
 lin legal_A = mkA "legal" ;
 lin energy_N = mkN "energía" ;
-lin finally_Adv = variants{} ; -- 
+lin finally_Adv = mkAdv "finalmente" ;
-lin degree_N = variants{} ; -- 
+lin degree_N = mkN "grado" ;
-lin degree_3_N = variants{} ; -- 
+lin degree_3_N = mkN "grado" ;
-lin degree_2_N = variants{} ; -- 
+lin degree_2_N = mkN "licenciatura" ;
-lin degree_1_N = variants{} ; -- 
+lin degree_1_N = mkN "grado" | mkN "nivel" ;
 lin mile_N = mkN "milla" ;
-lin means_N = mkN "medio de transporte" ;
+lin means_N = mkN "medio" | mkN "manera" ;
 lin growth_N = mkN "crecimiento" ;
 lin treatment_N = mkN "tratamiento" ;
-lin sound_N = mkN "sonda" ;
+lin sound_N = mkN "sonido" ;
 lin above_Prep = S.above_Prep ;
-lin task_N = mkN "tarea" | mkN "quehacer" masculine ;
+lin task_N = mkN "tarea" ;
 lin provision_N = mkN "provisión" ;
 lin affect_V2 = mkV2 (mkV "afectar") ;
-lin please_Adv = mkAdv "por favor" | mkAdv "favor de" | mkAdv "porfa" ;
+lin please_Adv = mkAdv "por favor" ;
 lin red_A = L.red_A ;
-lin happy_A = mkA "feliz como un regaliz" | mkA "feliz como una perdiz" ;
+lin happy_A = mkA "feliz" ;
 lin behaviour_N = mkN "comportamiento" ;
-lin concerned_A = variants{} ; -- 
+lin concerned_A = mkA "preocupado" ;
-lin point_V2 = mkV2 (mkV "indicar") | mkV2 (mkV "apuntar") ;
+lin point_V2 = mkV2 (mkV "indicar") | mkV2 (mkV "apuntar") | mkV2 (mkV "señalar");
 lin point_V = mkV "indicar" | mkV "apuntar" ;
 lin function_N = mkN "función" feminine ;
-lin identify_V2 = mkV2 (mkV "identificarse") ;
+lin identify_V2 = mkV2 (mkV "identificar") ;
-lin identify_V = mkV "identificarse" ;
+lin identify_V = mkV "identificar" | mkV "identificarse" ;
 lin resource_N = mkN "recurso" | mkN "medio" ;
-lin defence_N = mkN "defensa" masculine ;
+lin defence_N = mkN "defensa" ;
 lin garden_N = L.garden_N ;
 lin floor_N = L.floor_N ;
 lin technology_N = mkN "tecnología" ;
 lin style_N = mkN "estilo" ;
 lin feeling_N = mkN "sentimiento" | mkN "emoción" feminine ;
 lin science_N = L.science_N ;
+---- checked until science_N by IL
 lin relate_V2 = variants{} ; -- 
 lin relate_V = variants{} ; -- 
 lin doubt_N = mkN "duda" | mkN "incertidumbre" feminine ;