Grammalecte  Check-in [3c16ca9eaf]

        <<- -1>> " »|”"                                                                             && Guillemets typographiques fermants.

TEST: {{"}}Le grand homme.”                                                 ->> « |“
TEST: “Le grand homme.{{"}}                                                 ->> " »|”"


__<s>/typo(typo_guillemets_typographiques_simples_doubles_ouvrants)__
    (?:^|[ –—-])(['’‘]['’‘])(?=\w)  @@*
        <<- -1>> « |“                                                                               && Guillemets typographiques ouvrants.
__<s>/typo(typo_guillemets_typographiques_simples_doubles_fermants)__
    [\w.?!…,](['’]['’])(?![\w'’])  @@*
        <<- -1>> " »|”"                                                                             && Guillemets typographiques fermants.

TEST: {{''}}Ça{{”}} recommence.                                                 ->> « |“|||
TEST: Le {{''}}grand{{”}} homme.                                                ->> « |“|||
TEST: Le {{“}}grand{{''}} homme.                                                ->> ||| »|”
TEST: Le {{‘‘}}barbare{{’’}} dont il faut se défendre à tout prix               ->> « |“||| »|”


__<s>/typo(typo_guillemets_typographiques_simples_ouvrants)__
    (?:^|[ –—-])(['’])(?=\w)  @@*
        <<- -1>> “|‘|‹                                                                              && Guillemets typographiques ouvrants.
__<s>/typo(typo_guillemets_typographiques_simples_fermants)__
    [\w.?!](')(?:[   ]|$)  @@*

__[i]/ocr(ocr_le_la_les_regex)__
    [1[\]][easrnxiocuwàéè]
        <<- \0.endswith("e") ->> le                                                                 && Erreur de numérisation ?
        <<- __else__ and \0.endswith("a") ->> la                                                    && Erreur de numérisation ?
        <<- __else__ and \0.endswith("à") ->> la|là                                                 && Erreur de numérisation ?
        <<- __else__ ->> le|la                                                                      && Erreur de numérisation ?

TEST: __ocr__ avec {{1e}} chien du policier                                                 ->> le
TEST: __ocr__ il le jura sur {{1a}} tête de sa mère                                         ->> la
TEST: __ocr__ {{]à}}                                                                        ->> la|là
TEST: __ocr__ {{1c}} chat du voinsin est idiot                                              ->> le|la
TEST: __ocr__ oui, {{[e}} chien a faim                                                      ->> le


__[i]/conf(conf_1e_1a_1es)__
    [1[\]][ea]s?
        <<- \0.endswith("e") and (morph(word(1), ":(?:[NA].*:[me]:[si]|V)", ":G") or morph(word(-1), ">ne/")) ->> le       && Erreur de frappe ?
        <<- \0.endswith("a") and (morph(word(1), ":(?:[NA].*:[fe]:[si]|V)", ":G") or morph(word(-1), ">ne/")) ->> la       && Erreur de frappe ?
        <<- \0.endswith("es") and (morph(word(1), ":(?:[NA].*:[pi]|V)", ":G") or morph(word(-1), ">ne/")) ->> les          && Erreur de frappe ?

TEST: {{1e}} marginal                                           ->> le
TEST: {{1a}} venue des problèmes                                ->> la
TEST: {{1es}} enfants sont au lit                               ->> les
TEST: Je… ne {{1e}}… crois pas…                                 ->> le


__[i]/ocr(ocr_les)__
    [1[\]][ea]s
        <<- ->> les                                                                                 && Erreur de numérisation ?

TEST: __ocr__ {{1es}} jours clairs

    La Bruyère
    La Fayette
    La Fontaine
        <<- ~>> ␣
        <<- =>> define(\1, ":M2:e:i")

    cac  40
    Rio grande
        <<- ~>> ␣
        <<- =>> define(\1, ":N:m:i")

    France [2|3|4|5|0|O]
        <<- ~>> ␣
        <<- =>> define(\1, ":MP:e:i")

    Peugeot  ~^\d0\d\d?$
        <<- ~>> ␣
        <<- =>> define(\1, ":N:e:i")

    Mai 68
        <<- ~>> ␣

# avec / aven / arec
__ocr_avec__
    [arec|aven]
        <<- /ocr/ ->> avec                                                                          && Erreur de numérisation ?

TEST: __ocr__ Elle s’en alla {{arec}} eux sans un regard en arrière.


# avaient / avalent
__ocr_avaient__
    avalent
        <<- /ocr/ ->> avaient                                                                       && Erreur de numérisation ?

TEST: __ocr__ Ils {{avalent}} très faim.

!!!! Élisions & euphonie                                                                          !!
!!
!!

# élisions
__eleu_élisions_manquantes__
    [le|la|de]  ~^[aâeéèêiîoôuûyœæh].
        <<- /eleu/ space_after(\1, 1, 1) and not re.search("(?i)^(?:I(?:I|V|X|er|ᵉʳ|ʳᵉ|è?re))", \2) and morph(\2, ":", ":G|;é")
        -1:.2>> =\1[0:1]+"’"                                                && Élision de l’article devant un mot commençant par une voyelle.|http://fr.wikipedia.org/wiki/Élision

    si [il|ils]
        <<- /eleu/ space_after(\1, 1, 1) -1:.2>> s’                         && Il faut élider “si” et l’accoler au pronom.|http://fr.wikipedia.org/wiki/Élision

    que [il|ils|elle|elles|on|iel|iels]
        <<- /eleu/ space_after(\1, 1, 1) -1:.2>> qu’                        && Il faut élider “que” et l’accoler au pronom.|http://fr.wikipedia.org/wiki/Élision

TEST: {{l’}}hulotte                                                         ->> la
TEST: combien {{d’}}iourtes                                                 ->> de


# ce -> cet
__eleu_euphonie_cet__
    ce  ~^[aâeéèêiîoôuûyœæ]
        <<- /eleu/ not re.search("(?i)^(?:I(?:I|V|X|er|ᵉʳ))", \2) and morph(\2, ":[NA].*:[me]", ":G|;é")
        -1>> cet                                                                && Euphonie : “ce” devient “cet” devant un mot commençant par une voyelle.|https://fr.wikipedia.org/wiki/Euphonie

TEST: {{ce}} animal est dangereux
TEST: ce yacht


# Verbe 1ʳᵉ personne du singulier, interrogatif… xxxé-je
__eleu_é_je__
    /-je
        <<- /eleu/ morphVC(\1, "V1.*:1s") and \1.endswith("e-je") ->> =\1.replace("e-je", "é-je")+"|"+\1.replace("e-je", "è-je")
        && Euphonie. Pour les verbes finissant par “e” à l’interrogatif à la 1ʳᵉ personne du singulier, mettez un accent aigu ou grave sur le “e” final. Exemple : “pensé-je” (présent), à ne pas confondre avec “pensais-je” (imparfait).|https://fr.wikipedia.org/wiki/Euphonie

TEST: {{pense-je}}                                                                      ->> pensé-je|pensè-je
TEST: pensé-je
TEST: souhaitè-je


# ma, ta, sa / mon, ton, son
__eleu_euphonie_ma_ta_sa__
    [ma|ta]  ~^[aâeéèêiîoôuûyœæ].
        <<- /eleu/ morph(\2, ":[NA]", ":G|;é") and not re.search("(?i)^(?:I(?:I|V|X|i?[eè]?re|ʳᵉ))", \2)
        -1>> =\1[0:1]+"on"                                                      && Euphonie : lorsque le déterminant “\1” est suivi d’un nom ou d’un adjectif commençant par une voyelle, il est d’usage d’utiliser le pronom  “mon”, “ton” ou “son” pour respecter l’euphonie. Exemple : mon étoile (féminin).|https://fr.wikipedia.org/wiki/Euphonie

    sa  ~^[aâeéèêiîoôuûyœæ].
        <<- /eleu/ not \1.isupper() and morph(\2, ":[NA]", ":G|;é") and not re.search("(?i)^(?:I(?:I|V|X|i?[eè]?re|ʳᵉ))", \2) >>>
        <<- /eleu/ morph(\2, ":[123][sp]") -1>> =\1[0:1]+"on|ça"                && Euphonie : lorsque le déterminant “\1” est suivi d’un nom ou d’un adjectif commençant par une voyelle, il est d’usage d’utiliser le pronom  “mon”, “ton” ou “son” pour respecter l’euphonie. (À moins que vous ne confondiez “sa” et “ça”.) Exemple : son étoile (féminin), ça existe.|https://fr.wikipedia.org/wiki/Euphonie
        <<- /eleu/ __else__ -1>> =\1[0:1]+"on"                                  && Euphonie : lorsque le déterminant “\1” est suivi d’un nom ou d’un adjectif commençant par une voyelle, il est d’usage d’utiliser le pronom  “mon”, “ton” ou “son” pour respecter l’euphonie. Exemple : son étoile (féminin).|https://fr.wikipedia.org/wiki/Euphonie

TEST: {{ta}} aimée                                              ->> ton
TEST: {{ma}} obligée                                            ->> mon
TEST: {{sa}} œuvre                                              ->> son|ça
TEST: {{sa}} existence                                          ->> son

    in anima vili
    in cauda venenum
    in vino veritas
    sursum corda
    sic transit gloria mundi
        <<- ~>> ␣
        <<- =>> define(\1, ":LP")


__purge_locutions_incises__
    [<start>|,|(] [oui|non] [<end>|,|)]
    [<start>|,|(] ?oui¿ ou non [<end>|,|)]
    [<start>|,|(] et non l’ inverse [<end>|,|)]
    [<start>|,|(] fait remarquable [<end>|,|)]
    [<start>|,|(] entre autres ?choses¿ [<end>|,|)]
    [<start>|,|(] mieux encore [<end>|,|)]
    [<start>|,|(] n’ est-ce pas [<end>|)]
        <<- ~2:-2>> *


__purge_locutions_distance__
    à ?seulement¿ [*NUM|$:B:e:p|quelques|plusieurs] [nanomètres|millimètres|centimètres|décamètres|pas|mètres|kilomètres|verstes|lieues|UA|parsecs|années-lumière] [de|d’] [distance|ici]
    à ?seulement¿ [*NUM|$:B:e:p|quelques|plusieurs] [nanomètres|millimètres|centimètres|décamètres|pas|mètres|kilomètres|verstes|lieues|UA|parsecs|années-lumière] en [amont|aval]
    à ?seulement¿ [*NUM|$:B:e:p|quelques|plusieurs] [nanomètres|millimètres|centimètres|décamètres|pas|mètres|kilomètres|verstes|lieues|UA|parsecs|années-lumière] plus loin
    à ?seulement¿ [*NUM|$:B:e:p|quelques|plusieurs] [nanomètres|millimètres|centimètres|décamètres|pas|mètres|kilomètres|verstes|lieues|UA|parsecs|années-lumière] à la ronde

@@@@
@@@@
@@@@
@@@@
@@@@GRAPH: intergraphe12a|ig12a                                                                    _
@@@@
@@@@
@@@@
@@@@

__da_le_montre__
    le  montre  $:D

        <<- morph(\1, ":[123]p") or (\1 == "fait" and value(<1, "|on|")) ~2>> *


# tous / tout / toute / toutes
__purge_tout_tout_tous_toutes__
    tout                    [le|ce|cet|mon|ton|son]
    toute                   [la|cette|ma|ta|sa]
    [tous|toutes|tout·e·s]  [les|des|mes|tes|ses|ces|nos|vos|leurs]
        <<- ~1>> *

    /-on        [tous|toutes]
    /-nous      [tous|toutes]
    /-vous      [tous|toutes]
    /-ils       [tous|toutes]
    /-elles     [tous|toutes]
    /-iel       [tous|toutes|tout·e·s]
    /-iels      [tous|toutes|tout·e·s]
        <<- ~2>> *

    *WORD       [tous|toutes|tout·e·s]
        <<- morph(\1, ":[123]p") ~2>> *

    on  ?[ne|n’]¿  ?[le|la|l’|les|me|m’|te|t’|se|s’|nous|vous|lui|leur|y]¿  ?[le|la|l’|les|en|y|lui|leur]¿  *WORD  [tous|toutes|tout·e·s]
        <<- morph(\-2, ":[123]s") ~-1>> *

    [tous|toutes] , sans >exception ,
        <<- ~2:0>> *


@@@@
@@@@
@@@@
@@@@
@@@@GRAPH: intergraphe12b|ig12b                                                                    _
@@@@
@@@@
@@@@
@@@@


__fusions_enum_noms_communs__

    iels            [seuls|seules]
        <<- ~2>> *

    nous    [tous|toutes]   qui
    vous    [tous|toutes]   qui
    eux     tous            qui
    elles   toutes          qui
    iels    tout·e·s        qui
        <<- ~2>> *

TODO: comme


__purge_pronoms_après_sujet_verbe__
    [j’|je]     ?[ne|n’]¿   >avoir      moi-même

@@@@
@@@@
@@@@
@@@@
@@@@GRAPH: prégraphe_gv1|pg_gv1                                                                    _
@@@@
@@@@
@@@@
@@@@

__da_été2__
    >avoir été