stage(elp-es): emit vocabulary-es.el + lang_profile_es.el; extend morphology-es.el; parity harness

Port the validated sandbox Spanish realizer into the ELP .el runtime (STAGE only).
- vocabulary-es.el: 342 entries generated from UniMorph via morphology_es_full
  (real forms; nouns carry REAL per-lemma lexicon gender in form2 — kills the
  el-mano/la-dia masculine-default class).
- lang_profile_es.el: Spanish typology flags incl. mandatory contractions + govt.
- morphology-es.el: add es_participle, es_inflect_adj, es_contract,
  es_article_for_gender; accent-correct plural/preterite/participle.
- parity harness: 90.1% morphology parity vs Python oracle; gender heuristic
  73.6% vs vocab-real 100%; contraction 100%.

elp/src/lang_profile_es.el

@@ -0,0 +1,45 @@
+;;; lang_profile_es.el — Spanish language profile for ELP.
+;;; Keys the realizer's construction switches. Mirrors lang_profile_en / _pt.
+
+(lang_profile_es
+  (language        "Spanish")
+  (iso639          "es")
+  (family          "Romance")
+
+  ;; -- core typology flags -------------------------------------------------
+  (pro-drop            yes)    ; subjects routinely dropped; agreement carries person
+  (obligatory-subject  no)
+  (grammatical-gender  yes)    ; m/f on every noun; article+adjective AGREE
+  (gender-source       lexicon); REAL per-noun gender from UniMorph — NOT a heuristic
+  (do-support          no)
+  (subject-aux-inversion no)   ; questions by intonation/punctuation, not inversion
+  (question-strategy   intonation)
+  (article-selection   "el/la/los/las un/una/unos/unas")
+  (stressed-a-rule     yes)    ; fem sg noun in stressed a-/ha- takes el/un (el agua)
+  (adjective-position  postnominal) ; default post; a few prenominal + apocope
+  (adjective-agreement "gender+number")
+  (question-punct      inverted)    ; opening ¿ ¡ required
+
+  ;; -- MANDATORY CONTRACTIONS (coordinator quality bar) --------------------
+  (contractions        ((de el "del") (a el "al")))
+  (contraction-mandatory yes)  ; 'de el'/'a el' MUST surface as del/al
+
+  ;; -- verb / aspect system ------------------------------------------------
+  (verb-classes        (ar er ir))
+  (tenses              (present preterite imperfect future conditional))
+  (moods               (ind sbjv imp))
+  (finite-agreement    "person+number (6 slots)")
+  (perfect-aux         "haber")  ; haber + past participle (invariant -o)
+  (progressive-aux     "estar")  ; estar + gerund
+  (passive-aux         "ser")    ; ser + participle (agrees) + por-agent
+  (copula-split        "ser/estar")  ; permanent vs stage-level
+  (future              "infinitive + é/ás/á/emos/éis/án")
+
+  ;; -- clitics / government ------------------------------------------------
+  (object-clitics      yes)      ; me te lo la le nos os los las; proclisis/enclisis
+  (clitic-order        "se II I III (le+lo -> se lo)")
+  (enclisis            "imperative/infinitive/gerund + accent repair (dá+me+lo->dámelo)")
+  (verb-prep-government yes)     ; verbs select prep (protestar+contra, escapar+de)
+
+  ;; -- SACRED safety bar (shared with en/pt) -------------------------------
+  (negation-faithful   yes))     ; polarity never dropped/inverted; unplaceable -> FLAG

elp/src/morphology-es.el

@@ -54,6 +54,16 @@ fn es_str_last3(s: String) -> String {
 // Spanish verbs fall into three conjugation classes defined by the infinitive
 // ending: -ar, -er, -ir.  The stem is the infinitive minus those two characters.
 
+// Strong-vowel-final test (a/e/o) — used for orthographic y-insertion and the
+// accented -ído participle (caer->caído/cayó; but ui/iu diphthongs stay plain).
+fn es_strong_vowel_final(s: String) -> Bool {
+    let c: String = es_str_last_char(s)
+    if str_eq(c, "a") { return true }
+    if str_eq(c, "e") { return true }
+    if str_eq(c, "o") { return true }
+    return false
+}
+
 fn es_verb_class(base: String) -> String {
     if es_str_ends(base, "ar") { return "ar" }
     if es_str_ends(base, "er") { return "er" }
@@ -453,12 +463,18 @@ fn es_regular_preterite(stem: String, vclass: String, slot: Int) -> String {
         if slot == 4 { return stem + "asteis" }
         return stem + "aron"
     }
-    // -er and -ir share the same preterite endings
+    // -er and -ir share the same preterite endings.
+    // Orthographic rule: a vowel-final stem takes -yó/-yeron (caer->cayó,
+    // leer->leyó, creer->creyó) since -ió after a vowel becomes -yó.
     if slot == 0 { return stem + "í" }
     if slot == 1 { return stem + "iste" }
-    if slot == 2 { return stem + "ió" }
+    if slot == 2 {
+        if es_strong_vowel_final(stem) { return stem + "yó" }
+        return stem + "ió"
+    }
     if slot == 3 { return stem + "imos" }
     if slot == 4 { return stem + "isteis" }
+    if es_strong_vowel_final(stem) { return stem + "yeron" }
     return stem + "ieron"
 }
 
@@ -640,17 +656,35 @@ fn es_pluralize(noun: String) -> String {
     if !str_eq(inv, "") {
         return inv
     }
-    let last: String = es_str_last_char(noun)
+    // Oxytone nouns ending accented-vowel + n LOSE the written accent in the
+    // plural (canción->canciones, razón->razones, jardín->jardines).
+    // NOTE El strings are byte-indexed; "ón"/"án"/... are 3 bytes (accent=2 +n).
+    if es_str_ends(noun, "ón") { return es_str_drop_last(noun, 3) + "ones" }
+    if es_str_ends(noun, "án") { return es_str_drop_last(noun, 3) + "anes" }
+    if es_str_ends(noun, "én") { return es_str_drop_last(noun, 3) + "enes" }
+    if es_str_ends(noun, "ín") { return es_str_drop_last(noun, 3) + "ines" }
+    if es_str_ends(noun, "ún") { return es_str_drop_last(noun, 3) + "unes" }
+    // Oxytone accented-vowel + s also loses the accent (francés->franceses,
+    // inglés->ingleses). í/ú stay (país->países via the consonant rule).
+    if es_str_ends(noun, "és") { return es_str_drop_last(noun, 3) + "eses" }
+    if es_str_ends(noun, "ás") { return es_str_drop_last(noun, 3) + "ases" }
+    if es_str_ends(noun, "ós") { return es_str_drop_last(noun, 3) + "oses" }
     // Ends in -z: replace with -ces
-    if str_eq(last, "z") {
+    if es_str_ends(noun, "z") {
         return es_str_drop_last(noun, 1) + "ces"
     }
-    // Ends in a vowel: add -s
-    if str_eq(last, "a") { return noun + "s" }
-    if str_eq(last, "e") { return noun + "s" }
-    if str_eq(last, "i") { return noun + "s" }
-    if str_eq(last, "o") { return noun + "s" }
-    if str_eq(last, "u") { return noun + "s" }
+    // Stressed final vowel: á/é/ó -> +s (café->cafés); í/ú -> +es (rubí->rubíes)
+    if es_str_ends(noun, "á") { return noun + "s" }
+    if es_str_ends(noun, "é") { return noun + "s" }
+    if es_str_ends(noun, "ó") { return noun + "s" }
+    if es_str_ends(noun, "í") { return noun + "es" }
+    if es_str_ends(noun, "ú") { return noun + "es" }
+    // Plain final vowel: add -s
+    if es_str_ends(noun, "a") { return noun + "s" }
+    if es_str_ends(noun, "e") { return noun + "s" }
+    if es_str_ends(noun, "i") { return noun + "s" }
+    if es_str_ends(noun, "o") { return noun + "s" }
+    if es_str_ends(noun, "u") { return noun + "s" }
     // Ends in consonant (including -s for stressed words like autobús): add -es
     return noun + "es"
 }
@@ -687,6 +721,37 @@ fn es_starts_with_stressed_a(noun: String) -> Bool {
     return false
 }
 
+// es_article_for_gender: the article logic, given gender EXPLICITLY.
+// The realizer should call this with the REAL per-noun gender from
+// vocabulary-es.el (form2), NOT the es_gender heuristic — that is what
+// eliminates the 'el mano' / 'la día' masculine-default error class.
+fn es_article_for_gender(gender: String, noun: String, definite: String, number: String) -> String {
+    let is_plural: Bool = str_eq(number, "plural")
+    let is_def: Bool = str_eq(definite, "true")
+
+    if is_def {
+        if is_plural {
+            if str_eq(gender, "f") { return "las" }
+            return "los"
+        }
+        if str_eq(gender, "f") {
+            if es_starts_with_stressed_a(noun) { return "el" }
+            return "la"
+        }
+        return "el"
+    }
+
+    if is_plural {
+        if str_eq(gender, "f") { return "unas" }
+        return "unos"
+    }
+    if str_eq(gender, "f") {
+        if es_starts_with_stressed_a(noun) { return "un" }
+        return "una"
+    }
+    return "un"
+}
+
 fn es_agree_article(noun: String, definite: String, number: String) -> String {
     let gender: String = es_gender(noun)
     let is_plural: Bool = str_eq(number, "plural")
@@ -714,3 +779,99 @@ fn es_agree_article(noun: String, definite: String, number: String) -> String {
     if str_eq(gender, "f") { return "una" }
     return "un"
 }
+
+// ── Past participle (compound tenses: haber + participle) ─────────────────────
+//
+// Irregular participle table (transcribed from morphology_es_full._IRREG_PART),
+// then the regular rule: -ar -> -ado, -er/-ir -> -ido.
+
+fn es_participle(verb: String) -> String {
+    if str_eq(verb, "escribir")   { return "escrito" }
+    if str_eq(verb, "describir")  { return "descrito" }
+    if str_eq(verb, "abrir")      { return "abierto" }
+    if str_eq(verb, "cubrir")     { return "cubierto" }
+    if str_eq(verb, "descubrir")  { return "descubierto" }
+    if str_eq(verb, "morir")      { return "muerto" }
+    if str_eq(verb, "poner")      { return "puesto" }
+    if str_eq(verb, "ver")        { return "visto" }
+    if str_eq(verb, "volver")     { return "vuelto" }
+    if str_eq(verb, "devolver")   { return "devuelto" }
+    if str_eq(verb, "hacer")      { return "hecho" }
+    if str_eq(verb, "deshacer")   { return "deshecho" }
+    if str_eq(verb, "decir")      { return "dicho" }
+    if str_eq(verb, "romper")     { return "roto" }
+    if str_eq(verb, "resolver")   { return "resuelto" }
+    if str_eq(verb, "freír")      { return "frito" }
+    if str_eq(verb, "imprimir")   { return "impreso" }
+    if str_eq(verb, "satisfacer") { return "satisfecho" }
+    if str_eq(verb, "prever")     { return "previsto" }
+    if str_eq(verb, "revolver")   { return "revuelto" }
+    // Accented -ír infinitives (oír->oído, sonreír->sonreído): "ír" is 3 bytes.
+    if es_str_ends(verb, "ír") { return es_str_drop_last(verb, 3) + "ído" }
+    if es_str_ends(verb, "ar") { return es_str_drop_last(verb, 2) + "ado" }
+    // -er/-ir: a strong-vowel stem takes the accented -ído (caer->caído,
+    // leer->leído, poseer->poseído); consonant stems stay -ido; ui/iu
+    // diphthongs (construir->construido) stay plain.
+    if es_str_ends(verb, "er") {
+        let st: String = es_str_drop_last(verb, 2)
+        if es_strong_vowel_final(st) { return st + "ído" }
+        return st + "ido"
+    }
+    if es_str_ends(verb, "ir") {
+        let st: String = es_str_drop_last(verb, 2)
+        if es_strong_vowel_final(st) { return st + "ído" }
+        return st + "ido"
+    }
+    return verb
+}
+
+// ── Adjective agreement (gender + number) ─────────────────────────────────────
+//
+// Rule-based agreement mirroring morphology_es_full.inflect_adj (rule path):
+//   feminine: -o -> -a; nationality/-dor exceptions add -a; else invariant
+//   plural:   reuse es_pluralize on the agreed singular
+// (Lexicon-backed adjectives in Python may differ; those divergences are what
+//  the parity check surfaces.)
+
+fn es_adj_feminine(lemma: String) -> String {
+    if str_eq(lemma, "español")    { return "española" }
+    if str_eq(lemma, "francés")    { return "francesa" }
+    if str_eq(lemma, "inglés")     { return "inglesa" }
+    if str_eq(lemma, "alemán")     { return "alemana" }
+    if str_eq(lemma, "trabajador") { return "trabajadora" }
+    if str_eq(lemma, "hablador")   { return "habladora" }
+    if str_eq(lemma, "encantador") { return "encantadora" }
+    if es_str_ends(lemma, "o") { return es_str_drop_last(lemma, 1) + "a" }
+    return lemma
+}
+
+fn es_inflect_adj(lemma: String, gender: String, number: String) -> String {
+    if str_eq(gender, "f") {
+        let fem: String = es_adj_feminine(lemma)
+        if str_eq(number, "plural") { return es_pluralize(fem) }
+        return fem
+    }
+    // masculine (citation)
+    if str_eq(number, "plural") { return es_pluralize(lemma) }
+    return lemma
+}
+
+// ── Mandatory preposition + article contraction (de+el->del, a+el->al) ────────
+//
+// Transcribed from realizer_es._contract. np_text is the already-realized NP
+// beginning with "el " when the contraction fires.
+
+fn es_starts_el(np_text: String) -> Bool {
+    let n: Int = str_len(np_text)
+    if n < 3 { return false }
+    return str_eq(str_slice(np_text, 0, 3), "el ")
+}
+
+fn es_contract(prep: String, np_text: String) -> String {
+    if es_starts_el(np_text) {
+        let rest: String = str_slice(np_text, 3, str_len(np_text))
+        if str_eq(prep, "de") { return "del " + rest }
+        if str_eq(prep, "a")  { return "al " + rest }
+    }
+    return prep + " " + np_text
+}

elp/src/vocabulary-es.el

@@ -0,0 +1,362 @@
+;;; vocabulary-es.el — Spanish vocabulary for ELP surface realization.
+;;; Schema: (lemma pos form0 form1 form2 en_translation semantic_hint)
+;;; Source: UniMorph Spanish (github.com/unimorph/spa, CC-BY-SA 3.0),
+;;;         generated by gen_elp_es.py via morphology_es_full (real forms).
+;;; Verbs: form0=present-ind-3sg  form1=preterite-3sg  form2=past-participle
+;;; Nouns: form0=singular  form1=plural  form2=REAL gender (m/f, from lexicon —
+;;;        NOT an ending heuristic; this is what kills 'el mano'/'la día' errors)
+;;; Adjs : form0=masc-sg  form1=fem-sg  form2=masc-pl
+
+(vocabulary-es
+
+ ;; -- function / closed class (incl. mandatory contractions del/al) --------
+  ("el" "det" "el" "los" "m" "the" "definite article m.sg")
+  ("la" "det" "la" "las" "f" "the" "definite article f.sg")
+  ("un" "det" "un" "unos" "m" "a" "indefinite article m.sg")
+  ("una" "det" "una" "unas" "f" "a" "indefinite article f.sg")
+  ("del" "contraction" "del" "" "" "of the" "de + el (mandatory contraction)")
+  ("al" "contraction" "al" "" "" "to the" "a + el (mandatory contraction)")
+  ("este" "dem" "este" "estos" "m" "this" "proximal dem m")
+  ("esta" "dem" "esta" "estas" "f" "this" "proximal dem f")
+  ("no" "neg" "no" "" "" "not/no" "sentential negator (preverbal)")
+  ("ninguno" "det" "ningún" "ninguna" "" "none" "negative determiner (apocope ningún m.sg)")
+  ("y" "conj" "y" "e" "" "and" "coordinator (e before i-/hi-)")
+  ("o" "conj" "o" "u" "" "or" "coordinator (u before o-/ho-)")
+  ("pero" "conj" "pero" "" "" "but" "adversative coordinator")
+  ("que" "conj" "que" "" "" "that" "complementizer / relative")
+  ("si" "conj" "si" "" "" "if" "conditional subordinator")
+  ("porque" "conj" "porque" "" "" "because" "causal subordinator")
+  ("cuando" "conj" "cuando" "" "" "when" "temporal subordinator")
+  ("a" "prep" "a" "" "" "to" "dir-obj (personal a) / dative / allative; a+el=al")
+  ("de" "prep" "de" "" "" "of/from" "genitive/ablative government; de+el=del")
+  ("en" "prep" "en" "" "" "in/on" "locative")
+  ("con" "prep" "con" "" "" "with" "comitative")
+  ("por" "prep" "por" "" "" "by/for" "passive agent / cause")
+  ("para" "prep" "para" "" "" "for" "purpose/benefactive")
+  ("contra" "prep" "contra" "" "" "against" "adversative government (protestar contra)")
+  ("sin" "prep" "sin" "" "" "without" "privative")
+  ("yo" "pron" "yo" "me" "mi" "I" "1sg subj/obj/poss")
+  ("tú" "pron" "tú" "te" "tu" "you" "2sg informal")
+  ("usted" "pron" "usted" "lo" "su" "you" "2sg formal (3sg agreement)")
+  ("él" "pron" "él" "lo" "su" "he" "3sg m subj/DO-clitic/poss")
+  ("ella" "pron" "ella" "la" "su" "she" "3sg f subj/DO-clitic/poss")
+  ("nosotros" "pron" "nosotros" "nos" "nuestro" "we" "1pl")
+  ("vosotros" "pron" "vosotros" "os" "vuestro" "you" "2pl informal")
+  ("ellos" "pron" "ellos" "los" "su" "they" "3pl m")
+  ("ellas" "pron" "ellas" "las" "su" "they" "3pl f")
+  ("le" "clitic" "le" "les" "" "to-him/her" "dative clitic 3sg/3pl (->se before lo/la)")
+  ("se" "clitic" "se" "se" "" "himself/-self" "reflexive / spurious-se (le+lo->se lo)")
+
+ ;; -- verbs (form0=pres-3sg form1=pret-3sg form2=past-participle) -----------
+  ("abrazar" "verb" "abraza" "abrazó" "abrazado" "abrazar" "ar/regular")
+  ("abrir" "verb" "abre" "abrió" "abierto" "abrir" "ir/irregular")
+  ("aceptar" "verb" "acepta" "aceptó" "aceptado" "aceptar" "ar/regular")
+  ("acordar" "verb" "acuerda" "acordó" "acordado" "acordar" "ar/regular")
+  ("amar" "verb" "ama" "amó" "amado" "amar" "ar/regular")
+  ("anunciar" "verb" "anuncia" "anunció" "anunciado" "anunciar" "ar/regular")
+  ("aprobar" "verb" "aprueba" "aprobó" "aprobado" "aprobar" "ar/regular")
+  ("aumentar" "verb" "aumenta" "aumentó" "aumentado" "aumentar" "ar/regular")
+  ("ayudar" "verb" "ayuda" "ayudó" "ayudado" "ayudar" "ar/regular")
+  ("bajar" "verb" "baja" "bajó" "bajado" "bajar" "ar/regular")
+  ("besar" "verb" "besa" "besó" "besado" "besar" "ar/regular")
+  ("buscar" "verb" "busca" "buscó" "buscado" "buscar" "ar/regular")
+  ("caer" "verb" "cae" "cayó" "caído" "caer" "er/regular")
+  ("cambiar" "verb" "cambia" "cambió" "cambiado" "cambiar" "ar/regular")
+  ("caminar" "verb" "camina" "caminó" "caminado" "caminar" "ar/regular")
+  ("cantar" "verb" "canta" "cantó" "cantado" "cantar" "ar/regular")
+  ("celebrar" "verb" "celebra" "celebró" "celebrado" "celebrar" "ar/regular")
+  ("cerrar" "verb" "cierra" "cerró" "cerrado" "cerrar" "ar/regular")
+  ("comenzar" "verb" "comienza" "comenzó" "comenzado" "comenzar" "ar/regular")
+  ("comer" "verb" "come" "comió" "comido" "comer" "er/regular")
+  ("condenar" "verb" "condena" "condenó" "condenado" "condenar" "ar/regular")
+  ("confirmar" "verb" "confirma" "confirmó" "confirmado" "confirmar" "ar/regular")
+  ("conocer" "verb" "conoce" "conoció" "conocido" "conocer" "er/regular")
+  ("contar" "verb" "cuenta" "contó" "contado" "contar" "ar/regular")
+  ("contratar" "verb" "contrata" "contrató" "contratado" "contratar" "ar/regular")
+  ("costar" "verb" "cuesta" "costó" "costado" "costar" "ar/regular")
+  ("crear" "verb" "crea" "creó" "creado" "crear" "ar/regular")
+  ("crecer" "verb" "crece" "creció" "crecido" "crecer" "er/regular")
+  ("creer" "verb" "cree" "creyó" "creído" "creer" "er/regular")
+  ("dar" "verb" "da" "dio" "dado" "dar" "ar/irregular")
+  ("deber" "verb" "debe" "debió" "debido" "deber" "er/regular")
+  ("decir" "verb" "dice" "dijo" "dicho" "decir" "ir/irregular")
+  ("dejar" "verb" "deja" "dejó" "dejado" "dejar" "ar/regular")
+  ("desaparecer" "verb" "desaparece" "desapareció" "desaparecido" "desaparecer" "er/regular")
+  ("descubrir" "verb" "descubre" "descubrió" "descubierto" "descubrir" "ir/irregular")
+  ("despedir" "verb" "despide" "despidió" "despedido" "despedir" "ir/regular")
+  ("detener" "verb" "detiene" "detuvo" "detenido" "detener" "er/regular")
+  ("dimitir" "verb" "dimite" "dimitió" "dimitido" "dimitir" "ir/regular")
+  ("doler" "verb" "duele" "dolió" "dolido" "doler" "er/regular")
+  ("dormir" "verb" "duerme" "durmió" "dormido" "dormir" "ir/regular")
+  ("durar" "verb" "dura" "duró" "durado" "durar" "ar/regular")
+  ("empezar" "verb" "empieza" "empezó" "empezado" "empezar" "ar/regular")
+  ("encontrar" "verb" "encuentra" "encontró" "encontrado" "encontrar" "ar/regular")
+  ("entender" "verb" "entiende" "entendió" "entendido" "entender" "er/regular")
+  ("entrar" "verb" "entra" "entró" "entrado" "entrar" "ar/regular")
+  ("entregar" "verb" "entrega" "entregó" "entregado" "entregar" "ar/regular")
+  ("escapar" "verb" "escapa" "escapó" "escapado" "escapar" "ar/regular")
+  ("escribir" "verb" "escribe" "escribió" "escrito" "escribir" "ir/regular")
+  ("escuchar" "verb" "escucha" "escuchó" "escuchado" "escuchar" "ar/regular")
+  ("esperar" "verb" "espera" "esperó" "esperado" "esperar" "ar/regular")
+  ("estar" "verb" "está" "estuvo" "estado" "estar" "ar/irregular")
+  ("estudiar" "verb" "estudia" "estudió" "estudiado" "estudiar" "ar/regular")
+  ("existir" "verb" "existe" "existió" "existido" "existir" "ir/regular")
+  ("explicar" "verb" "explica" "explicó" "explicado" "explicar" "ar/regular")
+  ("firmar" "verb" "firma" "firmó" "firmado" "firmar" "ar/regular")
+  ("ganar" "verb" "gana" "ganó" "ganado" "ganar" "ar/regular")
+  ("gritar" "verb" "grita" "gritó" "gritado" "gritar" "ar/regular")
+  ("guardar" "verb" "guarda" "guardó" "guardado" "guardar" "ar/regular")
+  ("gustar" "verb" "gusta" "gustó" "gustado" "gustar" "ar/regular")
+  ("haber" "verb" "ha" "hubo" "habido" "haber" "er/irregular")
+  ("hablar" "verb" "habla" "habló" "hablado" "hablar" "ar/regular")
+  ("hacer" "verb" "hace" "hizo" "hecho" "hacer" "er/irregular")
+  ("ir" "verb" "va" "fue" "ido" "ir" "ir/irregular")
+  ("jugar" "verb" "juega" "jugó" "jugado" "jugar" "ar/regular")
+  ("lavar" "verb" "lava" "lavó" "lavado" "lavar" "ar/regular")
+  ("leer" "verb" "lee" "leyó" "leído" "leer" "er/regular")
+  ("llamar" "verb" "llama" "llamó" "llamado" "llamar" "ar/regular")
+  ("llegar" "verb" "llega" "llegó" "llegado" "llegar" "ar/regular")
+  ("llevar" "verb" "lleva" "llevó" "llevado" "llevar" "ar/regular")
+  ("llover" "verb" "llueve" "llovió" "llovido" "llover" "er/regular")
+  ("mirar" "verb" "mira" "miró" "mirado" "mirar" "ar/regular")
+  ("morir" "verb" "muere" "murió" "muerto" "morir" "ir/irregular")
+  ("mostrar" "verb" "muestra" "mostró" "mostrado" "mostrar" "ar/regular")
+  ("nacer" "verb" "nace" "nació" "nacido" "nacer" "er/regular")
+  ("ocultar" "verb" "oculta" "ocultó" "ocultado" "ocultar" "ar/regular")
+  ("ofrecer" "verb" "ofrece" "ofreció" "ofrecido" "ofrecer" "er/regular")
+  ("olvidar" "verb" "olvida" "olvidó" "olvidado" "olvidar" "ar/regular")
+  ("oír" "verb" "oye" "oyó" "oído" "oír" "ar/regular")
+  ("parecer" "verb" "parece" "pareció" "parecido" "parecer" "er/regular")
+  ("pasar" "verb" "pasa" "pasó" "pasado" "pasar" "ar/regular")
+  ("pedir" "verb" "pide" "pidió" "pedido" "pedir" "ir/regular")
+  ("pensar" "verb" "piensa" "pensó" "pensado" "pensar" "ar/regular")
+  ("perder" "verb" "pierde" "perdió" "perdido" "perder" "er/regular")
+  ("perdonar" "verb" "perdona" "perdonó" "perdonado" "perdonar" "ar/regular")
+  ("poder" "verb" "puede" "pudo" "podido" "poder" "er/irregular")
+  ("poner" "verb" "pone" "puso" "puesto" "poner" "er/irregular")
+  ("preocupar" "verb" "preocupa" "preocupó" "preocupado" "preocupar" "ar/regular")
+  ("producir" "verb" "produce" "produjo" "producido" "producir" "ir/regular")
+  ("prometer" "verb" "promete" "prometió" "prometido" "prometer" "er/regular")
+  ("proponer" "verb" "propone" "propuso" "propuesto" "proponer" "er/regular")
+  ("prosperar" "verb" "prospera" "prosperó" "prosperado" "prosperar" "ar/regular")
+  ("protestar" "verb" "protesta" "protestó" "protestado" "protestar" "ar/regular")
+  ("quedar" "verb" "queda" "quedó" "quedado" "quedar" "ar/regular")
+  ("querer" "verb" "quiere" "quiso" "querido" "querer" "er/irregular")
+  ("recordar" "verb" "recuerda" "recordó" "recordado" "recordar" "ar/regular")
+  ("recorrer" "verb" "recorre" "recorrió" "recorrido" "recorrer" "er/regular")
+  ("regresar" "verb" "regresa" "regresó" "regresado" "regresar" "ar/regular")
+  ("renacer" "verb" "renace" "renació" "renacido" "renacer" "er/regular")
+  ("saber" "verb" "sabe" "supo" "sabido" "saber" "er/irregular")
+  ("salir" "verb" "sale" "salió" "salido" "salir" "ir/irregular")
+  ("sentar" "verb" "sienta" "sentó" "sentado" "sentar" "ar/regular")
+  ("sentir" "verb" "siente" "sintió" "sentido" "sentir" "ir/regular")
+  ("separar" "verb" "separa" "separó" "separado" "separar" "ar/regular")
+  ("ser" "verb" "es" "fue" "sido" "ser" "er/irregular")
+  ("sonreír" "verb" "sonríe" "sonrió" "sonreído" "sonreír" "ar/regular")
+  ("soplar" "verb" "sopla" "sopló" "soplado" "soplar" "ar/regular")
+  ("sorprender" "verb" "sorprende" "sorprendió" "sorprendido" "sorprender" "er/regular")
+  ("soñar" "verb" "sueña" "soñó" "soñado" "soñar" "ar/regular")
+  ("subir" "verb" "sube" "subió" "subido" "subir" "ir/regular")
+  ("tener" "verb" "tiene" "tuvo" "tenido" "tener" "er/irregular")
+  ("terminar" "verb" "termina" "terminó" "terminado" "terminar" "ar/regular")
+  ("tocar" "verb" "toca" "tocó" "tocado" "tocar" "ar/regular")
+  ("tomar" "verb" "toma" "tomó" "tomado" "tomar" "ar/regular")
+  ("trabajar" "verb" "trabaja" "trabajó" "trabajado" "trabajar" "ar/regular")
+  ("vender" "verb" "vende" "vendió" "vendido" "vender" "er/regular")
+  ("venir" "verb" "viene" "vino" "venido" "venir" "ir/irregular")
+  ("ver" "verb" "ve" "vio" "visto" "ver" "er/irregular")
+  ("viajar" "verb" "viaja" "viajó" "viajado" "viajar" "ar/regular")
+  ("vivir" "verb" "vive" "vivió" "vivido" "vivir" "ir/regular")
+  ("volver" "verb" "vuelve" "volvió" "vuelto" "volver" "er/irregular")
+
+ ;; -- nouns (form0=sg form1=pl form2=REAL gender m/f) ----------------------
+  ("Barcelona" "noun" "barcelona" "barcelonas" "f" "Barcelona" "gender:heuristic")
+  ("Madrid" "noun" "madrid" "madrides" "m" "Madrid" "gender:heuristic")
+  ("María" "noun" "maría" "marías" "f" "María" "gender:heuristic")
+  ("acuerdo" "noun" "acuerdo" "acuerdos" "m" "acuerdo" "gender:lexicon")
+  ("acusado" "noun" "acusado" "acusados" "m" "acusado" "gender:lexicon")
+  ("agua" "noun" "agua" "aguas" "f" "agua" "gender:lexicon")
+  ("amigo" "noun" "amigo" "amigos" "m" "amigo" "gender:lexicon")
+  ("amor" "noun" "amor" "amores" "m" "amor" "gender:lexicon")
+  ("anciano" "noun" "anciano" "ancianos" "m" "anciano" "gender:lexicon")
+  ("autor" "noun" "autor" "autores" "m" "autor" "gender:lexicon")
+  ("ayuda" "noun" "ayuda" "ayudas" "f" "ayuda" "gender:lexicon")
+  ("año" "noun" "año" "años" "m" "año" "gender:lexicon")
+  ("banco" "noun" "banco" "bancos" "m" "banco" "gender:lexicon")
+  ("barco" "noun" "barco" "barcos" "m" "barco" "gender:lexicon")
+  ("baño" "noun" "baño" "baños" "m" "baño" "gender:lexicon")
+  ("beneficio" "noun" "beneficio" "beneficios" "m" "beneficio" "gender:lexicon")
+  ("billete" "noun" "billete" "billetes" "m" "billete" "gender:lexicon")
+  ("café" "noun" "café" "cafés" "m" "café" "gender:lexicon")
+  ("calma" "noun" "calma" "calmas" "f" "calma" "gender:lexicon")
+  ("camino" "noun" "camino" "caminos" "m" "camino" "gender:lexicon")
+  ("canción" "noun" "canción" "canciones" "f" "canción" "gender:lexicon")
+  ("candidato" "noun" "candidato" "candidatos" "m" "candidato" "gender:lexicon")
+  ("casa" "noun" "casa" "casas" "f" "casa" "gender:lexicon")
+  ("cena" "noun" "cena" "cenas" "f" "cena" "gender:lexicon")
+  ("ciudad" "noun" "ciudad" "ciudades" "f" "ciudad" "gender:lexicon")
+  ("ciudadano" "noun" "ciudadano" "ciudadanos" "m" "ciudadano" "gender:lexicon")
+  ("color" "noun" "color" "colores" "m" "color" "gender:lexicon")
+  ("condición" "noun" "condición" "condiciones" "f" "condición" "gender:lexicon")
+  ("corazón" "noun" "corazón" "corazones" "m" "corazón" "gender:lexicon")
+  ("costa" "noun" "costa" "costas" "f" "costa" "gender:lexicon")
+  ("crisis" "noun" "crisis" "crisis" "f" "crisis" "gender:lexicon")
+  ("crédito" "noun" "crédito" "créditos" "m" "crédito" "gender:lexicon")
+  ("culpa" "noun" "culpa" "culpas" "f" "culpa" "gender:lexicon")
+  ("damnificado" "noun" "damnificado" "damnificados" "m" "damnificado" "gender:lexicon")
+  ("demás" "noun" "demás" "demás" "m" "demás" "gender:heuristic")
+  ("dinero" "noun" "dinero" "dineros" "m" "dinero" "gender:lexicon")
+  ("día" "noun" "día" "días" "m" "día" "gender:lexicon")
+  ("economía" "noun" "economía" "economías" "f" "economía" "gender:lexicon")
+  ("elección" "noun" "elección" "elecciones" "f" "elección" "gender:lexicon")
+  ("empleo" "noun" "empleo" "empleos" "m" "empleo" "gender:lexicon")
+  ("empresa" "noun" "empresa" "empresas" "f" "empresa" "gender:lexicon")
+  ("equipo" "noun" "equipo" "equipos" "m" "equipo" "gender:lexicon")
+  ("estación" "noun" "estación" "estaciones" "f" "estación" "gender:lexicon")
+  ("estudiante" "noun" "estudiante" "estudiantes" "m" "estudiante" "gender:lexicon")
+  ("experto" "noun" "experto" "expertos" "m" "experto" "gender:lexicon")
+  ("fiesta" "noun" "fiesta" "fiestas" "f" "fiesta" "gender:lexicon")
+  ("flor" "noun" "flor" "flores" "f" "flor" "gender:lexicon")
+  ("foto" "noun" "foto" "fotos" "f" "foto" "gender:lexicon")
+  ("frío" "noun" "frío" "fríos" "m" "frío" "gender:lexicon")
+  ("fuego" "noun" "fuego" "fuegos" "m" "fuego" "gender:lexicon")
+  ("fuerza" "noun" "fuerza" "fuerzas" "f" "fuerza" "gender:lexicon")
+  ("gato" "noun" "gato" "gatos" "m" "gato" "gender:lexicon")
+  ("gobierno" "noun" "gobierno" "gobiernos" "m" "gobierno" "gender:lexicon")
+  ("gusto" "noun" "gusto" "gustos" "m" "gusto" "gender:lexicon")
+  ("hermano" "noun" "hermano" "hermanos" "m" "hermano" "gender:lexicon")
+  ("hombre" "noun" "hombre" "hombres" "m" "hombre" "gender:lexicon")
+  ("jardín" "noun" "jardín" "jardines" "m" "jardín" "gender:lexicon")
+  ("juez" "noun" "juez" "jueces" "m" "juez" "gender:lexicon")
+  ("juicio" "noun" "juicio" "juicios" "m" "juicio" "gender:lexicon")
+  ("lentitud" "noun" "lentitud" "lentitudes" "f" "lentitud" "gender:lexicon")
+  ("ley" "noun" "ley" "leyes" "f" "ley" "gender:lexicon")
+  ("libertad" "noun" "libertad" "libertades" "f" "libertad" "gender:lexicon")
+  ("libro" "noun" "libro" "libros" "m" "libro" "gender:lexicon")
+  ("llave" "noun" "llave" "llaves" "f" "llave" "gender:lexicon")
+  ("lluvia" "noun" "lluvia" "lluvias" "f" "lluvia" "gender:lexicon")
+  ("luna" "noun" "luna" "lunas" "f" "luna" "gender:lexicon")
+  ("luz" "noun" "luz" "luces" "f" "luz" "gender:lexicon")
+  ("madre" "noun" "madre" "madres" "f" "madre" "gender:lexicon")
+  ("mano" "noun" "mano" "manos" "f" "mano" "gender:lexicon")
+  ("mapa" "noun" "mapa" "mapas" "m" "mapa" "gender:lexicon")
+  ("mar" "noun" "mar" "mares" "m" "mar" "gender:lexicon")
+  ("marea" "noun" "marea" "mareas" "f" "marea" "gender:lexicon")
+  ("memoria" "noun" "memoria" "memorias" "f" "memoria" "gender:lexicon")
+  ("mesa" "noun" "mesa" "mesas" "f" "mesa" "gender:lexicon")
+  ("ministro" "noun" "ministro" "ministros" "m" "ministro" "gender:lexicon")
+  ("montaña" "noun" "montaña" "montañas" "f" "montaña" "gender:lexicon")
+  ("moto" "noun" "moto" "motos" "f" "moto" "gender:lexicon")
+  ("mujer" "noun" "mujer" "mujeres" "f" "mujer" "gender:lexicon")
+  ("mundo" "noun" "mundo" "mundos" "m" "mundo" "gender:lexicon")
+  ("música" "noun" "música" "músicas" "f" "música" "gender:lexicon")
+  ("nación" "noun" "nación" "naciones" "f" "nación" "gender:lexicon")
+  ("niebla" "noun" "niebla" "nieblas" "f" "niebla" "gender:lexicon")
+  ("nieve" "noun" "nieve" "nieves" "f" "nieve" "gender:lexicon")
+  ("niña" "noun" "niña" "niñas" "f" "niña" "gender:lexicon")
+  ("niño" "noun" "niño" "niños" "m" "niño" "gender:lexicon")
+  ("noche" "noun" "noche" "noches" "f" "noche" "gender:lexicon")
+  ("nombre" "noun" "nombre" "nombres" "m" "nombre" "gender:lexicon")
+  ("ojo" "noun" "ojo" "ojos" "m" "ojo" "gender:heuristic")
+  ("orilla" "noun" "orilla" "orillas" "f" "orilla" "gender:lexicon")
+  ("paisaje" "noun" "paisaje" "paisajes" "m" "paisaje" "gender:lexicon")
+  ("parlamento" "noun" "parlamento" "parlamentos" "m" "parlamento" "gender:lexicon")
+  ("parte" "noun" "parte" "partes" "f" "parte" "gender:lexicon")
+  ("pasillo" "noun" "pasillo" "pasillos" "m" "pasillo" "gender:lexicon")
+  ("país" "noun" "país" "países" "m" "país" "gender:lexicon")
+  ("película" "noun" "película" "películas" "f" "película" "gender:lexicon")
+  ("perro" "noun" "perro" "perros" "m" "perro" "gender:lexicon")
+  ("persona" "noun" "persona" "personas" "f" "persona" "gender:lexicon")
+  ("petróleo" "noun" "petróleo" "petróleos" "m" "petróleo" "gender:lexicon")
+  ("pez" "noun" "pez" "peces" "f" "pez" "gender:lexicon")
+  ("plan" "noun" "plan" "planes" "m" "plan" "gender:lexicon")
+  ("policía" "noun" "policía" "policías" "f" "policía" "gender:lexicon")
+  ("portavoz" "noun" "portavoz" "portavoces" "m" "portavoz" "gender:lexicon")
+  ("portero" "noun" "portero" "porteros" "m" "portero" "gender:lexicon")
+  ("precio" "noun" "precio" "precios" "m" "precio" "gender:lexicon")
+  ("presidente" "noun" "presidente" "presidentes" "m" "presidente" "gender:lexicon")
+  ("problema" "noun" "problema" "problemas" "m" "problema" "gender:lexicon")
+  ("programa" "noun" "programa" "programas" "m" "programa" "gender:lexicon")
+  ("proyecto" "noun" "proyecto" "proyectos" "m" "proyecto" "gender:lexicon")
+  ("puerta" "noun" "puerta" "puertas" "f" "puerta" "gender:lexicon")
+  ("pájaro" "noun" "pájaro" "pájaros" "m" "pájaro" "gender:lexicon")
+  ("razón" "noun" "razón" "razones" "f" "razón" "gender:lexicon")
+  ("raíz" "noun" "raíz" "raíces" "f" "raíz" "gender:lexicon")
+  ("recuerdo" "noun" "recuerdo" "recuerdos" "m" "recuerdo" "gender:lexicon")
+  ("reforma" "noun" "reforma" "reformas" "f" "reforma" "gender:lexicon")
+  ("región" "noun" "región" "regiones" "f" "región" "gender:lexicon")
+  ("río" "noun" "río" "ríos" "m" "río" "gender:lexicon")
+  ("semilla" "noun" "semilla" "semillas" "f" "semilla" "gender:lexicon")
+  ("sendero" "noun" "sendero" "senderos" "m" "sendero" "gender:lexicon")
+  ("señor" "noun" "señor" "señores" "m" "señor" "gender:lexicon")
+  ("silencio" "noun" "silencio" "silencios" "m" "silencio" "gender:lexicon")
+  ("silla" "noun" "silla" "sillas" "f" "silla" "gender:lexicon")
+  ("sol" "noun" "sol" "soles" "m" "sol" "gender:lexicon")
+  ("tarea" "noun" "tarea" "tareas" "f" "tarea" "gender:lexicon")
+  ("tema" "noun" "tema" "temas" "m" "tema" "gender:lexicon")
+  ("ti" "noun" "ti" "tis" "m" "ti" "gender:heuristic")
+  ("tiempo" "noun" "tiempo" "tiempos" "m" "tiempo" "gender:lexicon")
+  ("tipo" "noun" "tipo" "tipos" "m" "tipo" "gender:lexicon")
+  ("todo" "noun" "todo" "todos" "m" "todo" "gender:heuristic")
+  ("tormenta" "noun" "tormenta" "tormentas" "f" "tormenta" "gender:lexicon")
+  ("trabajador" "noun" "trabajador" "trabajadores" "m" "trabajador" "gender:lexicon")
+  ("tristeza" "noun" "tristeza" "tristezas" "f" "tristeza" "gender:lexicon")
+  ("ventana" "noun" "ventana" "ventanas" "f" "ventana" "gender:lexicon")
+  ("verdad" "noun" "verdad" "verdades" "f" "verdad" "gender:lexicon")
+  ("viaje" "noun" "viaje" "viajes" "m" "viaje" "gender:lexicon")
+  ("victoria" "noun" "victoria" "victorias" "f" "victoria" "gender:lexicon")
+  ("vida" "noun" "vida" "vidas" "f" "vida" "gender:lexicon")
+  ("viento" "noun" "viento" "vientos" "m" "viento" "gender:lexicon")
+  ("voz" "noun" "voz" "voces" "f" "voz" "gender:lexicon")
+  ("vuelta" "noun" "vuelta" "vueltas" "f" "vuelta" "gender:lexicon")
+  ("árbol" "noun" "árbol" "árboles" "m" "árbol" "gender:lexicon")
+
+ ;; -- adjectives (form0=masc-sg form1=fem-sg form2=masc-pl) ----------------
+  ("alto" "adj" "alto" "alta" "altos" "alto" "lexicon")
+  ("ambos" "adj" "ambos" "ambos" "ambos" "ambos" "rule")
+  ("antiguo" "adj" "antiguo" "antigua" "antiguos" "antiguo" "lexicon")
+  ("azul" "adj" "azul" "azul" "azules" "azul" "lexicon")
+  ("bajo" "adj" "bajo" "baja" "bajos" "bajo" "lexicon")
+  ("blanco" "adj" "blanco" "blanca" "blancos" "blanco" "lexicon")
+  ("bondadoso" "adj" "bondadoso" "bondadosa" "bondadosos" "bondadoso" "lexicon")
+  ("bonito" "adj" "bonito" "bonita" "bonitos" "bonito" "lexicon")
+  ("bueno" "adj" "bueno" "buena" "buenos" "bueno" "lexicon")
+  ("cansado" "adj" "cansado" "cansada" "cansados" "cansado" "lexicon")
+  ("corto" "adj" "corto" "corta" "cortos" "corto" "lexicon")
+  ("difícil" "adj" "difícil" "difícil" "difíciles" "difícil" "lexicon")
+  ("dos" "adj" "dos" "dos" "dos" "dos" "rule")
+  ("económico" "adj" "económico" "económica" "económicos" "económico" "lexicon")
+  ("español" "adj" "español" "española" "españoles" "español" "lexicon")
+  ("estrecho" "adj" "estrecho" "estrecha" "estrechos" "estrecho" "lexicon")
+  ("fascinante" "adj" "fascinante" "fascinante" "fascinantes" "fascinante" "rule")
+  ("feliz" "adj" "feliz" "feliz" "felices" "feliz" "lexicon")
+  ("francés" "adj" "francés" "francesa" "franceses" "francés" "lexicon")
+  ("frío" "adj" "frío" "fría" "fríos" "frío" "lexicon")
+  ("fácil" "adj" "fácil" "fácil" "fáciles" "fácil" "lexicon")
+  ("grande" "adj" "grande" "grande" "grandes" "grande" "lexicon")
+  ("hermoso" "adj" "hermoso" "hermosa" "hermosos" "hermoso" "lexicon")
+  ("importante" "adj" "importante" "importante" "importantes" "importante" "lexicon")
+  ("inglés" "adj" "inglés" "inglesa" "ingleses" "inglés" "lexicon")
+  ("largo" "adj" "largo" "larga" "largos" "largo" "lexicon")
+  ("lento" "adj" "lento" "lenta" "lentos" "lento" "lexicon")
+  ("malo" "adj" "malo" "mala" "malos" "malo" "lexicon")
+  ("mucho" "adj" "mucho" "mucha" "muchos" "mucho" "lexicon")
+  ("necesario" "adj" "necesario" "necesaria" "necesarios" "necesario" "lexicon")
+  ("negro" "adj" "negro" "negra" "negros" "negro" "lexicon")
+  ("nuevo" "adj" "nuevo" "nueva" "nuevos" "nuevo" "lexicon")
+  ("olvidado" "adj" "olvidado" "olvidada" "olvidados" "olvidado" "lexicon")
+  ("oscuro" "adj" "oscuro" "oscura" "oscuros" "oscuro" "lexicon")
+  ("pequeño" "adj" "pequeño" "pequeña" "pequeños" "pequeño" "lexicon")
+  ("político" "adj" "político" "política" "políticos" "político" "lexicon")
+  ("posible" "adj" "posible" "posible" "posibles" "posible" "lexicon")
+  ("rojo" "adj" "rojo" "roja" "rojos" "rojo" "lexicon")
+  ("rápido" "adj" "rápido" "rápida" "rápidos" "rápido" "lexicon")
+  ("sabio" "adj" "sabio" "sabia" "sabios" "sabio" "lexicon")
+  ("silencioso" "adj" "silencioso" "silenciosa" "silenciosos" "silencioso" "lexicon")
+  ("social" "adj" "social" "social" "sociales" "social" "lexicon")
+  ("trabajador" "adj" "trabajador" "trabajadora" "trabajadores" "trabajador" "lexicon")
+  ("triste" "adj" "triste" "triste" "tristes" "triste" "rule")
+  ("verde" "adj" "verde" "verde" "verdes" "verde" "lexicon")
+  ("viejo" "adj" "viejo" "vieja" "viejos" "viejo" "lexicon")
+
+)

elp/tests/gen_elp_es.py

@@ -0,0 +1,262 @@
+# -*- coding: utf-8 -*-
+"""gen_elp_es.py — emit the ELP (.el) port artifacts for Spanish.
+
+Mirrors gen_elp_en.py. Produces:
+  vocabulary-es.el   real generated vocabulary in the established schema
+                     [lemma, pos, form0, form1, form2, en_translation, semantic_hint]
+                     (same schema as vocabulary-got.el / vocabulary-en.el;
+                     UniMorph spa lineage).
+                     Verbs : form0=present-ind-3sg  form1=preterite-3sg  form2=past-participle
+                     Nouns : form0=singular  form1=plural  form2=REAL gender (m/f, lexicon)
+                     Adjs  : form0=masc-sg  form1=fem-sg  form2=masc-pl
+  lang_profile_es.el the Spanish profile with the flags the realizer keys on.
+
+Every form is generated by morphology_es_full (real UniMorph lexicon, not
+hand-typed), so the .el vocabulary is honest and reproduces the forms the
+realizer used. CRITICAL (coordinator quality bar): noun gender in form2 is the
+REAL per-lemma lexicon gender (N;FEM/MASC), NOT an ending heuristic — this is
+what kills the 'el mano / la día' masculine-default error class.
+"""
+import morphology_es_full as M
+from test_set_es import TESTS
+from held_out_es import HELD
+
+# ── core closed class + common content lemmas so the vocab is usable beyond the
+#    validated sentences ──────────────────────────────────────────────────────
+_CORE_VERBS = ["ser", "estar", "haber", "tener", "hacer", "ir", "ver", "dar",
+               "saber", "poder", "querer", "venir", "decir", "poner", "salir",
+               "hablar", "comer", "vivir", "trabajar", "estudiar", "llegar",
+               "pasar", "deber", "parecer", "quedar", "creer", "dejar", "llevar",
+               "encontrar", "llamar", "pensar", "volver", "conocer", "sentir",
+               "contar", "empezar", "buscar", "esperar", "existir", "entrar",
+               "escribir", "perder", "producir", "recordar", "morir", "nacer",
+               "abrir", "escapar", "soñar", "amar", "caer", "leer", "oír"]
+_CORE_NOUNS = ["tiempo", "persona", "año", "día", "mano", "mundo", "vida",
+               "hombre", "mujer", "parte", "casa", "país", "problema", "programa",
+               "tema", "mapa", "agua", "foto", "moto", "ciudad", "libertad",
+               "canción", "nación", "flor", "color", "amor", "señor", "viaje",
+               "paisaje", "gato", "perro", "libro", "mesa", "silla", "noche",
+               "luz", "voz", "pez", "raíz", "crisis", "sol", "luna", "mar",
+               "corazón", "flor", "árbol", "camino", "puerta", "ventana"]
+_CORE_ADJS = ["bueno", "malo", "nuevo", "viejo", "grande", "pequeño", "alto",
+              "bajo", "largo", "corto", "feliz", "triste", "fácil", "difícil",
+              "rápido", "lento", "hermoso", "económico", "político", "social",
+              "azul", "rojo", "verde", "blanco", "negro", "español", "francés",
+              "inglés", "importante", "posible", "necesario", "trabajador"]
+
+# closed-class function words. Contractions (del/al) and the government notes
+# are the coordinator's quality bar (mandatory contraction; verb-prep govt).
+_FUNCTION = [
+    # articles (gender/number agreement is in morphology; these are citation)
+    ("el",  "det", "el",  "los", "m", "the",  "definite article m.sg"),
+    ("la",  "det", "la",  "las", "f", "the",  "definite article f.sg"),
+    ("un",  "det", "un",  "unos","m", "a",    "indefinite article m.sg"),
+    ("una", "det", "una", "unas","f", "a",    "indefinite article f.sg"),
+    # MANDATORY CONTRACTIONS (prep + el) — del / al
+    ("del", "contraction", "del", "", "", "of the", "de + el (mandatory contraction)"),
+    ("al",  "contraction", "al",  "", "", "to the", "a + el (mandatory contraction)"),
+    # demonstratives
+    ("este", "dem", "este", "estos", "m", "this", "proximal dem m"),
+    ("esta", "dem", "esta", "estas", "f", "this", "proximal dem f"),
+    # negation (SACRED — polarity never dropped)
+    ("no", "neg", "no", "", "", "not/no", "sentential negator (preverbal)"),
+    ("ninguno", "det", "ningún", "ninguna", "", "none", "negative determiner (apocope ningún m.sg)"),
+    # conjunctions
+    ("y", "conj", "y", "e", "", "and", "coordinator (e before i-/hi-)"),
+    ("o", "conj", "o", "u", "", "or", "coordinator (u before o-/ho-)"),
+    ("pero", "conj", "pero", "", "", "but", "adversative coordinator"),
+    ("que", "conj", "que", "", "", "that", "complementizer / relative"),
+    ("si", "conj", "si", "", "", "if", "conditional subordinator"),
+    ("porque", "conj", "porque", "", "", "because", "causal subordinator"),
+    ("cuando", "conj", "cuando", "", "", "when", "temporal subordinator"),
+    # prepositions (government: verbs select these; contraction with el applies to a/de)
+    ("a", "prep", "a", "", "", "to", "dir-obj (personal a) / dative / allative; a+el=al"),
+    ("de", "prep", "de", "", "", "of/from", "genitive/ablative government; de+el=del"),
+    ("en", "prep", "en", "", "", "in/on", "locative"),
+    ("con", "prep", "con", "", "", "with", "comitative"),
+    ("por", "prep", "por", "", "", "by/for", "passive agent / cause"),
+    ("para", "prep", "para", "", "", "for", "purpose/benefactive"),
+    ("contra", "prep", "contra", "", "", "against", "adversative government (protestar contra)"),
+    ("sin", "prep", "sin", "", "", "without", "privative"),
+    # subject pronouns
+    ("yo", "pron", "yo", "me", "mi", "I", "1sg subj/obj/poss"),
+    ("tú", "pron", "tú", "te", "tu", "you", "2sg informal"),
+    ("usted", "pron", "usted", "lo", "su", "you", "2sg formal (3sg agreement)"),
+    ("él", "pron", "él", "lo", "su", "he", "3sg m subj/DO-clitic/poss"),
+    ("ella", "pron", "ella", "la", "su", "she", "3sg f subj/DO-clitic/poss"),
+    ("nosotros", "pron", "nosotros", "nos", "nuestro", "we", "1pl"),
+    ("vosotros", "pron", "vosotros", "os", "vuestro", "you", "2pl informal"),
+    ("ellos", "pron", "ellos", "los", "su", "they", "3pl m"),
+    ("ellas", "pron", "ellas", "las", "su", "they", "3pl f"),
+    # indirect-object clitics
+    ("le", "clitic", "le", "les", "", "to-him/her", "dative clitic 3sg/3pl (->se before lo/la)"),
+    ("se", "clitic", "se", "se", "", "himself/-self", "reflexive / spurious-se (le+lo->se lo)"),
+]
+
+
+def _walk_collect(spec, verbs, nouns, adjs):
+    """Recursively collect verb/noun/adj lemmas from a semantic spec."""
+    if isinstance(spec, dict):
+        if spec.get("pred"):
+            verbs.add(spec["pred"])
+        if spec.get("noun"):
+            nouns.add(spec["noun"])
+        if spec.get("adj"):
+            adjs.add(spec["adj"])
+        if spec.get("superlative"):
+            adjs.add(spec["superlative"])
+        if spec.get("from_adj"):
+            adjs.add(spec["from_adj"])
+        # adjs: [{"lemma":..,"pos":..}] | ["lemma", ..]
+        for a in spec.get("adjs", []) or []:
+            adjs.add(a["lemma"] if isinstance(a, dict) else a)
+        for a in spec.get("adj_coord", []) or []:
+            adjs.add(a["lemma"] if isinstance(a, dict) else a)
+        if isinstance(spec.get("pcomp"), dict):
+            pc = spec["pcomp"]
+            if pc.get("adj"):
+                adjs.add(pc["adj"])
+            for a in pc.get("adj_coord", []) or []:
+                adjs.add(a["lemma"] if isinstance(a, dict) else a)
+        for v in spec.values():
+            _walk_collect(v, verbs, nouns, adjs)
+    elif isinstance(spec, list):
+        for it in spec:
+            _walk_collect(it, verbs, nouns, adjs)
+
+
+def _collect_from_specs():
+    verbs, nouns, adjs = set(), set(), set()
+    for t in TESTS + HELD:
+        _walk_collect(t["spec"], verbs, nouns, adjs)
+    return verbs, nouns, adjs
+
+
+def _esc(s):
+    return str(s).replace('"', '\\"')
+
+
+def _row(fields):
+    return "  (" + " ".join(f'"{_esc(f)}"' for f in fields) + ")"
+
+
+def emit_vocabulary(path):
+    v_specs, n_specs, a_specs = _collect_from_specs()
+    verbs = sorted(set(_CORE_VERBS) | v_specs)
+    nouns = sorted(set(_CORE_NOUNS) | n_specs)
+    adjs = sorted(set(_CORE_ADJS) | a_specs)
+
+    lines = [
+        ";;; vocabulary-es.el — Spanish vocabulary for ELP surface realization.",
+        ";;; Schema: (lemma pos form0 form1 form2 en_translation semantic_hint)",
+        ";;; Source: UniMorph Spanish (github.com/unimorph/spa, CC-BY-SA 3.0),",
+        ";;;         generated by gen_elp_es.py via morphology_es_full (real forms).",
+        ";;; Verbs: form0=present-ind-3sg  form1=preterite-3sg  form2=past-participle",
+        ";;; Nouns: form0=singular  form1=plural  form2=REAL gender (m/f, from lexicon —",
+        ";;;        NOT an ending heuristic; this is what kills 'el mano'/'la día' errors)",
+        ";;; Adjs : form0=masc-sg  form1=fem-sg  form2=masc-pl",
+        "",
+        "(vocabulary-es",
+        "",
+        " ;; -- function / closed class (incl. mandatory contractions del/al) --------",
+    ]
+    for f in _FUNCTION:
+        lines.append(_row(f))
+
+    lines.append("")
+    lines.append(" ;; -- verbs (form0=pres-3sg form1=pret-3sg form2=past-participle) -----------")
+    for lem in verbs:
+        f0, c0 = M.conjugate(lem, "ind", "present", "third", "singular")
+        f1, c1 = M.conjugate(lem, "ind", "preterite", "third", "singular")
+        pp, cp = M.participle(lem)
+        vclass = lem[-2:] if lem[-2:] in ("ar", "er", "ir") else "ar"
+        irr = "irregular" if (c0 == "lexicon" and pp in M._IRREG_PART.values()) or \
+              lem in ("ser", "estar", "ir", "haber", "tener", "hacer", "ver",
+                      "dar", "saber", "poder", "querer", "venir", "decir",
+                      "poner", "salir") else "regular"
+        lines.append(_row([lem, "verb", f0, f1, pp, lem, vclass + "/" + irr]))
+
+    lines.append("")
+    lines.append(" ;; -- nouns (form0=sg form1=pl form2=REAL gender m/f) ----------------------")
+    for lem in nouns:
+        sg, _ = M.inflect_noun(lem, "singular")
+        pl, _ = M.inflect_noun(lem, "plural")
+        g = M.noun_gender(lem)
+        # honesty flag: did gender come from the lexicon, or a heuristic fallback?
+        src = "lexicon" if (lem in M._NOUNS and M._NOUNS[lem].get("g")) else "heuristic"
+        lines.append(_row([lem, "noun", sg, pl, g, lem, "gender:" + src]))
+
+    lines.append("")
+    lines.append(" ;; -- adjectives (form0=masc-sg form1=fem-sg form2=masc-pl) ----------------")
+    for lem in adjs:
+        m_sg, _ = M.inflect_adj(lem, "m", "singular")
+        f_sg, _ = M.inflect_adj(lem, "f", "singular")
+        m_pl, _ = M.inflect_adj(lem, "m", "plural")
+        src = "lexicon" if lem in M._ADJS else "rule"
+        lines.append(_row([lem, "adj", m_sg, f_sg, m_pl, lem, src]))
+
+    lines.append("")
+    lines.append(")")
+    with open(path, "w", encoding="utf-8") as fh:
+        fh.write("\n".join(lines) + "\n")
+    return len(_FUNCTION) + len(verbs) + len(nouns) + len(adjs), len(verbs), len(nouns), len(adjs)
+
+
+LANG_PROFILE = ''';;; lang_profile_es.el — Spanish language profile for ELP.
+;;; Keys the realizer's construction switches. Mirrors lang_profile_en / _pt.
+
+(lang_profile_es
+  (language        "Spanish")
+  (iso639          "es")
+  (family          "Romance")
+
+  ;; -- core typology flags -------------------------------------------------
+  (pro-drop            yes)    ; subjects routinely dropped; agreement carries person
+  (obligatory-subject  no)
+  (grammatical-gender  yes)    ; m/f on every noun; article+adjective AGREE
+  (gender-source       lexicon); REAL per-noun gender from UniMorph — NOT a heuristic
+  (do-support          no)
+  (subject-aux-inversion no)   ; questions by intonation/punctuation, not inversion
+  (question-strategy   intonation)
+  (article-selection   "el/la/los/las un/una/unos/unas")
+  (stressed-a-rule     yes)    ; fem sg noun in stressed a-/ha- takes el/un (el agua)
+  (adjective-position  postnominal) ; default post; a few prenominal + apocope
+  (adjective-agreement "gender+number")
+  (question-punct      inverted)    ; opening ¿ ¡ required
+
+  ;; -- MANDATORY CONTRACTIONS (coordinator quality bar) --------------------
+  (contractions        ((de el "del") (a el "al")))
+  (contraction-mandatory yes)  ; 'de el'/'a el' MUST surface as del/al
+
+  ;; -- verb / aspect system ------------------------------------------------
+  (verb-classes        (ar er ir))
+  (tenses              (present preterite imperfect future conditional))
+  (moods               (ind sbjv imp))
+  (finite-agreement    "person+number (6 slots)")
+  (perfect-aux         "haber")  ; haber + past participle (invariant -o)
+  (progressive-aux     "estar")  ; estar + gerund
+  (passive-aux         "ser")    ; ser + participle (agrees) + por-agent
+  (copula-split        "ser/estar")  ; permanent vs stage-level
+  (future              "infinitive + é/ás/á/emos/éis/án")
+
+  ;; -- clitics / government ------------------------------------------------
+  (object-clitics      yes)      ; me te lo la le nos os los las; proclisis/enclisis
+  (clitic-order        "se II I III (le+lo -> se lo)")
+  (enclisis            "imperative/infinitive/gerund + accent repair (dá+me+lo->dámelo)")
+  (verb-prep-government yes)     ; verbs select prep (protestar+contra, escapar+de)
+
+  ;; -- SACRED safety bar (shared with en/pt) -------------------------------
+  (negation-faithful   yes))     ; polarity never dropped/inverted; unplaceable -> FLAG
+'''
+
+
+if __name__ == "__main__":
+    import sys
+    voc_path = sys.argv[1] if len(sys.argv) > 1 else "vocabulary-es.el"
+    lp_path = sys.argv[2] if len(sys.argv) > 2 else "lang_profile_es.el"
+    total, nv, nn, na = emit_vocabulary(voc_path)
+    with open(lp_path, "w", encoding="utf-8") as fh:
+        fh.write(LANG_PROFILE)
+    print(f"wrote {voc_path}  ({total} entries: {len(_FUNCTION)} fn, {nv} verbs, {nn} nouns, {na} adjs)")
+    print(f"wrote {lp_path}")
+    print("lexicon:", M.lexicon_stats())

elp/tests/gen_parity_es.py

@@ -0,0 +1,100 @@
+# -*- coding: utf-8 -*-
+"""gen_parity_es.py — emit an El parity program that checks the .el Spanish
+morphology against the validated Python (UniMorph-backed) realizer.
+
+Python is the ORACLE. For every lemma in the held-out inventory we embed the
+Python-produced form, call the corresponding .el function, and the El program
+prints PASS/FAIL per category. Aggregation is done in bash (grep -c), so no
+El-side mutable counters are needed.
+
+Categories:
+  Vpres  verb present-ind-3sg      es_conjugate(v,present,third,singular)
+  Vpret  verb preterite-3sg        es_conjugate(v,past,third,singular)
+  Vpart  past participle           es_participle(v)
+  Npl    noun plural               es_pluralize(n)
+  Gheur  noun gender HEURISTIC     es_gender(n)                  [exposes the bug]
+  Aheur  def article via heuristic es_agree_article(n,true,sg)   [inherits the bug]
+  Avocab def article via REAL g    es_article_for_gender(realg,...) [the fix]
+  Ampl   adj masc-plural           es_inflect_adj(a,m,plural)
+  Afsg   adj fem-singular          es_inflect_adj(a,f,singular)
+  Ctr    contraction del/al        es_contract(prep, np)
+"""
+import morphology_es_full as M
+import realizer_es as R
+from gen_elp_es import _collect_from_specs, _CORE_VERBS, _CORE_NOUNS, _CORE_ADJS
+
+
+def _esc(s):
+    return str(s).replace('\\', '\\\\').replace('"', '\\"')
+
+
+def _check(cat, lemma, el_call, expected):
+    return (f'  es_check("{cat}", "{_esc(lemma)}", {el_call}, "{_esc(expected)}")')
+
+
+def main(out_path):
+    v_specs, n_specs, a_specs = _collect_from_specs()
+    verbs = sorted(set(_CORE_VERBS) | v_specs)
+    nouns = sorted(set(_CORE_NOUNS) | n_specs)
+    adjs = sorted(set(_CORE_ADJS) | a_specs)
+
+    lines = []
+    lines.append("// gen'd parity checks — Python oracle embedded, El functions called.")
+    lines.append("fn es_check(cat: String, lemma: String, got: String, exp: String) {")
+    lines.append('    if str_eq(got, exp) {')
+    lines.append('        println("PASS " + cat)')
+    lines.append('    } else {')
+    lines.append('        println("FAIL " + cat + " " + lemma + " got=" + got + " exp=" + exp)')
+    lines.append('    }')
+    lines.append("}")
+    lines.append("")
+    lines.append("fn es_parity() {")
+
+    # verbs
+    for v in verbs:
+        p0 = M.conjugate(v, "ind", "present", "third", "singular")[0]
+        p1 = M.conjugate(v, "ind", "preterite", "third", "singular")[0]
+        pp = M.participle(v)[0]
+        lines.append(_check("Vpres", v, f'es_conjugate("{_esc(v)}", "present", "third", "singular")', p0))
+        lines.append(_check("Vpret", v, f'es_conjugate("{_esc(v)}", "past", "third", "singular")', p1))
+        lines.append(_check("Vpart", v, f'es_participle("{_esc(v)}")', pp))
+
+    # nouns
+    for n in nouns:
+        pl = M.inflect_noun(n, "plural")[0]
+        g = M.noun_gender(n)                    # REAL lexicon gender
+        art = R._article(g, "singular", "def", n)  # oracle article from real gender
+        lines.append(_check("Npl", n, f'es_pluralize("{_esc(n)}")', pl))
+        lines.append(_check("Gheur", n, f'es_gender("{_esc(n)}")', g))
+        lines.append(_check("Aheur", n, f'es_agree_article("{_esc(n)}", "true", "singular")', art))
+        lines.append(_check("Avocab", n, f'es_article_for_gender("{_esc(g)}", "{_esc(n)}", "true", "singular")', art))
+
+    # adjectives
+    for a in adjs:
+        mpl = M.inflect_adj(a, "m", "plural")[0]
+        fsg = M.inflect_adj(a, "f", "singular")[0]
+        lines.append(_check("Ampl", a, f'es_inflect_adj("{_esc(a)}", "m", "plural")', mpl))
+        lines.append(_check("Afsg", a, f'es_inflect_adj("{_esc(a)}", "f", "singular")', fsg))
+
+    # contractions (mandatory)
+    ctr_cases = [("de", "el día"), ("a", "el hombre"), ("de", "el mundo"),
+                 ("a", "el país"), ("en", "el mar"), ("de", "el año"),
+                 ("a", "la casa"), ("de", "la ciudad")]
+    for prep, np in ctr_cases:
+        exp = R._contract(prep, np)
+        lines.append(_check("Ctr", prep + "+" + np, f'es_contract("{_esc(prep)}", "{_esc(np)}")', exp))
+
+    lines.append("}")
+    lines.append("")
+    lines.append("fn main() {")
+    lines.append("    es_parity()")
+    lines.append("}")
+
+    with open(out_path, "w", encoding="utf-8") as fh:
+        fh.write("\n".join(lines) + "\n")
+    print(f"wrote {out_path}  ({len(verbs)} verbs, {len(nouns)} nouns, {len(adjs)} adjs)")
+
+
+if __name__ == "__main__":
+    import sys
+    main(sys.argv[1] if len(sys.argv) > 1 else "parity_es_checks.el")