Grammalecte  Check-in [ffcde2f18e]

Overview
Comment:[fr] ajustements
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk | fr
Files: files | file ages | folders
SHA3-256: ffcde2f18ed5db625a203e33639f3fe8be15c177e9345607db86adfc31c9dc45
User & Date: olr on 2020-11-29 12:33:21
Other Links: manifest | tags
Context
2020-11-29
12:43
[core] gc engine: code simplification check-in: 4a60761454 user: olr tags: trunk, core
12:33
[fr] ajustements check-in: ffcde2f18e user: olr tags: trunk, fr
2020-11-28
23:56
[graphspell] fix syntax error check-in: 99f68677c9 user: olr tags: trunk, graphspell
Changes

Modified gc_lang/fr/rules.grx from [72e94bfaa0] to [b48c735a5b].

2187
2188
2189
2190
2191
2192
2193

2194
2195
2196
2197
2198
2199
2200
2201
2202
2203
2204

2205
2206
2207
2208
2209
2210
2211
2212
2213
2214
2215
2216
2217
2218

2219
2220
2221
2222
2223
2224
2225
2226
2227
2228
2229
2230

2231
2232
2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244
2245
2246
2247
2248
2249
2250
2251
2252
2253
2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265

2266
2267
2268
2269
2270
2271
2272
2273
2274

2275
2276
2277




2278
2279
2280
2281
2282
2283


















2284
2285
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
2298
2299




2300
2301
2302
2303
2304
2305
2306
2307
2308
2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321

    certains  @:[NA].*:[me]:[pi]¬:(?:G|3[sp])
        <<- =>> exclude(\1, ":O")

    certaines  @:[NA].*:[fe]:[pi]¬:(?:G|3[sp])
        <<- =>> exclude(\1, ":O")


    contre [moi|toi|soi|lui|elle|iel|nous|vous|eux|elles|iels]
        <<- =>> select(\1, ":R")

    [la|les|des|une|cette|ma|ta|sa|notre|votre|leur+s] >lutte  ?[menée+s|lancée+s]¿                                 contre
    [>accusation|>action|>assaut|>attentat|>croisade|>guerre|>jihad|>offensive|>sortilège] ?[mené+ses|lancé+ses]¿   contre
    [>antidote|>crime|>philtre|>remède|>sérum|>vaccin|>solution]                                                    contre
        <<- =>> select(\-1, ":R")

    contre
        <<- not morph(<1, ":[DA].*:[me]:[si]") =>> exclude(\1, ":N")


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

    [de|d’] [me|m’|te|t’|se|s’|en|y|nous|vous|moi|toi|soi|lui|elle|iel|eux|elles|iels]
    [de|d’] @:[MYBD]
    [de|d’] *NUM
        <<- =>> select(\1, ":R")

    [de|d’] @:[NA]¬:[YMGB]
        <<- not \2[0:1].isupper() =>> select(\1, ":D")

    [devant|derrière] $:D
        <<- morph(<1, ":V|<start>|>,", ":G") =>> select(\1, ":R")


    entre  *WORD  et  *WORD
        <<- (morph(\2, ":[NA]") and morph(\4, ":[NA]"))
            or (morph(\2, ":Y") and morph(\4, ":Y"))
            or (morph(\2, ":M") and morph(\4, ":M")) =>> define(\1, ":R")

    entre  $:D¬:R  *WORD  et  $:D¬:R  *WORD
        <<- morph(\3, ":[NA]") and morph(\6, ":[NA]") =>> define(\1, ":R")

    entre [moi|toi|soi|lui|elle|iel|nous|vous|eux|elles|iels] et [moi|toi|soi|lui|elle|iel|nous|vous|eux|elles|iels]
    entre autres
        <<- =>> define(\1, ":R")


    face [à|au|aux]
        <<- 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")

    n’ en >pouvoir mais
        <<- =>> define(\-1, ">mais/:W")

    [le|ce|cet|mon|ton|son|quel|quelque|notre|votre|un|leur|ledit|dudit|chaque|des|les|quelques|quel|quelle|quels|quelles]  [son|ton]
        <<- =>> exclude(\2, ":D")

    [son|ton] *WORD
        <<- morph(\2, ":G", ":[NA]") or value(<1, "|du|le|ce|un|quel|mon|") =>> exclude(\1, ":D")
        <<- __else__ and morph(\2, ":N", "*") =>> select(\1, ":D")

    [son|ton] ,
        <<- =>> select(\1, ":N")

    [une|le|la|les|des|chaque|quelque|quelques|cet|cette|ces|ma|ta|sa|mes|tes|ses|au|aux|notre|votre|nos|vos|leur|leurs|quel|quelle|quels|quelles] personne
    [une|la|cette|ma|ta|sa|votre|votre|leur|quel|quelle|quelque] tierce personne
        <<- =>> select(\-1, ":N")

    pas mal
        <<- =>> select(\2, ":W")

    mal @:[AQ]
        <<- morph(<1, ":[NV]", ":D.*:[me]:[si]") =>> select(\1, ":W")

    même $:D
        <<- morph(<1, "<start>|>,|:[ISKYP]", "*") =>> select(\1, ":W")

    [le|la|l’|les|du|chaque|ces|des|mes|tes|ses|nos|vos|leurs|quelques|quels|quelles] même
        <<- =>> select(\2, ":A")


    en outre
        <<- not value(<1, "|il|on|elle|iel|n’|l’|") =>> select(\1, ":R") and select(\2, ":N")

    [une|cette|quelle|mon|notre|votre] outre
        <<- =>> select(\2, ":N")

    outre $:D
        <<- morph(<1, ":V", ":[GA]") =>> select(\1, ":R")


    [le|l’|un|mon|notre|votre|leur|chaque|mes|tes|ses|nos|vos|leurs|quel|quels|quelle|quelles] point
        <<- =>> select(\2, ":N")





    nos @¬:B
        <<- =>> select(\1, ":D")

    parmi *WORD
        <<- =>> select(\1, ":R")



















    [plus|moins]
        <<- value(<1, "|le|la|l’|les|leur|") =>> select(\1, ":[NW]")
        <<- __else__ and morph(<1, ":V") =>> select(\1, ":W")

    plus ou moins
        <<- =>> select(\1, ":W") and select(\-1, ":W")

    [plus|moins] @:[WA]
        <<- morph(<1, ":N", ":Ov") =>> select(\1, ":W")

    [plus|moins]  @:[WA] [que|qu’]
        <<- not value(<1, "|je|ne|n’|") =>> select(\1, ":W")

    [un|une|des|le|la|l’|les|mon|ton|son|ma|ta|sa|notre|votre|leur|mes|tes|ses|nos|vos|leurs] [plus|moins] @:[AW]¬:G
        <<- =>> select(\2, ":W")





    puis
        <<- not value(<1, "|je|ne|n’|le|l’|leur|") =>> exclude(\1, ":V")

    pas
        <<- morph(<1, ":[VWX]") =>> exclude(\1, ":N")

    passé  [<end>|,|$:R]
        <<- =>> exclude(\1, ":G")

    personne [ne|n’]
        <<- not morph(<1, ":[DA].*:[fe]:[si]") =>> select(\1, ":O")

    pourvu
        <<- not value(>1, "|que|qu’|") =>> exclude(\1, ":G")

    SA
        <<- morph(<1, ":D") =>> exclude(\1, ":D")

    selon @:(?:[DBM]|Oo)
        <<- =>> select(\1, ":R")

    selon [,|<end>]







>











>














>












>



















<
<
<
<












>









>



>
>
>
>






>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
















>
>
>
>



<
<
<
<
<
<
<
<
<
<
<
<







2187
2188
2189
2190
2191
2192
2193
2194
2195
2196
2197
2198
2199
2200
2201
2202
2203
2204
2205
2206
2207
2208
2209
2210
2211
2212
2213
2214
2215
2216
2217
2218
2219
2220
2221
2222
2223
2224
2225
2226
2227
2228
2229
2230
2231
2232
2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244
2245
2246
2247
2248
2249
2250
2251
2252
2253




2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266
2267
2268
2269
2270
2271
2272
2273
2274
2275
2276
2277
2278
2279
2280
2281
2282
2283
2284
2285
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
2298
2299
2300
2301
2302
2303
2304
2305
2306
2307
2308
2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330












2331
2332
2333
2334
2335
2336
2337

    certains  @:[NA].*:[me]:[pi]¬:(?:G|3[sp])
        <<- =>> exclude(\1, ":O")

    certaines  @:[NA].*:[fe]:[pi]¬:(?:G|3[sp])
        <<- =>> exclude(\1, ":O")

    ## contre
    contre [moi|toi|soi|lui|elle|iel|nous|vous|eux|elles|iels]
        <<- =>> select(\1, ":R")

    [la|les|des|une|cette|ma|ta|sa|notre|votre|leur+s] >lutte  ?[menée+s|lancée+s]¿                                 contre
    [>accusation|>action|>assaut|>attentat|>croisade|>guerre|>jihad|>offensive|>sortilège] ?[mené+ses|lancé+ses]¿   contre
    [>antidote|>crime|>philtre|>remède|>sérum|>vaccin|>solution]                                                    contre
        <<- =>> select(\-1, ":R")

    contre
        <<- not morph(<1, ":[DA].*:[me]:[si]") =>> exclude(\1, ":N")

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

    [de|d’] [me|m’|te|t’|se|s’|en|y|nous|vous|moi|toi|soi|lui|elle|iel|eux|elles|iels]
    [de|d’] @:[MYBD]
    [de|d’] *NUM
        <<- =>> select(\1, ":R")

    [de|d’] @:[NA]¬:[YMGB]
        <<- not \2[0:1].isupper() =>> select(\1, ":D")

    [devant|derrière] $:D
        <<- morph(<1, ":V|<start>|>,", ":G") =>> select(\1, ":R")

    ## entre
    entre  *WORD  et  *WORD
        <<- (morph(\2, ":[NA]") and morph(\4, ":[NA]"))
            or (morph(\2, ":Y") and morph(\4, ":Y"))
            or (morph(\2, ":M") and morph(\4, ":M")) =>> define(\1, ":R")

    entre  $:D¬:R  *WORD  et  $:D¬:R  *WORD
        <<- morph(\3, ":[NA]") and morph(\6, ":[NA]") =>> define(\1, ":R")

    entre [moi|toi|soi|lui|elle|iel|nous|vous|eux|elles|iels] et [moi|toi|soi|lui|elle|iel|nous|vous|eux|elles|iels]
    entre autres
        <<- =>> define(\1, ":R")

    ##
    face [à|au|aux]
        <<- 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")

    n’ en >pouvoir mais
        <<- =>> define(\-1, ">mais/:W")

    [le|ce|cet|mon|ton|son|quel|quelque|notre|votre|un|leur|ledit|dudit|chaque|des|les|quelques|quel|quelle|quels|quelles]  [son|ton]
        <<- =>> exclude(\2, ":D")

    [son|ton] *WORD
        <<- morph(\2, ":G", ":[NA]") or value(<1, "|du|le|ce|un|quel|mon|") =>> exclude(\1, ":D")
        <<- __else__ and morph(\2, ":N", "*") =>> select(\1, ":D")

    [son|ton] ,
        <<- =>> select(\1, ":N")





    pas mal
        <<- =>> select(\2, ":W")

    mal @:[AQ]
        <<- morph(<1, ":[NV]", ":D.*:[me]:[si]") =>> select(\1, ":W")

    même $:D
        <<- morph(<1, "<start>|>,|:[ISKYP]", "*") =>> select(\1, ":W")

    [le|la|l’|les|du|chaque|ces|des|mes|tes|ses|nos|vos|leurs|quelques|quels|quelles] même
        <<- =>> select(\2, ":A")

    ## outre
    en outre
        <<- not value(<1, "|il|on|elle|iel|n’|l’|") =>> select(\1, ":R") and select(\2, ":N")

    [une|cette|quelle|mon|notre|votre] outre
        <<- =>> select(\2, ":N")

    outre $:D
        <<- morph(<1, ":V", ":[GA]") =>> select(\1, ":R")

    ## point
    [le|l’|un|mon|notre|votre|leur|chaque|mes|tes|ses|nos|vos|leurs|quel|quels|quelle|quelles] point
        <<- =>> select(\2, ":N")

    [ne|n’]  $:V  point
        <<- =>> exclude(\-1, ":N")

    ##
    nos @¬:B
        <<- =>> select(\1, ":D")

    parmi *WORD
        <<- =>> select(\1, ":R")

    pas
        <<- morph(<1, ":[VWX]") =>> exclude(\1, ":N")

    passé  [<end>|,|$:R]
        <<- =>> exclude(\1, ":G")

    ## personne
    personne [ne|n’]
        <<- not morph(<1, ":[DA].*:[fe]:[si]") =>> select(\1, ":O")

    n’  $:V  personne
        <<- =>> exclude(\-1, ":N")

    [une|le|la|les|des|chaque|quelque|quelques|cet|cette|ces|ma|ta|sa|mes|tes|ses|au|aux|notre|votre|nos|vos|leur|leurs|quel|quelle|quels|quelles] personne
    [une|la|cette|ma|ta|sa|votre|votre|leur|quel|quelle|quelque] tierce personne
        <<- =>> select(\-1, ":N")

    ## plus / moins
    [plus|moins]
        <<- value(<1, "|le|la|l’|les|leur|") =>> select(\1, ":[NW]")
        <<- __else__ and morph(<1, ":V") =>> select(\1, ":W")

    plus ou moins
        <<- =>> select(\1, ":W") and select(\-1, ":W")

    [plus|moins] @:[WA]
        <<- morph(<1, ":N", ":Ov") =>> select(\1, ":W")

    [plus|moins]  @:[WA] [que|qu’]
        <<- not value(<1, "|je|ne|n’|") =>> select(\1, ":W")

    [un|une|des|le|la|l’|les|mon|ton|son|ma|ta|sa|notre|votre|leur|mes|tes|ses|nos|vos|leurs] [plus|moins] @:[AW]¬:G
        <<- =>> select(\2, ":W")

    ##
    pourvu
        <<- not value(>1, "|que|qu’|") =>> exclude(\1, ":G")

    puis
        <<- not value(<1, "|je|ne|n’|le|l’|leur|") =>> exclude(\1, ":V")













    SA
        <<- morph(<1, ":D") =>> exclude(\1, ":D")

    selon @:(?:[DBM]|Oo)
        <<- =>> select(\1, ":R")

    selon [,|<end>]
19375
19376
19377
19378
19379
19380
19381



19382
19383
19384
19385
19386
19387
19388

    qui  ?[lui|nous|vous|leur]¿  $:V0
        <<- =>> select(\-1, ":V")

    qui  ?[lui|nous|vous|leur]¿  $:V0  $:Q
        <<- =>> select(\-2, ":V") and select(\-1, ":Q")




    [<start>|,|(]  nous  ?[ne|n’]¿  $:1p
        <<- =>> select(\2, ":Os") and select(\-1, ":[ISK].*:1p")

    [<start>|,|(]  vous  ?[ne|n’]¿  $:2p
        <<- =>> select(\2, ":Os") and select(\-1, ":[ISK].*:2p")

    [<start>|,|(]  ça  [le|la|l’|les|lui|nous|vous|leur]  @:3s¬:G







>
>
>







19391
19392
19393
19394
19395
19396
19397
19398
19399
19400
19401
19402
19403
19404
19405
19406
19407

    qui  ?[lui|nous|vous|leur]¿  $:V0
        <<- =>> select(\-1, ":V")

    qui  ?[lui|nous|vous|leur]¿  $:V0  $:Q
        <<- =>> select(\-2, ":V") and select(\-1, ":Q")

    qui  [ne|n’]  $:V
        <<- =>> exclude(\-1, ":E")

    [<start>|,|(]  nous  ?[ne|n’]¿  $:1p
        <<- =>> select(\2, ":Os") and select(\-1, ":[ISK].*:1p")

    [<start>|,|(]  vous  ?[ne|n’]¿  $:2p
        <<- =>> select(\2, ":Os") and select(\-1, ":[ISK].*:2p")

    [<start>|,|(]  ça  [le|la|l’|les|lui|nous|vous|leur]  @:3s¬:G