Grammalecte  Check-in [ed9c91eae4]

# Noms propres
__[i](p_cocktail_Molotov)__     cocktails? (Molotov) @@$ <<- ~1>> *
__[i](p_effet_Streisand)__      effets? (Streisand) @@$ <<- ~1>> *
__[i](p_prix_Nobel)__           prix (Nobel) @@5 <<- ~1>> *
__[s](p_Amérique)__             Amérique (centrale|du (?:Nord|Sud)) @@$ <<- ~1>> *
__[s](p_nom_propre_nom_propre)__
    ([A-ZÉÈÂ][\w-]+) (L[ea] |[vV][oa]n |Ma?c |[dD][eu] |d’|O’|)([A-ZÉÈÂ][\w-]+) @@0,*,$
    <<- morph(\1, ":M[12]", False) and (morph(\3, ":(?:M[12]|V)", False) or not spell(\3)) ~3>> *
    <<- morph(\1, ":M[12]", False) ~3>> *
    <<- __also__ and \2 != "" ~2>> *
__[s](p_de_nom_propre_et_ou_de_nom_propre)__
    (?:de |d’)([A-ZÉÈÂ][\w-]+) +(?:et|ou) +(?:de |d’)([A-ZÉÈÂ][\w-]+) @@w,$
    <<- morph(\1, ":M", False) and morph(\2, ":M", False) ~>> *
__[s](p_de_nom_propre)__
    (?:de |d’)([A-ZÉÈÂ][\w-]+) @@$
    <<- morph(\1, ":M", False) or not spell(\1) ~>> *

    (?:[eE]n|[0-3]?[0-9]) (Mars)  @@$
    <<- -1>> mars
    # Pas de majuscule sur les mois.|http://www.academie-francaise.fr/la-langue-francaise/questions-de-langue#42_strong-em-jours-de-la-semaine-pluriel-et-majuscules-em-strong

TEST: 15 {{Septembre}}                                                  ->> septembre
TEST: 23 {{Messidor}}                                                   ->> messidor
TEST: ils viendront en {{Mars}}.                                        ->> mars
TEST: le comité d’éthique qui statuera dans les meilleurs délais sur la situation de Véronique Avril


# Les États
__[s]/maj(maj_État_qqch)__
    (état) (?:français|belge|suisse|canadien|palestinien|souverain|américain|russe|anglais|allemand|espagnol|italien|mexicain|japonais|chinois|australien|polonais|membre|africain|européen|asiatique|voyou|démocratique|totalitaire|fédéral|fédéré|capitaliste|communiste|providence|nation)  @@0
    <<- -1>> État                                       # Majuscule manquante : si vous parlez de l’institution dirigeante d’une nation, écrivez “État”.
__[s]/maj(maj_États_qqch)__