Grammalecte  Diff

    *NUM : *NUM
        <<- space_after(\1, 0, 0) and space_after(\1, 0, 0) ~>> ␣

    *NUM  ~^h[0-9][0-9]$
        <<- space_after(\1, 0, 0) ~>> ␣

    cul et chemise
    mari et femme
    père et mère
    papa et maman
    frère et sœur
    cousin et cousine
        <<- ~>> ␣
        <<- =>> define(\1, ":LN:e:p")

TEST: mais nous avancions en terra incognita
TEST: elles sont cul et chemise
TEST: ils sont frère et sœur
TEST: iels étaient mari et femme


__fusions_noms_communs_séparés_slah__
    *WORD  /  *WORD
        <<- space_after(\1, 0, 0) and space_after(\2, 0, 0) and morph(\1, ":N") and morph(\-1, ":N") ~>> ␣
        <<- =>> define(\1, ":N:e:i")

    bas [>côté|coté|cotés]
        <<- /tu/ morph(<1 , ":D") ->> bas-côté|bas-côtés        && Il manque un trait d’union.

    [les|des|aux] beaux arts
        <<- /tu/ -2:3>> beaux-arts                              && Il manque un trait d’union.

    [blanc+s] >bec
        <<- /tu/ ->> blanc-bec|blancs-becs                      && S’il s’agit bien d’évoquer un homme sans expérience, mettez un trait d’union.|https://fr.wiktionary.org/wiki/blanc-bec

    bouche à [bouche|>oreille]
        <<- /tu/ morph(<1, ":D") ->> \1-\2-\3                   && Il manque les traits d’union.

    >centre >ville
        <<- /tu/ ->> centre-ville|centres-villes                && Il manque un trait d’union.

    [cesser|cessez] le feu

    [copié+ses|copier] / [coller|collé+ses]
    [copié-coller|copiée-coller|copiés-coller|copiées-coller]
    [copier-collé|copiée-collée|copiés-collés|copiées-collées]
        <<- /tu/ ->> copier-coller|copié-collé|copiée-collée|copiés-collés|copiées-collées
        && Copier-coller pour la verbe ou l’action, copié-collé (et ses variantes) pour ce qui est copié-collé.


    >cul de sac
        <<- /tu/ ->> \1-\2-\3                                   && Mettez des traits d’union.|https://fr.wiktionary.org/wiki/cul-de-sac

    déjà vu
        <<- /tu/ morph(<1, ":D.*:[me]") ->> \1-\2               && S’il s’agit d’un nom, mettez un trait d’union.|https://fr.wiktionary.org/wiki/d%C3%A9j%C3%A0-vu

    état major
    états majors
        <<- /tu/ ->> \1-\2                                      && Il manque un trait d’union.

    face [a|à] face
        <<- /tu/ morph(<1, ":D") ->> face-à-face                && Si vous employez cette locution comme un nom, mettez des traits d’union.|https://fr.wiktionary.org/wiki/face-%C3%A0-face

    [fier+s] [à|a] bras
        <<- /tu/ ->> \1-à-bras                                  && Il manque les traits d’union.|https://fr.wiktionary.org/wiki/fier-%C3%A0-bras

    gagne >pain
        <<- /tu/ not morph(<1, ":O[sv]") ->> gagne-pain         && Il manque un trait d’union.

    goutte [à|a] goutte
        <<- /tu/ morph(<1, ":D") ->> goutte-à-goutte            && S’il s’agit d’un nom, mettez des traits d’union.

    [grand+s] [>père|>mère]

    [nord|sud] est [<end>|,|)]
        <<- /tu/ ->> \1-est                                     && Il manque un trait d’union.

    outre mer
        <<- /tu/ ->> outre-mer                                  && Il manque un trait d’union.

    pas de porte
        <<- /tu/ morph(<1, ":D") ->> pas-de-porte               && Il manque un trait d’union.|https://fr.wiktionary.org/wiki/pas-de-porte

    >pied [à|a] terre
        <<- /tu/ morph(<1, ":D") ->> \1-à-terre                 && Il manque les traits d’union.

    [plate|plates] >forme
        <<- /tu/ ->> plate-forme|plates-formes|plateforme|plateformes       && Il manque un trait d’union. Vous pouvez aussi souder les deux mots.

    presque [>île|>ile]
        <<- /tu/ ->> presqu’\2                                  && Une presqu’île, en un seul mot.|https://fr.wiktionary.org/wiki/presqu%E2%80%99%C3%AEle

    [prêt+s] [à|a] porter
        <<- /tu/ morph(<1, ":D") ->> \1-à-porter                && Il manque les traits d’union.

    quelques [un|uns|une|unes]
        <<- /tu/ \2.endswith("s") or \2.endswith("S") ->> quelques-\2       && Il manque un trait d’union.
        <<- /tu/ __else__ ->> quelques-\2s                                  && Il manque un trait d’union.

    [plus|moins] [value|values]
        <<- /tu/ ->> \1-\2                                      && Il manque un trait d’union.|https://fr.wiktionary.org/wiki/plus-value

    plu [valu+ses]
        <<- /tu/ morph(<1, ":D") ->> plus-value|plus-values     && Il manque un trait d’union.|https://fr.wiktionary.org/wiki/plus-value

    >pot de vin
        <<- /tu/ ->> \1-\2-\3                                   && Il manque les traits d’union.

    >prêt [bail+s]
        <<- /tu/ ->> prêt-bail|prêts-bails                      && Il manque un trait d’union.

    >prêt [>relai|relais]
        <<- /tu/ ->> prêt-relai|prêt-relais|prêts-relais        && Il manque un trait d’union.

    quelques [un|uns|une|unes]
        <<- /tu/ \2.endswith("s") or \2.endswith("S") ->> quelques-\2       && Il manque un trait d’union.
        <<- /tu/ __else__ ->> quelques-\2s                                  && Il manque un trait d’union.

    ras le bol
    ras-le bol
    ras le-bol
        <<- /tu/ morph(<1, ":D") ->> ras-le-bol                 && Il manque des traits d’union.

    rendez vous
        <<- /tu/ morph(<1, ":[DR]|<start>|>,") ->> rendez-vous  && Il manque un trait d’union.

TEST: mon {{arrière petit fils}}
TEST: un {{arrière petit neveu}}
TEST: ton {{arrière petite nièce}}
TEST: {{au jour d’hui}}
TEST: je déteste le {{basket ball}}
TEST: sur le {{bas côté}}
TEST: les {{beaux arts}}
TEST: marre de ces {{blancs becs}} qui croient tout savoir
TEST: {{le}} {{bouche à oreille}}
TEST: un {{cessez le feu}}
TEST: {{chef lieu}} de ce canton
TEST: un {{chassé croisé}}
TEST: ne vois-tu pas que c’est un {{chef d’œuvre}} ?
TEST: ils sont allés au {{centre ville}}.
TEST: un {{château fort}} n’est pas une demeure confortable
TEST: des {{châteaux forts}}
TEST: un {{coffre fort}}
TEST: des {{coffres forts}}
TEST: {{copié/coller}}
TEST: encore un {{cul de sac}}
TEST: Le {{moto club}} était sur le point de faire faillite.
TEST: J’ai beaucoup de {{déjà vu}}.
TEST: L’{{état major}} n’a pas encore tranché la question.
TEST: Le {{face à face}} entre les forces de l’ordre et les manifestants se poursuit devant l’hôtel de ville à Bordeaux depuis environ 1h30.
TEST: ces {{fiers à bras}} vont encore se prendre une raclée mémorable
TEST: {{gagne pain}} de merde
TEST: perfusé par des {{goutte à goutte}}
TEST: mes deux {{grands pères}} sont décédés
TEST: un crime de {{lèse majesté}}
TEST: pour {{la}} {{n ième}} fois
TEST: les {{n uplets}}
TEST: elles sont allées au {{sud ouest}}
TEST: {{nord est}}
TEST: ils sont partis {{outre mer}}
TEST: La papesse du {{prêt à porter}} viendra demain.
TEST: il loge dans un {{pied à terre}} misérable
TEST: sur cette {{plate forme}}, rien ne fonctionne
TEST: une {{presque île}}
TEST: {{Quelques unes}} sont très habiles.
TEST: sur son {{pas de porte}}
TEST: {{quelques un}} seront blâmés, les autres pardonnés
TEST: une {{plus value}}                                                        ->> plus-value
TEST: combien de {{plu value}}
TEST: Un énorme {{plus value}}.
TEST: Versez des {{pots de vin}} s’il le faut.
TEST: ils ont fait un {{prêt relai}}
TEST: un {{prêt bail}}
TEST: je connais le {{ras le bol}}
TEST: {{Quelques unes}} sont très habiles.
TEST: {{quelques un}} seront blâmés, les autres pardonnés
TEST: en avoir ras le bol de ces conneries
TEST: des {{rendez vous}}                               ->> rendez-vous
TEST: un Mars par {{rendez vous}}
TEST: Habiter au {{rez de chaussée}}, quelle horreur.
TEST: J’en ai ma claque de ces {{ronds de cuir}}
TEST: C’est de la {{science fiction}}.
TEST: des {{stock options}}

__tu_anciennes_graphies__
    grand’angle
    grand’chemin
    grand’chose
    grand’croix
    grand’duc
    grand’duché
    grand-erre
    grand’guignolesque
    grand’maman
    grand’messe
    grand’mère
    grand’oncle
    grand’papa
    grand’peine

    [<start>|,|(|puisque|lorsque|quand|quoique|combien|qui|pourquoi|comment|où]  vous  ?[ne|n’]¿  [le|la|l’|les]                 [lui|leur|en|y]      $:V¬:2p
    [<start>|,|(|puisque|lorsque|quand|quoique|combien|qui|pourquoi|comment|où]  vous  ?[ne|n’]¿  [lui|leur]                     en                   $:V¬:2p
        <<- /conj/ --1>> =suggVerb(\-1, ":2p")                                                      && Conjugaison erronée. Accord avec “vous”. Le verbe devrait être à la 2ᵉ personne du pluriel.

    [<start>|,|(|puisque|lorsque|quand|quoique|combien|pourquoi|comment|où]  vous  [le|la|l’|les|en|y]   @:V[123]..t_._[e_][a_]¬:(?:2p|Ov|Y|P)
        <<- /conj/ --1>> =suggVerb(\-1, ":2p")                                                      && Conjugaison possiblement erronée. Accord avec “vous”. Le verbe devrait être à la 2ᵉ personne du pluriel.

    [<start>|,|(|/_start_]  vous  aller  ?[$:W|donc]¿  ?$:Ov¿  ?$:Ov¿  $:Y
    [<start>|,|(|/_start_]  vous  aller  [<end>|,|)]
        <<- /conj/ -3>> allez                                                                       && Conjugaison erronée. Accord avec “vous”. Le verbe devrait être à la 2ᵉ personne du pluriel.

TEST: Vous {{arrivais}} trop tard.
TEST: vous ne l’{{avait}} pas vu.
TEST: je crois, vous m’{{avais}} trompé…
TEST: vous nous {{refuser}} le pardon.
TEST: Vous {{travaillons}}.
TEST: vous {{donné}} du bonheur
TEST: vous {{avançons}}
TEST: Vous ne la {{voulait}} pas
TEST: Vous ne {{mangeait}} que des légumes ?
TEST: vous l’{{accomplissait}}
TEST: vous n’{{aller}} pas assez vite
TEST: vous {{aller}} me fâcher
TEST: vous {{aller}} la lui donner
TEST: vous {{aller}} donc être interdit bancaire et vous vous débrouillerez avec les huissiers
TEST: j’irai là où vous {{aller}}
TEST: vous la rendait avec bienveillance
TEST: vous verrez, ça va vous aller comme un gant


## 3pl
__conj_ils__
    ils  @:V¬:(?:3p|Ov)
        <<- /conj/ not (morph(\2, ":[PQ]") and morph(<1, ":V0.*:3p"))
        -2>> =suggVerb(\2, ":3p")                                                                   && Conjugaison erronée. Accord avec “\1”. Le verbe devrait être à la 3ᵉ personne du pluriel.

TEST: Emblème des SA.
TEST: chef d’état-major de la SA.
TEST: À partir de 1934, et après l’élimination de ses principaux dirigeants durant la nuit des Longs Couteaux, la SA ne joue plus aucun rôle politique.
TEST: Adolf Hitler a créé les SA à Munich le 8 août 1921 en réunissant d’anciens combattants, des officiers mécontents et des membres des corps francs
TEST: En 1933, après l’élection du NSDAP, les SA se voyaient en concurrence avec l’armée régulière (Reichswehr)
TEST: les SA devenant de plus en plus extrêmistes


# blanle-bas de combat
__conf_branle_bas_de_combat__
    [branle+s] [ba|bas|bat+s|>bât|>ban|>banc|>bande] [de|d’] >combat
    [branle+s] [ba|bas|bat+s|>bât|>ban|>banc|>bande] [de|d’] [con|+s] [ba|bas|bat+s|>bât]
        <<- /conf/ ->> branle-bas de combat                         && Écrivez “branle-bas de combat”.|https://fr.wiktionary.org/wiki/branle-bas_de_combat

TEST: le branle-bas de combat commençait, mais trop tard
TEST: {{branle bat de con bat}}


# car / quart
__conf_quart_car__
    [un|du|ce|quel|mon|ton|son|notre|votre|leur] car d’ heure
        <<- /conf/ not after("^ +en +heure") -2>> quart             && Confusion. Une heure est composée de quatre “quarts d’heure”.

    trois >car d’ heure

    >tarte à la crème ?[catalane|fraiche|fraîche|patissière]¿
    taux [de|d’] [abstention|absorption|alcool|alphabétisation|change|cholestérol|cholesterol|endettement|fécondité|glycémie|inflation|intérêt|imposition|natalité|occupation|ouverture|œstrogène|participation|testostérone|TVA|urbanisation|urée|usure]
    taux [de|d’] mortalité ?[infantile|néonatale]¿
    >témoin à charge
    tenants et aboutissants
    >ténor du barreau
    >tenue [de|d’] rechange
    >terrain [de|d’] [chasse|entente]
    >terrain [de|d’] [chasse|entente|golf]
    >tête à claques
    >tête d’ enterrement
    >tête [de|d’] [linotte|déterré+ses|mule|pont]
    >terrain à découvert
    >tigre à dents [de|d’] sabre
    >tigre [de|d’] papier ?mâché¿
    >tir à boulets rouges

    ils     *WORD  eux aussi
    elles   *WORD  elles aussi
        <<- morph(\2, ":3p") ~3:0>> *


__purge_après_être__
    [>être|>devenir|>rester] [bon|meilleur] marché
    [>être|>devenir|>rester] cousin et cousine
    [>être|>devenir|>rester] de passage
    [>être|>devenir|>rester] frère et sœur
    [>être|>devenir|>rester] mari et femme
    [>être|>devenir|>rester] mission impossible
    [>être|>devenir|>rester] monnaie courante
    [>être|>devenir|>rester] papa et maman
    [>être|>devenir|>rester] partie [intégrante|prenante]
    [>être|>devenir|>rester] peine perdue
    [>être|>devenir|>rester] pieds et poings liés
    [>être|>devenir|>rester] pieds nus
    [>être|>devenir|>rester] père et mère
        <<- ~2:0>> ␣
        <<- =>> define(\2, ":LV")

    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] [bon|meilleur] marché
    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] cousin et cousine
    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] de passage
    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] frère et sœur
    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] mari et femme
    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] mission impossible
    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] monnaie courante
    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] papa et maman
    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] partie [intégrante|prenante]
    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] peine perdue
    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] pieds et poings liés
    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] pieds nus
    [>être|>devenir|>rester] [pas|jamais|plus|guère|point] père et mère
        <<- ~2>> *
        <<- ~3:0>> ␣
        <<- =>> define(\3, ":LV")

    [>être|>devenir|>rester] ?[pas|jamais|plus|guère|point]¿ avant tout
    [>être|>devenir|>rester] ?[pas|jamais|plus|guère|point]¿ du moins
    [>être|>devenir|>rester] ?[pas|jamais|plus|guère|point]¿ en partie

    /_VCint_ monnaie courante
    /_VCint_ papa et maman
    /_VCint_ partie [intégrante|prenante]
    /_VCint_ peine perdue
    /_VCint_ pieds et poings liés
    /_VCint_ pieds nus
    /_VCint_ père et mère
        <<- morphVC(\1, ">(?:être|devenir|rester)") ~2:0>> ␣
        <<- morphVC(\1, ">(?:être|devenir|rester)/") ~2:0>> ␣
        <<- __also__ =>> define(\2, ":LV")

    /_VCint_ [pas|jamais|plus|guère|point] [bon|meilleur] marché
    /_VCint_ [pas|jamais|plus|guère|point] cousin et cousine
    /_VCint_ [pas|jamais|plus|guère|point] de passage
    /_VCint_ [pas|jamais|plus|guère|point] frère et sœur
    /_VCint_ [pas|jamais|plus|guère|point] mari et femme
    /_VCint_ [pas|jamais|plus|guère|point] mission impossible
    /_VCint_ [pas|jamais|plus|guère|point] monnaie courante
    /_VCint_ [pas|jamais|plus|guère|point] papa et maman
    /_VCint_ [pas|jamais|plus|guère|point] partie [intégrante|prenante]
    /_VCint_ [pas|jamais|plus|guère|point] peine perdue
    /_VCint_ [pas|jamais|plus|guère|point] pieds et poings liés
    /_VCint_ [pas|jamais|plus|guère|point] pieds nus
    /_VCint_ [pas|jamais|plus|guère|point] père et mère
        <<- morphVC(\1, ">(?:être|devenir|rester)") ~2>> *
        <<- morphVC(\1, ">(?:être|devenir|rester)/") ~2>> *
        <<- __also__ ~3:0>> ␣
        <<- __also__ =>> define(\3, ":LV")

    /_VCint_ ?[pas|jamais|plus|guère|point]¿ avant tout
    /_VCint_ ?[pas|jamais|plus|guère|point]¿ du moins
    /_VCint_ ?[pas|jamais|plus|guère|point]¿ en partie
    /_VCint_ ?[pas|jamais|plus|guère|point]¿ somme toute
    /_VCint_ ?[pas|jamais|plus|guère|point]¿ sous peu
    /_VCint_ ?[pas|jamais|plus|guère|point]¿ [tous|toutes] [deux|trois]
    /_VCint_ ?[pas|jamais|plus|guère|point]¿ un jour
    /_VCint_ ?[pas|jamais|plus|guère|point]¿ à jamais
    /_VCint_ [pas|jamais|plus|guère|point]
        <<- morphVC(\1, ">(?:être|devenir|rester)") ~2:0>> *
        <<- morphVC(\1, ">(?:être|devenir|rester)/") ~2:0>> *

    [>être|>devenir|>rester] ?[pas|jamais|plus|guère|point]¿ beaucoup
    [>être|>devenir|>rester] ?[pas|jamais|plus|guère|point]¿ bien [entendu|sûr]
    [>être|>devenir|>rester] ?[pas|jamais|plus|guère|point]¿ dans [l’|leur|son] ensemble
    [>être|>devenir|>rester] ?[pas|jamais|plus|guère|point]¿ [à|en] ce moment  ?précis¿
    [>être|>devenir|>rester] ?[pas|jamais|plus|guère|point]¿ [à|en] cet instant ?précis¿
    [>être|>devenir|>rester] ?[pas|jamais|plus|guère|point]¿ sans peine

    à la dernière [minute|seconde]  @¬:A.*:[fe]:[si]
    à la dernière [minute|seconde]  [<end>|,|)]
        <<- ~1:-2>> *

    à la longue             @:¬:N.*:[fe]:[si]
    à la longue             [<end>|,|)]
    à la [dérive|mode]      @:¬:A.*:[fe]:[si]
    à la [dérive|mode]      [<end>|,|)]
    à la [base|dérive|mode] @:¬:A.*:[fe]:[si]
    à la [base|dérive|mode] [<end>|,|)]
    à l’ [avance|époque]    @:¬:A.*:[fe]:[si]
    à l’ [avance|époque]    [<end>|,|)]
    à l’ identique          @:¬:N.*:[si]
    à l’ identique          [<end>|,|)]
        <<- ~1:-2>> *

    à répétition  @¬:A.*:[fe]:[si]

TEST: ceux de modeste condition n’ont pas semblable privilège
TEST: peut-être qu’ailleurs il est des pucelles ou des demoiselles pour porter ce nom.
TEST: la qualité desdits malheureux
TEST: ç’a été dur.
TEST: dût ma vanité en souffrir, je viendrai quoi qu’il arrive
TEST: certaines régions sont un poil plus compliquées
TEST: Tout est bien qui finit bien.
TEST: on est tous à la base basé sur quelque chose


@@@@
@@@@
@@@@
@@@@
@@@@END_GRAPH                                                                                      _

__gn_adverbe_ensemble__
    ensembles
        <<- /gn/ morph(<1, ":V.*:[123]|>(?:tou(?:te|)s|pas|rien|guère|jamais|toujours|souvent)/", ":[DRB]")
        ->> ensemble                                                && S’il s’agit bien de l’adverbe “ensemble”, il est invariable.|https://fr.wiktionary.org/wiki/ensemble

TEST: Elles viendront {{ensembles}}.


# haut
__gn_placer_haut__
    [>placer|>mettre] $:D $:N haut
        <<- !-1>>

    [>placer|>mettre] $:D $:N [haut+ses]
        <<- /gn/ --1>> haut                                         && Placer quelque-chose (très) haut : “haut” étant ici un adverbe, il est invariable.

TEST: il place la barre très {{haute}}
TEST: elle met la barre très haut


# juste
__gn_adverbe_juste__
    justes
        <<- /gn/ \1.islower() and morph(<1, ":V", ":[DA]") and not morph(>1, ":[NA].*:[pi]")
            and not (morph(<1, ">(?:être|sembler|devenir|rester|demeurer|redevenir|para[îi]tre|trouver)/.*:[123]p") and morph(>1, ":G|<end>|>,/"))
        ->> juste                                                   && Si “juste” est un adverbe, il est invariable.