commit 08a3c865c73e420de1b68a6469aa785c0d907f0a Author: hectoralos Date: Sun May 17 23:02:45 2020 +0300 +mots de base diff --git a/apertium-frp.frp.metadix b/apertium-frp.frp.metadix index 32f5767..c139e68 100644 --- a/apertium-frp.frp.metadix +++ b/apertium-frp.frp.metadix @@ -23,6 +23,7 @@ + @@ -149,6 +150,13 @@

ênes en

+ +

co co

+

ca co

+

cos co

+

ques co

+
+

èla

@@ -216,16 +224,18 @@

s

+--> - +

es

-

e

+

a

-

e

+

a

+

@@ -559,8 +566,8 @@

on on

a on

os on

+

es on

es on

-

es on

onon

@@ -592,6 +599,53 @@

a i

os i

es i

+

or i

+

or i

+
+ + +

+

a

+

os

+

es

+
+ + +

él él

+

ela él

+

elos él

+

éls él

+

eles él

+
+ + +

él él

+

ela él

+

elos él

+

eles él

+
+ + +

él él

+

éli él

+

ela él

+

elos él

+

éls él

+

eles él

+

elor él

+

elor él

+
+ + +

él él

+

eli él

+

ela él

+

elos él

+

eles él

+
+ + +

@@ -732,11 +786,27 @@

ênes en

+ +

co co

+

ca co

+

cos co

+

ques co

+
+

s

+ +

es

+

a

+

+

+

+

a

+
+

@@ -1261,7 +1331,7 @@

- +

@@ -1330,6 +1400,10 @@

des delo

+ +

+
+

@@ -1435,14 +1509,17 @@

il il

'l il

ils il

-

el il

+

el il

+

el il

ele il

ela il

+

lyé il

le il

'l il

+

el il

els il

eles il

-

els il

+

lyés il

il prpers

ils prpers

el prpers

@@ -1503,8 +1580,12 @@

ui ui

ui

+

i ui

+

i ui

ui ui

ui

+

i ui

+

i ui

@@ -1572,11 +1653,9 @@

+--> - -

-
- + que qui + que +

queque

quand quora comben @@ -6661,6 +6764,19 @@ franc + brâvament + grôs + rudo + très + galyârd + + + + ce + + que + qué + @@ -6696,10 +6812,14 @@ ora vito ben + bien oncor defôr en-un-mouél + asse + assé asse-ben + asse-més pués pertot jamés @@ -6758,10 +6878,49 @@ asse ensé assé + cenvôtadére + pués-cen + pués-ce + dêsinque + dêsique + gins + gint + pouent + més + ples + pasmés + peca + muens + amuens + aumuens + amuente + ense + d'ense + vers + lé-outre + lé-vers + viâ + quandmémo + mémament + nios + d'atot + d'étot + arriér + arriér-més + asse-tout + setout + tantetquant + d'abôrd + ben-tout + ben-setout + devant abricot + devant + bien + ben chat chin cortil @@ -6796,6 +6955,9 @@ novembro dècembro + pouent + pecolon + gent gens @@ -6815,6 +6977,11 @@ felye seror égoue + place + plâce + plàce + pôsto + plâtro tét fenétr @@ -6839,11 +7006,31 @@ megnât menât - afriqu + angliès + angliès + francès + francès + espagnol + espagnol + + Afriqu + afriqu + Amèriqu + amèriqu + Eropè + eropè + Uropè + uropè + Asian + asian + Asiati + asiati + ôtr + mém content chôd @@ -6852,12 +7039,17 @@ vèrd petiôt gent + galyârd b b grôs - afriqu +

Iiér Iiér

+

Iiérs Iiér

+

Iiére Iiér

+

Iiéres Iiér

+ @@ -7099,7 +7291,6 @@ dèfen môrtr vêtir - sèrv s p @@ -7107,6 +7298,7 @@ c s + sèrv empl crev @@ -7170,6 +7362,7 @@ apart abst aou +aou apond rapond rèpond @@ -9243,6 +9436,18 @@ pegner, je pègno ! v --> + Allemagnes + Amèriques + Amèrica + Afriques + Africa + Eropes + Eropa + Uropes + Uropa + Asie + France +
@@ -9262,15 +9467,19 @@ pegner, je pègno !

n' un

n' un

un' un

-

m' mon

-

t' ton

-

s' son

-

noutr'noutron

-

voutr'voutron

-

qu'que

-

qu'que

-

lorsqu'lorsque

-

qu'que

+

m' mon

+

t' ton

+

s' son

+

noutr'noutron

+

voutr'voutron

+

qu'que

+

devantqu'devantque

+

qu'que

+

lorsqu'lorsque

+

qu'que

+

ginsd'ginsde

+

gintd'gintde

+

totplend'totplende

diff --git a/apertium-frp.frp.rlx b/apertium-frp.frp.rlx index e10befa..4d43376 100644 --- a/apertium-frp.frp.rlx +++ b/apertium-frp.frp.rlx @@ -26,6 +26,7 @@ LIST Prop = np ; LIST A = adj ; LIST Adv = adv ; LIST PreAdv = preadv ; +LIST PostAdv = postadv ; LIST PreDet = predet ; LIST CnjAdv = cnjadv ; LIST CnjCoo = cnjcoo ; @@ -133,6 +134,7 @@ LIST Il = "il" ; LIST On = "on" ; LIST Que = "que" ; +LIST Etre = "étre" ; SECTION @@ -145,8 +147,25 @@ SELECT Prep IF (0 ("devant")) (1 Num + &&Gender) (2 A + &&Gender + Pl ) ; SELECT Ser IF (0 ("savêr")) ; # FIXME +# étre vbser / vblex (=appartenir) + +SELECT V IF (0 Etre) (1 ("a")) (NOT 2 Top OR unknownMajIni) ; # ére ux Angliès +SELECT V IF (0 Etre) (1 Adv) (2 ("a")) (NOT 3 Top OR unknownMajIni) ; # ére pas ux Angliès +SELECT V IF (0 Etre) (1 Adv) (2 Adv) (3 ("a")) (NOT 4 Top OR unknownMajIni) ; # ére pas alor ux Angliès +SELECT Ser IF (0 Etre) ; + +# adv / postadv + +SELECT PostAdv IF (-1 (META:/-/r)) ; +REMOVE PostAdv IF (NOT -1 (META:/-/r)) ; + # det / prn +SELECT Det + &&GenderNumber IF (0 Tn OR Pro OR Det + &&GenderNumber) (1 N + &&GenderNumber) (2 A + &&GenderNumber) ; +SELECT Det + &&GenderNumber IF (0 Tn OR Pro OR Det + &&GenderNumber) (1 N + &&GenderNumber) (2 Adv_PreAdv) (3 A + &&GenderNumber) ; +SELECT Det + &&GenderNumber IF (0 Tn OR Pro OR Det + &&GenderNumber) (1 A + &&GenderNumber) (2 N + &&GenderNumber) ; +SELECT Det + &&GenderNumber IF (0 Tn OR Pro OR Det + &&GenderNumber) (1 Adv_PreAdv) (2 A + &&GenderNumber) (2 N + &&GenderNumber) ; + SELECT Det + &&GenderNumber IF (0 Tn OR Pro OR Det + &&GenderNumber) (1 N + &&GenderNumber) ; # ceti bruit, l'hotâl SELECT Det + &&GenderNumber IF (0 Tn OR Pro OR Det + &&GenderNumber) (1 NP + &&GenderNumber) ; @@ -187,6 +206,8 @@ SELECT Tn IF (0 Pro) ; # FIXME SELECT P1 IF (-1 Je) (0 VSg1); ## Je veux +SELECT P1 IF (0 VSg1) (0 (META:/-/r)) (1 Je) ; + ## Veux-je SELECT P1 IF (-2 Je) (-1 Pro) (0 VSg1); ## Je lui veux SELECT P1 IF (-3 Je) (-2 Pro) (-1 Pro) (0 VSg1); @@ -195,6 +216,8 @@ REMOVE P1 + Sg IF (NOT -1* Je) (0 Verb + P1 + Sg) ; SELECT P2 IF (-1 Te) (0 VSg2); ## Tu veux +SELECT P2 IF (0 VSg2) (0 (META:/-/r)) (1 Te) ; + ## Veux-tu SELECT P2 IF (1 Te) (0 VSg2); ## Veux-tu SELECT P2 IF (-2 Te) (-1 Pro) (0 VSg2); @@ -205,6 +228,8 @@ REMOVE P2 + Sg IF (NOT -1* Te) (0 Verb + P2 + Sg) (NOT 0 Verb + P2 + Sg + Imper) SELECT P3 IF (-1 Il + Sg OR On) (0 VSg3); ## Elle parle +SELECT P3 IF (0 VSg3) (0 (META:/-/r)) (1 Il + Sg OR On) ; + ## Dit-il SELECT P3 IF (1 Il + Sg OR On) (0 VSg3); ## Parle-t-elle SELECT P3 IF (-2 Il + Sg OR On) (-1 Pro) (0 VSg3); @@ -229,6 +254,15 @@ SELECT Imper IF (-1 BOS) (1 Excl) ; REMOVE Subjunc (*-1 Que BARRIER Cnj_Rel_End) (*-1 VerbInd LINK NOT 1 Inf) (0C Verb) (0 Pri) ; REMOVE Subjunc (NOT -1* Que) (0C Verb) (0 Pri) ; # VERIFY +# dormét pri/ifi +# il faut regarder aussi qu'est-ce qui ce passe dans la frase antérieure ou postérieure (pri ou ifi?) + +SET MarcaPasado = ("ayer") OR ("anteayer"); +LIST LemmaPasado = (".*pasado.*"r) ; +REMOVE:presente_pasado1 (pri) IF (0 (pri)) (0 (ifi)) (-1*/* MarcaPasado OR LemmaPasado OR ("pasado") BARRIER Verb OR Cnj_Rel_End); #El año pasado creamos +REMOVE:presente_pasado2 (pri) IF (0 (pri)) (0 (ifi)) (1 MarcaPasado OR LemmaPasado) (NOT 1 ("pasado")); +REMOVE:presente_pasado0 (ifi) IF (0 (pri)) (0 (ifi)); + # Resources: # http://visl.sdu.dk/cg3.html # http://groups.google.com/group/constraint-grammar diff --git a/apertium-frp.post-frp.dix b/apertium-frp.post-frp.dix index e4e02d5..6af8cd5 100644 --- a/apertium-frp.post-frp.dix +++ b/apertium-frp.post-frp.dix @@ -31,62 +31,6 @@ - Haydn - Hayes - Hegel - Heidegger - Helsinki - Herbert - hindi - hiphop - hip-hop - hippie - hiragana - hit - hoax - Horthy - Houellebecq - Houston - Hugh - Huntington - Huston - Hadley - Hadnagy - Hailey - Haley - Halley - Hallyday - Hanley - Hans - Hardey - Hardy - Harley - Harmony - Harry - Hartley - Harvey - Harvey - Hathaway - Hawey - Hay - Hayley - Healey - Healy - Hemingway - Henley - Henry - Henry - Hevey - Hickey - Hilary - Hillary - Holloway - Holly - Hughboy - Humphrey - Humphrey - Hurley - Huxley yacht yang yankee @@ -102,8 +46,8 @@ yougoslave Yougoslavie yourte - Ier - Ire + Iièr + Iière IIe IIIe IVe @@ -259,7 +203,6 @@ Yuste Yustine Yuvia - @@ -324,7 +267,9 @@

taeton

saeson

--> -

e

+ -

e

+ @@ -418,6 +365,13 @@

yey

tet

+ +

m

m'

t