Grammalecte  Check-in [e1a58f3564]

__da_préverbes_verbes__
    [ne|n’]  ?[le|la|l’|les|nous|vous|lui|leur]¿  @:¬:[OX]
    [ne|n’]  [nous|vous]     [le|la|l’|les|en]    @:¬:[OX]
    [ne|n’]  [le|la|l’|les]  [lui|leur|en]        @:¬:[OX]
    [ne|n’]  [lui|leur]      en                   @:¬:[OX]
    n’       ?[en|y]¿  @:¬:[OX]
        <<- =>> select(\-1, ":V")
        <<- /-1>> neg

    [me|m’|te]  ?[le|la|l’|les|en|y]¿  @:¬:[OX]
        <<- =>> select(\-1, ":V")

    [se|s’]  ?[le|la|l’|les|en|y]¿  @:¬:[OX]
        <<- =>> select(\-1, ":[ISKQYP]")


    c’  ?[en|y]¿  @:¬:[OX]
        <<- =>> select(\-1, ":V")

    t’  [le|la|l’|les|en|y]  @:(?:[123][sp]|P|Y)¬:X|>rien/
        <<- =>> select(\3, ":(?:[123][sp]|P|Y)")

    t’  @:¬:X|>(?:rien|ie?ls?|elles?|on)/
        <<- =>> select(\2, ":(?:[123][sp]|P|Y)")

    y  @:¬:[OX]
        <<- =>> select(\2, ":(?:[123][sp]|P|Y)")

    [je|j’|il|ils|on]  ?[ne|n’]¿   ?[le|la|l’|les|en|me|m’|te|t’|se|s’|nous|vous|lui|leur|y]¿   @:¬:[OX]
    [je|j’|il|ils|on]  ?[ne|n’]¿   [me|m’|te|t’|se|s’|nous|vous]   [le|la|l’|les|en|y]          @:¬:[OX]
    [je|j’|il|ils|on]  ?[ne|n’]¿   [le|la|l’|les]                  [lui|leur|en|y]              @:¬:[OX]
    [je|j’|il|ils|on]  ?[ne|n’]¿   [lui|leur|y]                    en                           @:¬:[OX]
        <<- =>> select(\-1, ":[ISKP]")

    [elle|elles|iel|iels]  ?[ne|n’]¿   ?[le|la|l’|les|en|me|m’|te|t’|se|s’|nous|vous|lui|leur|y]¿   @:¬:[OX]
    [elle|elles|iel|iels]  ?[ne|n’]¿   [me|m’|te|t’|se|s’|nous|vous]   [le|la|l’|les|en|y]          @:¬:[OX]
    [elle|elles|iel|iels]  ?[ne|n’]¿   [le|la|l’|les]                  [lui|leur|en|y]              @:¬:[OX]
    [elle|elles|iel|iels]  ?[ne|n’]¿   [lui|leur|y]                    en                           @:¬:[OX]
        <<- not morph(<1, ":R") =>> select(\-1, ":[ISKP]")

    tu  ?[ne|n’]¿   ?[le|la|l’|les|en|me|m’|te|t’|se|s’|nous|vous|lui|leur|y]¿  @:¬:[OX]
    tu  ?[ne|n’]¿   [me|m’|te|t’|se|s’|nous|vous]   [le|la|l’|les|en|y]         @:¬:[OX]
    tu  ?[ne|n’]¿   [le|la|l’|les]                  [lui|leur|en|y]             @:¬:[OX]
    tu  ?[ne|n’]¿   [lui|leur|y]                    en                          @:¬:[OX]
        <<- not morph(<1, ":V0") =>> select(\-1, ":[ISKP]")

    lui  [la|le|l’|les]  @:(?:[123][sp]|P|Y)¬:W
        <<- not morph(<1, ":R") =>> select(\3, ":(?:[123][sp]|P|Y)")

    [nous|vous]     [le|la|l’|les|en]  @:¬:[OXW]
    lui             en                 @:¬:[OXW]
        <<- not morph(<1, ":R") =>> select(\3, ":(?:[123][sp]|P|Y)")

    [<start>|,|(]  cela  [le|la|l’|les]  [lui|leur|en|y]         @:(?:[123]s|P)
    [<start>|,|(]  cela  [lui|leur|y]    en                      @:(?:[123]s|P)
    [<start>|,|(]  cela  @:(?:[123]s|P)
        <<- =>> exclude(\2, ":V")

    dans
        <<- not morph(<1, ":D.*:p|>[a-z]+ième/") =>> select(\1, ":R")

    [de|d’] [me|m’|te|t’|se|s’|nous|vous|leur|moi|toi|soi|lui|elle|iel|eux|elles|iels]
    [de|d’] @:[MY]
    [de|d’] [un|une|le|la|l’|ce|cet|cette|ma|ta|sa|mon|notre|votre|leur|mes|tes|ses|nos|vos|leurs|quelque|quelques|plusieurs|certains|certaines]
        <<- =>> select(\1, ":R")

    face à
        <<- not morph(<1, ":(?:D|A.*:[fe]:[si])") =>> exclude(\1, ":N")

    mais
        <<- not value(<1, "|les|ces|des|mes|tes|ses|nos|vos|leurs|quelques|") =>> exclude(\1, ":N")

    [de|d’]  ?[la|l’|leur]¿  @:¬:[YD]
        <<- not value(<1, "|semblant|") =>> exclude(\-1, ":V")

    du   @:[NA].*:[me]:[si]¬:[GY]
        <<- =>> select(\2, ":[NA]")

    aucun  @:[NA].*:[me]:s¬:G
        <<- =>> select(\1, ":D") and select(\2, ":N")

    certains   @:[NA].*:[me]:p¬:(?:G|3p|V0)
    certaines  @:[NA].*:[fe]:p¬:(?:G|3p|V0)
        <<- =>> select(\1, ":D") and select(\2, ":[NA]")

    d’ [un|une]  *WORD
        <<- =>> exclude(\3, ":V")

    l’ [un|une]  *WORD
        <<- not value(\3, "|plus|") =>> select(\3, ":[123][sp]")

    par  *WORD
        <<- =>> exclude(\2, ":[123][sp]")

    plein  [de|d’]  @:[AN]
        <<- not morph(<1, ":(?:D.*:m|V[0-3]e)") =>> =define(\1, ":G")

    plusieurs  @:[NA].*:p¬:(?:G|3p|V0)
        <<- =>> select(\1, ":D") and select(\2, ":[NA]")

    source [de|d’]
        <<- morph(<1, ":V[0-3]e") =>> define(\1, ":ÉV")

    très  *WORD
        <<- =>> exclude(\2, ":[123][sp]")

        <<- =>> define(\1, ":T")
        <<- ~1>> *

    [la|cette|the]  ~^[A-ZÀÂÉÈÊÎÔ].  ?~^[A-ZÀÂÉÈÊÎÔ].¿  ?~^[A-ZÀÂÉÈÊÎÔ].¿  [Administration|Area|Army|Assocation|Avenue|Chamber|Church|City|Community|Court|Company|Corporation|Cup|Enterprise|Foundation|Fraternity|Gallery|Highway|House|Initiative|League|Library|Mansion|Nation|Navy|Organization|Reserve|Road|River|Sea|Society|Station|Sorority|Tavern|Tower|University|Valley]
        <<- ~2:0>> ␣
        <<- =>> define(\2, ":MP:f:s")

    [le|au|du|ce|the]  ~^[A-ZÀÂÉÈÊÎÔ].  ?~^[A-ZÀÂÉÈÊÎÔ].¿  ?~^[A-ZÀÂÉÈÊÎÔ].¿  [Act|Building|Bureau|Casino|Castle|Center|Challenge|Championship|Chronicle|Club|College|Comity|Consortium|Cottage|Covent|Day|Desert|Forum|Hall|Garden|Hospital|Hostel|Institute|Magazine|Manor|Memorial|Monastery|Mount|Museum|News|Newspaper|Ocean|Office|Opera|Park|Party|Palace|Post|Restaurant|State|Theatre|Tournament]
        <<- ~2:0>> ␣
        <<- =>> define(\2, ":MP:m:s")

    ~^[A-ZÀÂÉÈÊÎÔ]. Airways
        <<- ~>> ␣
        <<- =>> define(\2, ":MP:e:i")

    [comme|que|qu’|lorsque|lorsqu’|puisque|puisqu’|quand|pourquoi|qui|quoi]  ?[ne|n’]¿  ?[se|s’]¿  (*WORD)  ?à¿  [le|la|l’|les]  $:Y  $:M
        <<- morph(\1, ":V") !-2>>

    soit pour soit contre
        <<- !3>>

    y [a|avait|eut|aura|aurait|eût] ?@:[WX]¿ faute
        <<- !-1>>

TEST: New York {{étaient}} {{devenue}} la plaque tournante de tous les trafics.
TEST: de Bordeaux ou de n’importe où
TEST: il n’y a pas faute.
TEST: une séparation hommes/femmes

TEST: voyager par monts et par vaux.
TEST: {{pare mont est par veau}}


# pause /pose
__conf_pause_pose__
    >pose [café|carrière|>cigarette|>clope|crédit|déjeuner|détente|dîner|gourmande|pipi|repas|thé]
    >pose du [matin|soir]
    >pose de midi
    >pose de l’ après-midi
        <<- /conf/ -1>> =\1.replace("o", "au").replace("O", "AU")           && Confusion probable. Une pose consiste à poser quelque chose, tandis qu’une pause est un laps de temps de repos.

    >pause [de|du|des] [>câble|>carrelage|>dallage|>lino|>linoléum|>marbre|>panneau|>papier|>parquet|>prélart|>revêtement|>stérilet|tapis|>tapisserie|>vernis|>vitrage]
    >pause des [ardoises|agrafes|bollards|briques|câbles|carreaux|carrelages|dalles|fenêtres|panneaux|parquets|pavés|plaques|plinthes|tapis|tapisseries|tuiles|vitres|vitrages]
    >pause de la [charpente|couronne|dalle|fenêtre|fibre|moquette|prothèse|tapisserie|toiture|vitre]
    >pause de la [première|1ʳᵉ|1re|1ère] [brique|couche|pierre]
        <<- /conf/ -1>> =\1.replace("au", "o").replace("AU", "O")           && Confusion probable. Une pose consiste à poser quelque chose, tandis qu’une pause est un laps de temps de repos.

TEST: Nous assistons à la {{pause}} de la première brique.
TEST: c’est la {{pose}} du matin.
TEST: Faire une {{pose}} café.
TEST: Faire des {{poses}} café.

    du haut en bas
    du même [acabit|coup|ordre|tonneau]
    du moins ?,¿ pas
    du [nord|sud] au [nord|sud]
    du tac au tac
    du tout au tout
    eh bien
    en [aparté|apparence|arrière|avance|avant|catimini|cachette|ceci|cela|clair|commun|conséquence|continu|contrebas|contrepartie|dedans|définitive|détail|direct|distanciel|douce|effet|émoi|filigrane|général|goguette|hâte|loucedé|majorité|moyenne|outre|pâmoison|parallèle|partie|particulier|permanence|personne|pratique|présentiel|prime|privé|principe|priorité|public|retour|revanche|rien|rogne|route|secret|silence|somme|suspens|tapinois|théorie|trompe-l’œil|vain|vérité]
    en réalité ?[augmentée|virtuelle]¿
    en âge [de|d’] procréer
    en aucun cas
    en aucune [façon|manière]
    en ?[assez|si|très|trop]¿ bas âge
    en ?[assez|si|très|trop]¿ bon état ?général¿
    en ?[assez|si|très|trop]¿ bon état [de|d’] [fonctionnement|marche]

    quoi qu’ il [arrive|arrivât|advienne|advînt]
    quoi qu’ il soit [arrivé|advenu]
    quoi qu’ il en [coûte|coûtât|coute|coutât]
    ric et rac
    rien [que|qu’] d’ y penser
    sauf >erreur [de|d’] [ma|ta|sa|notre|votre|leur] part
    sans ?grand¿ succès
    sans [broncher|déconner|réagir|tarder]
    sans [ambages|arrêt|cesse|conteste|doute|encombre|encombres|équivalent|fin|relâche|répit|trêve|vergogne]
    sans [grande|grosse] difficulté ?[apparente|aucune|financière|majeure|particulière]¿
    sans aucun doute
    sans autre forme [de|d’] procès
    sans commune mesure
    sans contredit
    sans coup férir

    [plus|moins|aussi] $:W que prévu
        <<- ~>> *

    plus que tout autre @¬:[AQ].*:m:[si]
        <<- ~1:4>> *

    [plus|moins|aussi]  @:[AQW]¬:G   que [les|nous|vous] autres
    [plus|moins|aussi]  @:[AQW]¬:G   que l’ autre
    [plus|aussi]        @:[AQW]      les [uns|unes] que les autres
        <<- ~3:0>> *

    pour  autant  [que|qu’]  [je|il|elle|on]  le  sache
    pour  autant  [que|qu’]  tu               le  saches
    pour  autant  [que|qu’]  nous             le  sachions
    pour  autant  [que|qu’]  vous             le  sachiez
    pour  autant  [que|qu’]  [ils|elles|iels]      le  sachent

    >château [de|d’] cartes
    >château d’ eau
    >chauffeur [de|d’] bus
    >chef [de|d’] [cabinet|file|gare|secteur]
    >chef d’ [état-major|entreprise]
    >chef d’ orchestre ?[moderne|symphonique]¿
    >chemin [de|d’] [croix|fer|traverse]
    >chemin à parcourir
    >chemise à jabot
    >chemise [de|d’] nuit
    >chemise sans >manche
    >chèque en blanc
    >chèque sans provision
    >cheval [de|d’] [bataille|Troie]
    >chien [de|d’] [garde|guerre]

    >entrée [de|d’] service
    >entretien d’ embauche
    >enquête à charge
    >épée à deux mains
    >épingle à cravate
    >épreuve [de|d’] force
    >erreur [de|d’] [calcul|jeunesse|jugement|positionnement]
    >erreur d’ [appréciation|interprétation|orthographe]
    >escalier [de|d’] secours
    >escroquerie à l’ assurance
    >espérance [de|d’] vie
    >espérance [de|d’] vie en bonne santé
    >état [de|d’] [âme|conservation|esprit|fait|service|urgence]
    >état d’ extrême urgence
    >état [de|d’] l’ art

    >file d’ attente
    >fille à [papa|maman|>soldat]
    >fille au pair
    >film X
    fils à [papa|maman]
    fils [de|d’] pute
    >figure de proue
    >fin [de] non-recevoir
    >fleuve à sec
    >flocon [de|d’] neige ?électronique¿
    >foire d’ >empoigne
    fonds d’ investissement
    fonds [de|d’] pension
    >fontaine à eau
    >fontaine [de|d’] jouvence

TEST: il en faut trois minimum, cinq maximum
TEST: il vit dans un vingt-quatre mètre carré.
TEST: Cent quarante-neuvième épisode


__gn_nombre_chiffres_1m__
    [0|1|01]  @:[NAQ].*:p¬*
        <<- /gn/ space_after(\1, 1, 1) and not value(\2, "|Rois|Corinthiens|Thessaloniciens|") and not (value(<1, "|à|") and meta(<2, "NUM"))
        -2>> =suggSing(\2)                                                                  && Accord de nombre erroné avec « \1 » : « \2 » devrait être au singulier.

    *NUM  *WORD
        <<- /gn/ space_after(\1, 1, 1) and not value(<1, "|/|") and not re.search("^0*[01](?:[,.][0-9]+|)$", \1) and morph(\2, ":[NA].*:s", "*") and not morph(<1, ":(?:N|D.*:s)")
            and not value(\2, "|maximum|minimum|multiplié|divisé|janvier|février|mars|avril|mai|juin|juillet|août|aout|septembre|octobre|novembre|décembre|rue|route|ruelle|place|boulevard|avenue|allée|chemin|sentier|square|impasse|cour|quai|chaussée|côte|vendémiaire|brumaire|frimaire|nivôse|pluviôse|ventôse|germinal|floréal|prairial|messidor|thermidor|fructidor|")
        -2>> =suggPlur(\2)                                                                  && Accord de nombre erroné avec « \1 » : « \2 » devrait être au pluriel.

TEST: Au sein du club des pays les plus prospères, la richesse par habitant est néanmoins 52 fois supérieure à celle des pays à faibles revenus, d’après la Banque mondiale.
TEST: 1 à 2 comprimés par jour voire 2 à 3 maximum
TEST: elle vit dans un 24 m carré.
TEST: elle vit dans un 24 m² triste de la banlieue de Paris.
TEST: dans son 240 m2 lumineux, c’est la belle vie.
TEST: Une correction de +0.5 dioptrie.
TEST: zéro compassion
TEST: puis il y a entre 4 à 1 millions d’années sous une forme proche de la nôtre


##  det nom et det nom adj
__gn_det_nom_et_det_nom__
    [le|l’|un|ce|cet|mon|ton|son|notre|votre|leur]  *WORD  [et|ou]  [le|l’|un|ce|cet|mon|ton|son|notre|votre|leur]  *WORD  @:A.*¬:(?:A.*:[me]|3[sp]|G)
        <<- /gn/ morph(\2, ":[NA].*:[me]:[si]") and morph(\5, ":[NA].*:[me]:[si]") and not (value(<1, "|,|") and morph(<2, ":[NA]"))
        --1>> =suggMasSing(\-1) + "|" + suggMasPlur(\-1)                            && Soit cet adjectif doit être accordé avec “\5” ou bien “\2” et “\5” (masculin singulier ou pluriel).

            and not (value(\-1, "|vient|dit|surgit|survient|périt|") and morph(>1, ":(?:[MD]|Oo)|>[A-Z]/"))
            and morph(\-1, ":V[23].*:Ip.*:3s", ":G|>(?:devoir|suffire|para[îi]tre)/") and analyseWord(\-1[:-1]+"s", ":E:2s")
        --1>> =\-1[:-1]+"s"                                                         && S’il s’agit d’un impératif, la terminaison est “is”, non “it”.

    <start>  ~\w\w+t$
        <<- /imp/ not value(>1, "|il|elle|on|ils|elles|iel|iels|")
            and not value(\-1, "|provient|")
            and not (value(\-1, "|vient|dit|surgit|survient|périt|") and morph(>1, ":(?:[MDR]|Oo)|>[A-Z]/"))
            and morph(\-1, ":V[23].*:Ip.*:3s", ":[GNA]|>(?:devoir|suffire|para[îi]tre)/") and analyseWord(\-1[:-1]+"s", ":E:2s")
        --1>> =\-1[:-1]+"s"                                                         && S’il s’agit d’un impératif, la terminaison est “is”, non “it”.

TEST: {{Finit}} ton assiette.                                           ->> Finis
TEST: Ne {{pourrit}} pas l’ambiance.                                    ->> pourris
TEST: Ne {{finit}} pas ce devoir.
TEST: {{Finit}} cette tarte.

        <<- not morph(<1, ":(?:[123]s|V0)") or not morph(\3, ":N.*:[pi]") ~2>> *
        <<- /-1>> _ngn_

    tu  en  @:(?:[123][sp]|P|Y)
        <<- not morph(<1, ":(?:[123]s|V0)") or not morph(\3, ":[NA]") ~2>> *
        <<- /-1>> _ngn_

    [ça|ceci|cela|lui|celui-là|celui-ci]  le   @:(?:[123][sp]|P|Y)
        <<- not morph(<1, ":(?:3s|R)") or not morph(\3, ":N.*:[me]:[si]") ~2>> *
        <<- /-1>> _ngn_

    [ça|ceci|cela|lui|celui-là|celui-ci]  la   @:(?:[123][sp]|P|Y)
        <<- not morph(<1, ":(?:3s|R)") or not morph(\3, ":N.*:[fe]:[si]") ~2>> *
        <<- /-1>> _ngn_

    [ça|ceci|cela|lui|celui-là|celui-ci]  [l’|leur]   @:(?:[123][sp]|P|Y)
        <<- not morph(<1, ":(?:3s|R)") or not morph(\3, ":N.*:[si]") ~2>> *
        <<- /-1>> _ngn_

    [ça|ceci|cela|lui|celui-là|celui-ci]  les  @:(?:[123][sp]|P|Y)
        <<- not morph(<1, ":(?:3s|R)") or not morph(\3, ":N.*:[pi]") ~2>> *
        <<- /-1>> _ngn_

    [ça|ceci|cela|lui|celui-là|celui-ci]  en  @:(?:[123][sp]|P|Y)
        <<- not morph(<1, ":(?:3s|R)") or not morph(\3, ":[NA]") ~2>> *
        <<- /-1>> _ngn_

    [elle|iel|celle-là|celle-ci]  le   @:(?:[123][sp]|P|Y)
        <<- not morph(<1, ":(?:3s|R)") or not morph(\3, ":N.*:[me]:[si]") ~2>> *
        <<- /-1>> _ngn_

        <<- ~2>> *
        <<- /-1>> _ngn_

    tu  [nous|vous|lui]  @:(?:[123][sp]|P|Y)
        <<- not morph(<1, ":V0") ~2>> *
        <<- /-1>> _ngn_

    [cela|ceci|ça|lui|celui-là|celui-ci]    [nous|vous|lui]  @:(?:[123][sp]|P|Y)
    [elle|celle-là|celle-ci|iel]            [nous|vous|lui]  @:(?:[123][sp]|P|Y)
    [nous|vous]                             [nous|vous|lui]  @:(?:[123][sp]|P|Y)
    [eux|ceux-là|ceux-ci]                   [nous|vous|lui]  @:(?:[123][sp]|P|Y)
    [elles|celles-là|celles-ci|iels]        [nous|vous|lui]  @:(?:[123][sp]|P|Y)
        <<- not morph(<1, ":R") ~2>> *
        <<- /-1>> _ngn_


__purge_préverbes2__
    nous              [le|la|l’|les|en|y]  @:(?:[123][sp]|P|Y)¬:(?:X|1p)
    vous              [le|la|l’|les|en|y]  @:(?:[123][sp]|P|Y)¬:(?:X|2p)

TEST: les marchands {{paye}}
TEST: les marchands {{marchande}}
TEST: les marchandes {{paie}}
TEST: les marchandes {{marchande}}
TEST: les chattes {{finis}}
TEST: les chattes {{manges}}
TEST: les religieux qui n’en {{finisse}} pas de mentir.
TEST: Les tests grand public de Jean-Paul {{montre}} des résultats surprenants.
TEST: les malades que tu as servis {{outrepasse}} leur droit
TEST: l’écart entre les riches et les pauvres n’était pas si grand.
TEST: Les grands hommes politiques
TEST: les charmantes petites mines de toutes les jeunes filles
TEST: Les pauvres petites dames sont folles
TEST: Sauf que l’un comme l’autre avaient dû y renoncer.
TEST: L’un comme l’autre devaient y renoncer.
TEST: Les écrivaines Marie Darrieussecq et Annie Ernaux
TEST: Les femmes candidates à ce poste doivent se présenter cet après-midi.
TEST: Toutes les personnes candidates seront évaluées plusieurs fois.
TEST: il les a sélectionnés, les a améliorées pour accroître leur rendement
TEST: les femmes enceintes
TEST: les souris enceintes


__conj_certains_certaines_plusieurs_nom__
    [certains|maints]  @:[NA].*:[pi]  @:V¬:(?:3p|P|Y|G|M)
        <<- /conj/ morph(<1, ":Cs|<start>|>,")
            and not( morph(\3, ":3s") and before("(?i)\\b(?:l[ea] |l’|une? |ce(?:tte|t|) |[mts](?:on|a) |[nv]otre ).+ entre .+ et ") )
            and not checkAgreement(\2, \3)