summaryrefslogtreecommitdiffabout
authorSergey Poznyakoff <gray@gnu.org.ua>2011-06-06 13:14:45 (GMT)
committer Sergey Poznyakoff <gray@gnu.org.ua>2011-06-06 13:18:34 (GMT)
commit8a7e9b26e073731c82c02594d081c57aa474eade (patch) (side-by-side diff)
tree8aba21e17f5518dc52fb407ba4759ee499a33e34
parent00131c263a9cb0ff8501bc1c4dc1e38b84af1a88 (diff)
downloadellinika-8a7e9b26e073731c82c02594d081c57aa474eade.tar.gz
ellinika-8a7e9b26e073731c82c02594d081c57aa474eade.tar.bz2
Improve conjugator
* data/db.struct: Update. * data/dbverb.struct: New file. * scm/conjugator.scm: Conjugate passive voice. * src/ellinika/elmorph.c (elstr-char-prop-bitmask): Accept negative positions. * xml/pl/rhmata.xml: Make verb suffixes prominent. * xml/ru/rhmata.xml: Likewise.
Diffstat (more/less context) (ignore whitespace changes)
-rw-r--r--data/db.struct263
-rw-r--r--data/dbverb.struct323
-rw-r--r--scm/conjugator.scm289
-rw-r--r--src/ellinika/elmorph.c51
-rw-r--r--xml/pl/rhmata.xml254
-rw-r--r--xml/ru/rhmata.xml254
6 files changed, 867 insertions, 567 deletions
diff --git a/data/db.struct b/data/db.struct
index 616d2c5..1b2f160 100644
--- a/data/db.struct
+++ b/data/db.struct
@@ -160,264 +160,5 @@ CREATE TABLE newsart(
----
-set names utf8;
-DROP TABLE IF EXISTS verbflect;
-CREATE TABLE verbflect(
- ident int(32) not null, -- REL 8
- sing1 varchar(32),
- sing2 varchar(32),
- sing3 varchar(32),
- plur1 varchar(32),
- plur2 varchar(32),
- plur3 varchar(32),
- UNIQUE(ident)
-);
-
-DROP TABLE IF EXISTS conjugation;
-CREATE TABLE conjugation(
- conj char(2), -- REL 9
- voice enum('act','pas'), -- Ενεργητηκή/Μεσοπαθητική
- mode enum('ind','sub','imp'),
- tense varchar(128),
- thema enum('pres','aor','sub','synt'), -- Ενεστώτα, Αόριστου, υποτακτικής, syntethic
- suffix char(32),
- flect int(32), -- REL 8
- accmap char(7), -- accent map
- particle char(2), -- NULL/θα/να
- aux varchar(128), -- REL 10
- auxtense char(32),
- KEY (conj),
- KEY (voice),
- KEY (mode)
-);
-
-DROP TABLE IF EXISTS participle;
-CREATE TABLE participle (
- conj char(2), -- REL 9
- voice enum('act','pas'), -- Ενεργητηκή/Μεσοπαθητική
- tense char(32),
- thema enum('pres','aor','sub'), -- Ενεστώτα, Αόριστου, υποτακτικής
- suffix char(32),
- flect char(32),
- aux varchar(128)
-);
-
-INSERT INTO verbflect VALUES
-(0, NULL, NULL, NULL, NULL, NULL, NULL),
--- Συζυγία Α'
-(1, "ω", "εις", "ει", "ουμε", "ετε", "ουν(ε)"),
-(2, "α", "ες", "ε", "αμε", "ατε", "αν"),
-(8, NULL, "ε", NULL, NULL, "ετε", NULL),
-(9, NULL, "ε", NULL, NULL, "τε", NULL),
-(11, "ομαι", "εσαι", "εται", "όμαστε", "εστε", "ονται"),
-(12, "όμουν", "όσουν", "όταν", "όμαστε", "όμαστε", "ονταν"),
-(15, "ώ", "είς", "εί", "ούμε", "είτε", "ούν(ε)"),
-(17, NULL, "ου", NULL, NULL, NULL, NULL),
-(18, NULL, NULL, NULL, NULL, "είτε", NULL),
--- Συζυγία Β΄ - α΄ τάξη
-(20, "ώ,άω", "άς", "ά,άει","άμε,ούμε","άτε","ούν(ε)"),
-(25, NULL, "α", NULL, NULL, "άτε", NULL),
-(28, "ιέμαι", "ιέσαι", "ιέται", "ιόμαστε", "ιέστε", "ιούνται"),
-(29, "ιόμουν", "ιόσουν", "ιόταν", "ιόμαστε", "ιόσαστε", "ιόνταν"),
-(30, NULL, "ιέσαι", NULL, NULL, "ιέσται", NULL),
-(31, NULL, "ου", NULL, NULL, NULL, NULL),
-(32, NULL, NULL, NULL, NULL, "είτε", NULL),
--- Συζυγία Β΄ - β΄ τάξη
-(33, NULL, "είς", NULL, NULL, "είτε", NULL),
-(34, "ούμαι", "είσαι", "είται", "ούμαστε", "είστε", "ούνται"),
-(35, "ούμουν", "ούσουν", "ούvταν", "ούμαστε", "ούσαστε", "ούνταν"),
-(36, NULL, "είσαι", NULL, NULL, "είστε", NULL),
-(100, "είμαι", "είσαι", "είναι", "είμαστε", "είστε,είσαστε", "είναι"),
-(101, "ήμουν(α)", "ήσουν(α)", "ήταν(ε)", "ήμαστε,ήμασταν", "ήσαστε,ήσασταν", "ήταν(ε)")
-;
-
-
-INSERT INTO conjugation VALUES
--- Συζυγία Α'
--- Ενεργητηκή φωνή
--- Οριστική
-("A", "act", "ind", "Ενεστώτας", 'pres', NULL, 1, "000000", NULL, NULL, NULL),
-("A", "act", "ind", "Παρατατικός", 'pres', NULL, 2, "333333+", NULL, NULL, NULL),
-("A", "act", "ind", "Μέλλοντας διαρκείας", 'pres', NULL, 1, "000000", "θα", NULL, NULL),
-("A", "act", "ind", "Αόριστος", 'aor', NULL, 2, "333333+", NULL, NULL, NULL),
-("A", "act", "ind", "Παρακείμενος", 'synt', NULL, 0, NULL, NULL, "έχω", "Ενεστώτας"),
-("A", "act", "ind", "Υπερσυντέλικος", 'synt', NULL, 0, NULL, NULL, "έχω", "Παρατατικός"),
-("A", "act", "ind", "Συντελεσμένος μέλλοντας", 'synt', NULL, 0, NULL, "θα", "έχω", "Ενεστώτας"),
-("A", "act", "ind", "Μέλλοντας στιγμιαίος", 'sub', NULL, 1, "000000", "θα", NULL, NULL),
--- Υποτακτική
-("A", "act", "sub", "Ενεστώτας", 'pres', NULL, 1, "000000", "να", NULL, NULL),
-("A", "act", "sub", "Αόριστος", 'sub', NULL, 1, "000000", "να", NULL, NULL),
-("A", "act", "sub", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Ενεστώτας"),
--- Προστακτική
-("A", "act", "imp", "Ενεστώτας", 'pres', NULL, 8, "-3--3-", NULL, NULL, NULL),
-("A", "act", "imp", "Αόριστος", 'sub', NULL, 9, "-0--0-", NULL, NULL, NULL),
-("A", "act", "imp", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Ενεστώτας"),
--- Μεσοπαθητική φωνή
--- Οριστική
-("A", "pas", "ind", "Ενεστώτας", 'pres', NULL, 11, "000300", NULL, NULL, NULL),
-("A", "pas", "ind", "Παρατατικός", 'pres', NULL, 12, "222333", NULL, NULL, NULL),
-("A", "pas", "ind", "Μέλλοντας διαρκείας", 'pres', NULL, 11, "333333", "θα", NULL, NULL),
-("A", "pas", "ind", "Αόριστος", 'aor', "ηκ", 2, "333333", NULL, NULL, NULL),
-("A", "pas", "ind", "Παρακείμενος", 'synt', NULL, 0, NULL, NULL, "έχω", "Ενεστώτας"),
-("A", "pas", "ind", "Υπερσυντέλικος", 'synt', NULL, 0, NULL, NULL, "έχω", "Παρατατικός"),
-("A", "pas", "ind", "Συντελεσμένος μέλλοντας", 'synt', NULL, 0, NULL, "θα", "έχω", "Ενεστώτας"),
-("A", "pas", "ind", "Μέλλοντας στιγμιαίος", 'aor', NULL, 15, "111111", "θα", NULL, NULL),
--- Υποτακτική
-("A", "pas", "sub", "Ενεστώτας", 'pres', NULL, 11, "333333", "να", NULL, NULL),
-("A", "pas", "sub", "Αόριστος", 'aor', NULL, 15, "111221", "να", NULL, NULL),
-("A", "pas", "sub", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Παρατατικός"),
--- Προστακτική
-("A", "pas", "imp", "Ενεστώτας", 'pres', NULL, 11, "-3--3-", "να", NULL, NULL),
-("A", "pas", "imp", "Αόριστος", 'aor', NULL, 17, "-0----", NULL, NULL, NULL),
-("A", "pas", "imp", "Αόριστος", 'aor', NULL, 18, "----2-", NULL, NULL, NULL),
-("A", "pas", "imp", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Παρατατικός"),
--- Συζυγία Β΄ - α΄ τάξη
--- Ενεργητηκή φωνή
--- Οριστική
-("B1", "act", "ind", "Ενεστώτας", 'pres', NULL, 20, "ffffff", NULL, NULL, NULL),
-("B1", "act", "ind", "Παρατατικός", 'pres', "ούς", 2, "ssssss", NULL, NULL, NULL),
-("B1", "act", "ind", "Μέλλοντας διαρκείας", 'pres', NULL, 20, "ffffff", "θα", NULL, NULL),
-("B1", "act", "ind", "Αόριστος", 'aor', "ησ", 2, "333333", NULL, NULL, NULL),
-("B1", "act", "ind", "Παρακείμενος", 'synt', NULL, 0, NULL, NULL, "έχω", "Ενεστώτας"),
-("B1", "act", "ind", "Υπερσυντέλικος", 'synt', NULL, 0, NULL, NULL, "έχω", "Παρατατικός"),
-("B1", "act", "ind", "Συντελεσμένος μέλλοντας", 'synt', NULL, 0, NULL, "θα", "έχω", "Ενεστώτας"),
-("B1", "act", "ind", "Μέλλοντας στιγμιαίος", 'aor', "ήσ", 1, "ssssss", "θα", NULL, NULL),
--- Υποτακτική
-("B1", "act", "sub", "Ενεστώτας", 'pres', NULL, 20, "ffffff", "να", NULL, NULL),
-("B1", "act", "sub", "Αόριστος", 'aor', "ήσ", 1, "ssssss", "να", NULL, NULL),
-("B1", "act", "sub", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Ενεστώτας"),
--- Προστακτική
-("B1", "act", "imp", "Ενεστώτας", 'pres', NULL, 25, "-0--2-", NULL, NULL, NULL),
-("B1", "act", "imp", "Αόριστος", 'aor', "ησ", 9, "-3--3-", NULL, NULL, NULL),
-("B1", "act", "imp", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Ενεστώτας"),
--- Μεσοπαθητική φωνή
--- Οριστική
-("B1", "pas", "ind", "Ενεστώτας", 'pres', NULL, 28, "ffffff", NULL, NULL, NULL),
-("B1", "pas", "ind", "Παρατατικός", 'pres', NULL, 29, "ffffff", NULL, NULL, NULL),
-("B1", "pas", "ind", "Μέλλοντας διαρκείας", 'pres', NULL, 28, "ffffff", "θα", NULL, NULL),
-("B1", "pas", "ind", "Αόριστος", 'aor', "ηκ", 2, "333333", NULL, NULL, NULL),
-("B1", "pas", "ind", "Παρακείμενος", 'synt', NULL, 0, NULL, NULL, "έχω", "Ενεστώτας"),
-("B1", "pas", "ind", "Υπερσυντέλικος", 'synt', NULL, 0, NULL, NULL, "έχω", "Παρατατικός"),
-("B1", "pas", "ind", "Συντελεσμένος μέλλοντας", 'synt', NULL, 0, NULL, "θα", "έχω", "Ενεστώτας"),
-("B1", "pas", "ind", "Μέλλοντας στιγμιαίος", 'aor', NULL, 15, "ffffff", "θα", NULL, NULL),
--- Υποτακτική
-("B1", "pas", "sub", "Ενεστώτας", 'pres', NULL, 28, "ffffff", "να", NULL, NULL),
-("B1", "pas", "sub", "Αόριστος", 'aor', NULL, 15, "ffffff", "να", NULL, NULL),
-("B1", "pas", "sub", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Παρατατικός"),
--- Προστακτική
-("B1", "pas", "imp", "Ενεστώτας", 'pres', NULL, 30, "-f--f-", "να", NULL, NULL),
-
-("B1", "pas", "imp", "Αόριστος", 'aor', NULL, 31, "-2----", NULL, NULL, NULL),
-("B1", "pas", "imp", "Αόριστος", 'aor', NULL, 32, "----2-", NULL, NULL, NULL),
-
-("B1", "pas", "imp", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Παρατατικός"),
--- Συζυγία Β΄ - β΄ τάξη
--- Ενεργητηκή φωνή
--- Οριστική
-("B2", "act", "ind", "Ενεστώτας", 'pres', NULL, 15, "ffffff", NULL, NULL, NULL),
-("B2", "act", "ind", "Παρατατικός", 'pres', "ούσ", 2, "ssssss", NULL, NULL, NULL),
-("B2", "act", "ind", "Μέλλοντας διαρκείας", 'pres', NULL, 15, "ffffff", "θα", NULL, NULL),
-("B2", "act", "ind", "Αόριστος", 'aor', "ησ", 2, "333333", NULL, NULL, NULL),
-("B2", "act", "ind", "Παρακείμενος", 'synt', NULL, 0, NULL, NULL, "έχω", "Ενεστώτας"),
-("B2", "act", "ind", "Υπερσυντέλικος", 'synt', NULL, 0, NULL, NULL, "έχω", "Παρατατικός"),
-("B2", "act", "ind", "Συντελεσμένος μέλλοντας", 'synt', NULL, 0, NULL, "θα", "έχω", "Ενεστώτας"),
-("B2", "act", "ind", "Μέλλοντας στιγμιαίος", 'aor', "ήσ", 1, "ssssss", "θα", NULL, NULL),
--- Υποτακτική
-("B2", "act", "sub", "Ενεστώτας", 'pres', NULL, 15, "ffffff", "να", NULL, NULL),
-("B2", "act", "sub", "Αόριστος", 'aor', "ήσ", 1, "ssssss", "να", NULL, NULL),
-("B2", "act", "sub", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Ενεστώτας"),
--- Προστακτική
-("B2", "act", "imp", "Ενεστώτας", 'pres', NULL, 15, "-f----", "να", NULL, NULL),
-("B2", "act", "imp", "Ενεστώτας", 'pres', NULL, 15, "----f-", NULL, NULL, NULL),
-
-("B2", "act", "imp", "Αόριστος", 'aor', "ησ", 9, "-3--3-", NULL, NULL, NULL),
-("B2", "act", "imp", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Ενεστώτας"),
--- Μεσοπαθητική φωνή
--- Οριστική
-("B2", "pas", "ind", "Ενεστώτας", 'pres', NULL, 34, "ffffff", NULL, NULL, NULL),
-("B2", "pas", "ind", "Παρατατικός", 'pres', NULL, 35, "ffffff", NULL, NULL, NULL),
-("B2", "pas", "ind", "Μέλλοντας διαρκείας", 'pres', NULL, 34, "ffffff", "θα", NULL, NULL),
-("B2", "pas", "ind", "Αόριστος", 'aor', "ηκ", 2, "333333", NULL, NULL, NULL),
-("B2", "pas", "ind", "Παρακείμενος", 'synt', NULL, 0, NULL, NULL, "έχω", "Ενεστώτας"),
-("B2", "pas", "ind", "Υπερσυντέλικος", 'synt', NULL, 0, NULL, NULL, "έχω", "Παρατατικός"),
-("B2", "pas", "ind", "Συντελεσμένος μέλλοντας", 'synt', NULL, 0, NULL, "θα", "έχω", "Ενεστώτας"),
-("B2", "pas", "ind", "Μέλλοντας στιγμιαίος", 'aor', NULL, 15, "ffffff", "θα", NULL, NULL),
--- Υποτακτική
-("B2", "pas", "sub", "Ενεστώτας", 'pres', NULL, 34, "ffffff", "να", NULL, NULL),
-("B2", "pas", "sub", "Αόριστος", 'aor', NULL, 15, "ffffff", "να", NULL, NULL),
-("B2", "pas", "sub", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Παρατατικός"),
--- Προστακτική
-("B2", "pas", "imp", "Ενεστώτας", 'pres', NULL, 36, "-f--f-", "να", NULL, NULL),
-
-("B2", "pas", "imp", "Αόριστος", 'aor', NULL, 31, "-2----", NULL, NULL, NULL),
-("B2", "pas", "imp", "Αόριστος", 'aor', NULL, 32, "----2-", NULL, NULL, NULL),
-
-("B2", "pas", "imp", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Παρατατικός");
-
-INSERT INTO participle VALUES
--- Συζυγία Α'
--- Ενεργητηκή φωνή
-("A", "act", "Ενεστώτας", 'pres', NULL, "οντας", NULL),
-("A", "act", "Παρακείμενος", 'aor', NULL, "ει", "εχοντας"),
--- Μεσοπαθητική φωνή
-("A", "pas", "Παρακείμενος", 'root', NULL, "μένος", NULL),
--- Συζυγία Β΄ - α΄ τάξη
--- Ενεργητηκή φωνή
-("B1", "act", "Ενεστώτας", 'pres', NULL, "ώντας", NULL),
-("B1", "act", "Παρακείμενος", 'aor', NULL, "ήσει", "εχοντας"),
--- Μεσοπαθητική φωνή
-("B1", "pass", "Παρακείμενος", 'pres', "η", "μένος", NULL),
--- Συζυγία Β΄ - β΄ τάξη
--- Ενεργητηκή φωνή
-("B2", "act", "Ενεστώτας", 'pres', NULL, "ώντας", NULL),
-("B2", "act", "Παρακείμενος", 'aor', NULL, "ει", "εχοντας"),
--- Μεσοπαθητική φωνή
-("B1", "pass", "Παρακείμενος", 'pres', "η", "μένος", NULL);
-
-DROP TABLE IF EXISTS verb;
-CREATE TABLE verb(
- verb varchar(128), -- REL 10
- conj char(2), -- REL 9
- augment char(1),
- accmap char(7),
- INDEX(verb)
-);
-
-DROP TABLE IF EXISTS irregular_root;
-CREATE TABLE irregular_root(
- verb varchar(128),
- voice enum('act','pas'), -- Ενεργητηκή/Μεσοπαθητική
- thema enum('pres','aor','sub'), -- Αόριστος/Υποτακτική
- root varchar(128)
-);
-
-INSERT INTO verb VALUES
-('βρίσκω', 'A', NULL, '000000'),
-('θέλω','A','η',NULL),
-('έχω','A',NULL,NULL),
-('ξέρω','A','η',NULL)
-;
-
-INSERT INTO irregular_root VALUES
-('βρίσκω','act','aor','βρήκ'),
-('βρίσκω','act','sub','βρ'),
-('βρίσκω','pas','aor','βρέθ'),
-('βρίσκω','pas','sub','βρέθ'),
-('θέλω','act','aor','θέλησ'),
-('έχω','act', 'aor', 'είχ')
-;
-
-DROP TABLE IF EXISTS individual_verb;
-CREATE TABLE individual_verb(
- verb varchar(128),
- voice enum('act','pas'), -- Ενεργητηκή/Μεσοπαθητική
- mode enum('ind','sub','imp'),
- tense varchar(128),
- ident int(32),
- INDEX(verb,voice,mode,tense)
-);
-
-INSERT INTO individual_verb VALUES
-("είμαι", "act", "ind", "Ενεστώτας", 100),
-("είμαι", "act", "ind", "Παρατατικός", 101)
-;
+source dbverb.struct;
+ \ No newline at end of file
diff --git a/data/dbverb.struct b/data/dbverb.struct
new file mode 100644
index 0000000..4ab6a37
--- a/dev/null
+++ b/data/dbverb.struct
@@ -0,0 +1,323 @@
+set names utf8;
+DROP TABLE IF EXISTS verbflect;
+CREATE TABLE verbflect(
+ ident int(32) not null, -- REL 8
+ sing1 varchar(32),
+ sing2 varchar(32),
+ sing3 varchar(32),
+ plur1 varchar(32),
+ plur2 varchar(32),
+ plur3 varchar(32),
+ UNIQUE(ident)
+);
+
+DROP TABLE IF EXISTS conjugation;
+CREATE TABLE conjugation(
+ conj char(2), -- REL 9
+ voice enum('act','pas'), -- Ενεργητηκή/Μεσοπαθητική
+ mode enum('ind','sub','imp'),
+ tense varchar(128),
+ thema enum('pres','aor','sub','synt'), -- Ενεστώτα, Αόριστου, υποτακτικής, syntethic
+ suffix char(32),
+ flect int(32), -- REL 8
+ accmap char(7), -- accent map
+ particle char(2), -- NULL/θα/να
+ aux varchar(128), -- REL 10
+ auxtense char(32),
+ KEY (conj),
+ KEY (voice),
+ KEY (mode)
+);
+
+DROP TABLE IF EXISTS participle;
+CREATE TABLE participle (
+ conj char(2), -- REL 9
+ voice enum('act','pas'), -- Ενεργητηκή/Μεσοπαθητική
+ tense char(32),
+ thema enum('pres','aor','sub'), -- Ενεστώτα, Αόριστου, υποτακτικής
+ suffix char(32),
+ flect char(32),
+ aux varchar(128)
+);
+
+INSERT INTO verbflect VALUES
+(0, NULL, NULL, NULL, NULL, NULL, NULL),
+-- Συζυγία Α'
+(1, "ω", "εις", "ει", "ουμε", "ετε", "ουν(ε)"),
+(2, "α", "ες", "ε", "αμε", "ατε", "αν"),
+(8, NULL, "ε", NULL, NULL, "ετε", NULL),
+(9, NULL, "ε", NULL, NULL, "τε", NULL),
+(11, "ομαι", "εσαι", "εται", "όμαστε", "εστε", "ονται"),
+(12, "όμουν", "όσουν", "όταν", "όμαστε", "όμαστε", "ονταν"),
+(15, "ώ", "είς", "εί", "ούμε", "είτε", "ούν(ε)"),
+(17, NULL, "ου", NULL, NULL, NULL, NULL),
+(18, NULL, NULL, NULL, NULL, "είτε", NULL),
+-- Συζυγία Β΄ - α΄ τάξη
+(20, "ώ,άω", "άς", "ά,άει","άμε,ούμε","άτε","ούν(ε)"),
+(25, NULL, "α", NULL, NULL, "άτε", NULL),
+(28, "ιέμαι", "ιέσαι", "ιέται", "ιόμαστε", "ιέστε", "ιούνται"),
+(29, "ιόμουν", "ιόσουν", "ιόταν", "ιόμαστε", "ιόσαστε", "ιόνταν"),
+(30, NULL, "ιέσαι", NULL, NULL, "ιέσται", NULL),
+(31, NULL, "ου", NULL, NULL, NULL, NULL),
+(32, NULL, NULL, NULL, NULL, "είτε", NULL),
+-- Συζυγία Β΄ - β΄ τάξη
+(33, NULL, "είς", NULL, NULL, "είτε", NULL),
+(34, "ούμαι", "είσαι", "είται", "ούμαστε", "είστε", "ούνται"),
+(35, "ούμουν", "ούσουν", "ούvταν", "ούμαστε", "ούσαστε", "ούνταν"),
+(36, NULL, "είσαι", NULL, NULL, "είστε", NULL),
+(100, "είμαι", "είσαι", "είναι", "είμαστε", "είστε,είσαστε", "είναι"),
+(101, "ήμουν(α)", "ήσουν(α)", "ήταν(ε)", "ήμαστε,ήμασταν", "ήσαστε,ήσασταν", "ήταν(ε)"),
+(102, "θα είμαι", "θα είσαι", "θα είναι", "θα είμαστε", "θα είστε,θα είσαστε", "θα είναι"),
+(103, "να είμαι", "να είσαι", "να είναι", "να είμαστε", "να είστε,να είσαστε", "να είναι"),
+(104, NULL, "να είσαι", NULL, NULL, "να είστε", NULL),
+(105, "είχα", "είχες", "είχα", "είχαμε", "είχατε", "είχαν"),
+(106, NULL, "βρες", NULL, NULL, "βρείτε,βρεστε", NULL)
+;
+
+INSERT INTO conjugation VALUES
+-- Συζυγία Α'
+-- Ενεργητηκή φωνή
+-- Οριστική
+("A", "act", "ind", "Ενεστώτας", 'pres', NULL, 1, "000000", NULL, NULL, NULL),
+("A", "act", "ind", "Παρατατικός", 'pres', NULL, 2, "333333+", NULL, NULL, NULL),
+("A", "act", "ind", "Μέλλοντας διαρκείας", 'pres', NULL, 1, "000000", "θα", NULL, NULL),
+("A", "act", "ind", "Αόριστος", 'aor', NULL, 2, "333333+", NULL, NULL, NULL),
+("A", "act", "ind", "Παρακείμενος", 'synt', NULL, 0, NULL, NULL, "έχω", "Ενεστώτας"),
+("A", "act", "ind", "Υπερσυντέλικος", 'synt', NULL, 0, NULL, NULL, "έχω", "Παρατατικός"),
+("A", "act", "ind", "Συντελεσμένος μέλλοντας", 'synt', NULL, 0, NULL, "θα", "έχω", "Ενεστώτας"),
+("A", "act", "ind", "Μέλλοντας στιγμιαίος", 'sub', NULL, 1, "000000", "θα", NULL, NULL),
+-- Υποτακτική
+("A", "act", "sub", "Ενεστώτας", 'pres', NULL, 1, "000000", "να", NULL, NULL),
+("A", "act", "sub", "Αόριστος", 'sub', NULL, 1, "000000", "να", NULL, NULL),
+("A", "act", "sub", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Ενεστώτας"),
+-- Προστακτική
+("A", "act", "imp", "Ενεστώτας", 'pres', NULL, 8, "-3--3-", NULL, NULL, NULL),
+("A", "act", "imp", "Αόριστος", 'sub', NULL, 9, "-0--0-", NULL, NULL, NULL),
+("A", "act", "imp", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Ενεστώτας"),
+-- Μεσοπαθητική φωνή
+-- Οριστική
+("A", "pas", "ind", "Ενεστώτας", 'pres', NULL, 11, "000300", NULL, NULL, NULL),
+("A", "pas", "ind", "Παρατατικός", 'pres', NULL, 12, "222333", NULL, NULL, NULL),
+("A", "pas", "ind", "Μέλλοντας διαρκείας", 'pres', NULL, 11, "333333", "θα", NULL, NULL),
+("A", "pas", "ind", "Αόριστος", 'aor', "ηκ", 2, "333333", NULL, NULL, NULL),
+("A", "pas", "ind", "Παρακείμενος", 'synt', NULL, 0, NULL, NULL, "έχω", "Ενεστώτας"),
+("A", "pas", "ind", "Υπερσυντέλικος", 'synt', NULL, 0, NULL, NULL, "έχω", "Παρατατικός"),
+("A", "pas", "ind", "Συντελεσμένος μέλλοντας", 'synt', NULL, 0, NULL, "θα", "έχω", "Ενεστώτας"),
+("A", "pas", "ind", "Μέλλοντας στιγμιαίος", 'aor', NULL, 15, "111111", "θα", NULL, NULL),
+-- Υποτακτική
+("A", "pas", "sub", "Ενεστώτας", 'pres', NULL, 11, "333333", "να", NULL, NULL),
+("A", "pas", "sub", "Αόριστος", 'aor', NULL, 15, "111221", "να", NULL, NULL),
+("A", "pas", "sub", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Παρατατικός"),
+-- Προστακτική
+("A", "pas", "imp", "Ενεστώτας", 'pres', NULL, 11, "-3--3-", "να", NULL, NULL),
+("A", "pas", "imp", "Αόριστος", 'aor', NULL, 17, "-0----", NULL, NULL, NULL),
+("A", "pas", "imp", "Αόριστος", 'aor', NULL, 18, "----2-", NULL, NULL, NULL),
+("A", "pas", "imp", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Παρατατικός"),
+-- Συζυγία Β΄ - α΄ τάξη
+-- Ενεργητηκή φωνή
+-- Οριστική
+("B1", "act", "ind", "Ενεστώτας", 'pres', NULL, 20, "ffffff", NULL, NULL, NULL),
+("B1", "act", "ind", "Παρατατικός", 'pres', "ούς", 2, "ssssss", NULL, NULL, NULL),
+("B1", "act", "ind", "Μέλλοντας διαρκείας", 'pres', NULL, 20, "ffffff", "θα", NULL, NULL),
+("B1", "act", "ind", "Αόριστος", 'aor', "ησ", 2, "333333", NULL, NULL, NULL),
+("B1", "act", "ind", "Παρακείμενος", 'synt', NULL, 0, NULL, NULL, "έχω", "Ενεστώτας"),
+("B1", "act", "ind", "Υπερσυντέλικος", 'synt', NULL, 0, NULL, NULL, "έχω", "Παρατατικός"),
+("B1", "act", "ind", "Συντελεσμένος μέλλοντας", 'synt', NULL, 0, NULL, "θα", "έχω", "Ενεστώτας"),
+("B1", "act", "ind", "Μέλλοντας στιγμιαίος", 'aor', "ήσ", 1, "ssssss", "θα", NULL, NULL),
+-- Υποτακτική
+("B1", "act", "sub", "Ενεστώτας", 'pres', NULL, 20, "ffffff", "να", NULL, NULL),
+("B1", "act", "sub", "Αόριστος", 'aor', "ήσ", 1, "ssssss", "να", NULL, NULL),
+("B1", "act", "sub", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Ενεστώτας"),
+-- Προστακτική
+("B1", "act", "imp", "Ενεστώτας", 'pres', NULL, 25, "-0--2-", NULL, NULL, NULL),
+("B1", "act", "imp", "Αόριστος", 'aor', "ησ", 9, "-3--3-", NULL, NULL, NULL),
+("B1", "act", "imp", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Ενεστώτας"),
+-- Μεσοπαθητική φωνή
+-- Οριστική
+("B1", "pas", "ind", "Ενεστώτας", 'pres', NULL, 28, "ffffff", NULL, NULL, NULL),
+("B1", "pas", "ind", "Παρατατικός", 'pres', NULL, 29, "ffffff", NULL, NULL, NULL),
+("B1", "pas", "ind", "Μέλλοντας διαρκείας", 'pres', NULL, 28, "ffffff", "θα", NULL, NULL),
+("B1", "pas", "ind", "Αόριστος", 'aor', "ηκ", 2, "333333", NULL, NULL, NULL),
+("B1", "pas", "ind", "Παρακείμενος", 'synt', NULL, 0, NULL, NULL, "έχω", "Ενεστώτας"),
+("B1", "pas", "ind", "Υπερσυντέλικος", 'synt', NULL, 0, NULL, NULL, "έχω", "Παρατατικός"),
+("B1", "pas", "ind", "Συντελεσμένος μέλλοντας", 'synt', NULL, 0, NULL, "θα", "έχω", "Ενεστώτας"),
+("B1", "pas", "ind", "Μέλλοντας στιγμιαίος", 'aor', NULL, 15, "ffffff", "θα", NULL, NULL),
+-- Υποτακτική
+("B1", "pas", "sub", "Ενεστώτας", 'pres', NULL, 28, "ffffff", "να", NULL, NULL),
+("B1", "pas", "sub", "Αόριστος", 'aor', NULL, 15, "ffffff", "να", NULL, NULL),
+("B1", "pas", "sub", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Παρατατικός"),
+-- Προστακτική
+("B1", "pas", "imp", "Ενεστώτας", 'pres', NULL, 30, "-f--f-", "να", NULL, NULL),
+
+("B1", "pas", "imp", "Αόριστος", 'aor', NULL, 31, "-2----", NULL, NULL, NULL),
+("B1", "pas", "imp", "Αόριστος", 'aor', NULL, 32, "----2-", NULL, NULL, NULL),
+
+("B1", "pas", "imp", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Παρατατικός"),
+-- Συζυγία Β΄ - β΄ τάξη
+-- Ενεργητηκή φωνή
+-- Οριστική
+("B2", "act", "ind", "Ενεστώτας", 'pres', NULL, 15, "ffffff", NULL, NULL, NULL),
+("B2", "act", "ind", "Παρατατικός", 'pres', "ούσ", 2, "ssssss", NULL, NULL, NULL),
+("B2", "act", "ind", "Μέλλοντας διαρκείας", 'pres', NULL, 15, "ffffff", "θα", NULL, NULL),
+("B2", "act", "ind", "Αόριστος", 'aor', "ησ", 2, "333333", NULL, NULL, NULL),
+("B2", "act", "ind", "Παρακείμενος", 'synt', NULL, 0, NULL, NULL, "έχω", "Ενεστώτας"),
+("B2", "act", "ind", "Υπερσυντέλικος", 'synt', NULL, 0, NULL, NULL, "έχω", "Παρατατικός"),
+("B2", "act", "ind", "Συντελεσμένος μέλλοντας", 'synt', NULL, 0, NULL, "θα", "έχω", "Ενεστώτας"),
+("B2", "act", "ind", "Μέλλοντας στιγμιαίος", 'aor', "ήσ", 1, "ssssss", "θα", NULL, NULL),
+-- Υποτακτική
+("B2", "act", "sub", "Ενεστώτας", 'pres', NULL, 15, "ffffff", "να", NULL, NULL),
+("B2", "act", "sub", "Αόριστος", 'aor', "ήσ", 1, "ssssss", "να", NULL, NULL),
+("B2", "act", "sub", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Ενεστώτας"),
+-- Προστακτική
+("B2", "act", "imp", "Ενεστώτας", 'pres', NULL, 15, "-f----", "να", NULL, NULL),
+("B2", "act", "imp", "Ενεστώτας", 'pres', NULL, 15, "----f-", NULL, NULL, NULL),
+
+("B2", "act", "imp", "Αόριστος", 'aor', "ησ", 9, "-3--3-", NULL, NULL, NULL),
+("B2", "act", "imp", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Ενεστώτας"),
+-- Μεσοπαθητική φωνή
+-- Οριστική
+("B2", "pas", "ind", "Ενεστώτας", 'pres', NULL, 34, "ffffff", NULL, NULL, NULL),
+("B2", "pas", "ind", "Παρατατικός", 'pres', NULL, 35, "ffffff", NULL, NULL, NULL),
+("B2", "pas", "ind", "Μέλλοντας διαρκείας", 'pres', NULL, 34, "ffffff", "θα", NULL, NULL),
+("B2", "pas", "ind", "Αόριστος", 'aor', "ηκ", 2, "333333", NULL, NULL, NULL),
+("B2", "pas", "ind", "Παρακείμενος", 'synt', NULL, 0, NULL, NULL, "έχω", "Ενεστώτας"),
+("B2", "pas", "ind", "Υπερσυντέλικος", 'synt', NULL, 0, NULL, NULL, "έχω", "Παρατατικός"),
+("B2", "pas", "ind", "Συντελεσμένος μέλλοντας", 'synt', NULL, 0, NULL, "θα", "έχω", "Ενεστώτας"),
+("B2", "pas", "ind", "Μέλλοντας στιγμιαίος", 'aor', NULL, 15, "ffffff", "θα", NULL, NULL),
+-- Υποτακτική
+("B2", "pas", "sub", "Ενεστώτας", 'pres', NULL, 34, "ffffff", "να", NULL, NULL),
+("B2", "pas", "sub", "Αόριστος", 'aor', NULL, 15, "ffffff", "να", NULL, NULL),
+("B2", "pas", "sub", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Παρατατικός"),
+-- Προστακτική
+("B2", "pas", "imp", "Ενεστώτας", 'pres', NULL, 36, "-f--f-", "να", NULL, NULL),
+
+("B2", "pas", "imp", "Αόριστος", 'aor', NULL, 31, "-2----", NULL, NULL, NULL),
+("B2", "pas", "imp", "Αόριστος", 'aor', NULL, 32, "----2-", NULL, NULL, NULL),
+
+("B2", "pas", "imp", "Παρακείμενος", 'synt', NULL, 0, NULL, "να", "έχω", "Παρατατικός");
+
+INSERT INTO participle VALUES
+-- Συζυγία Α'
+-- Ενεργητηκή φωνή
+("A", "act", "Ενεστώτας", 'pres', NULL, "οντας", NULL),
+("A", "act", "Παρακείμενος", 'aor', NULL, "ει", "εχοντας"),
+-- Μεσοπαθητική φωνή
+("A", "pas", "Παρακείμενος", 'root', NULL, "μένος", NULL),
+-- Συζυγία Β΄ - α΄ τάξη
+-- Ενεργητηκή φωνή
+("B1", "act", "Ενεστώτας", 'pres', NULL, "ώντας", NULL),
+("B1", "act", "Παρακείμενος", 'aor', NULL, "ήσει", "εχοντας"),
+-- Μεσοπαθητική φωνή
+("B1", "pass", "Παρακείμενος", 'pres', "η", "μένος", NULL),
+-- Συζυγία Β΄ - β΄ τάξη
+-- Ενεργητηκή φωνή
+("B2", "act", "Ενεστώτας", 'pres', NULL, "ώντας", NULL),
+("B2", "act", "Παρακείμενος", 'aor', NULL, "ει", "εχοντας"),
+-- Μεσοπαθητική φωνή
+("B1", "pass", "Παρακείμενος", 'pres', "η", "μένος", NULL);
+
+DROP TABLE IF EXISTS verb;
+CREATE TABLE verb(
+ verb varchar(128), -- REL 10
+ conj char(2), -- REL 9
+ augment char(1),
+ accmap char(7),
+ suffix_aor_path varchar(2),
+ INDEX(verb)
+);
+
+DROP TABLE IF EXISTS irregular_root;
+CREATE TABLE irregular_root(
+ verb varchar(128),
+ voice enum('act','pas'), -- Ενεργητηκή/Μεσοπαθητική
+ thema enum('pres','aor','sub'), -- Αόριστος/Υποτακτική
+ root varchar(128)
+);
+
+INSERT INTO verb VALUES
+('βρίσκω', 'A', NULL, '000000', NULL),
+('θέλω','A','η',NULL, NULL),
+('έχω','A',NULL,'000000', NULL),
+('ξέρω','A','η',NULL, NULL),
+('κρεμάω','B1',NULL,NULL,"ασ"),
+('κρεμώ','B1',NULL,NULL,"ασ"),
+('κιτάω','B1',NULL,NULL,"αξ"),
+('κιτώ','B1',NULL,NULL,"αξ"),
+('τραβάω','B1',NULL,NULL,"ηξ"),
+('τραβώ','B1',NULL,NULL,"ηξ"),
+('νικώ','B1',NULL,NULL,NULL)
+;
+
+INSERT INTO irregular_root VALUES
+('βρίσκω','act','aor','βρήκ'),
+('βρίσκω','act','sub','βρ'),
+('βρίσκω','pas','aor','βρέθ'),
+('βρίσκω','pas','sub','βρέθ'),
+('θέλω','act','aor','θέλησ')
+;
+
+DROP TABLE IF EXISTS individual_verb;
+CREATE TABLE individual_verb(
+ verb varchar(128),
+ voice enum('act','pas'), -- Ενεργητηκή/Μεσοπαθητική
+ mode enum('ind','sub','imp'),
+ tense varchar(128),
+ ident int(32),
+ INDEX(verb,voice,mode,tense)
+);
+
+INSERT INTO individual_verb VALUES
+("είμαι", "act", "ind", "Ενεστώτας", 100),
+("είμαι", "act", "ind", "Παρατατικός", 101),
+("είμαι", "act", "ind", "Μέλλοντας διαρκείας", 102),
+("είμαι", "act", "ind", "Αόριστος", 0),
+("είμαι", "act", "ind", "Παρακείμενος", 0),
+("είμαι", "act", "ind", "Υπερσυντέλικος", 0),
+("είμαι", "act", "ind", "Συντελεσμένος μέλλοντας", 0),
+("είμαι", "act", "ind", "Μέλλοντας στιγμιαίος", 0),
+("είμαι", "act", "sub", "Ενεστώτας", 103),
+("είμαι", "act", "sub", "Αόριστος", 0),
+("είμαι", "act", "sub", "Παρακείμενος", 0),
+("είμαι", "act", "imp", "Ενεστώτας", 104),
+("είμαι", "act", "imp", "Αόριστος", 0),
+("είμαι", "act", "imp", "Παρακείμενος", 0),
+("είμαι", "pas", "ind", "Ενεστώτας", 0),
+("είμαι", "pas", "ind", "Παρατατικός", 0),
+("είμαι", "pas", "ind", "Μέλλοντας διαρκείας", 0),
+("είμαι", "pas", "ind", "Αόριστος", 0),
+("είμαι", "pas", "ind", "Παρακείμενος", 0),
+("είμαι", "pas", "ind", "Υπερσυντέλικος", 0),
+("είμαι", "pas", "ind", "Συντελεσμένος μέλλοντας", 0),
+("είμαι", "pas", "ind", "Μέλλοντας στιγμιαίος", 0),
+("είμαι", "pas", "sub", "Ενεστώτας", 0),
+("είμαι", "pas", "sub", "Αόριστος", 0),
+("είμαι", "pas", "sub", "Παρακείμενος", 0),
+("είμαι", "pas", "imp", "Ενεστώτας", 0),
+("είμαι", "pas", "imp", "Αόριστος", 0),
+("είμαι", "pas", "imp", "Παρακείμενος", 0),
+
+("έχω", "act", "ind", "Παρατατικός", 105),
+("έχω", "act", "ind", "Αόριστος", 0),
+("έχω", "act", "ind", "Παρακείμενος", 0),
+("έχω", "act", "ind", "Υπερσυντέλικος", 0),
+("έχω", "act", "ind", "Συντελεσμένος μέλλοντας", 0),
+("έχω", "act", "ind", "Μέλλοντας στιγμιαίος", 0),
+("έχω", "act", "sub", "Αόριστος", 0),
+("έχω", "act", "sub", "Παρακείμενος", 0),
+("έχω", "act", "imp", "Αόριστος", 0),
+("έχω", "act", "imp", "Παρακείμενος", 0),
+("έχω", "pas", "ind", "Παρατατικός", 0),
+("έχω", "pas", "ind", "Μέλλοντας διαρκείας", 0),
+("έχω", "pas", "ind", "Αόριστος", 0),
+("έχω", "pas", "ind", "Παρακείμενος", 0),
+("έχω", "pas", "ind", "Υπερσυντέλικος", 0),
+("έχω", "pas", "ind", "Συντελεσμένος μέλλοντας", 0),
+("έχω", "pas", "ind", "Μέλλοντας στιγμιαίος", 0),
+("έχω", "pas", "sub", "Ενεστώτας", 0),
+("έχω", "pas", "sub", "Αόριστος", 0),
+("έχω", "pas", "sub", "Παρακείμενος", 0),
+("έχω", "pas", "imp", "Ενεστώτας", 0),
+("έχω", "pas", "imp", "Αόριστος", 0),
+("έχω", "pas", "imp", "Παρακείμενος", 0),
+("βρίσκω", "act", "imp", "Αόριστος", 106)
+;
diff --git a/scm/conjugator.scm b/scm/conjugator.scm
index 99f5189..4f1eccd 100644
--- a/scm/conjugator.scm
+++ b/scm/conjugator.scm
@@ -47,49 +47,137 @@
(apply format (current-error-port) fmt fmtargs))
(define (guess-verb-info verb)
- (let ((elverb (string->elstr verb)))
+ (let ((elverb (force-elstr verb)))
(cond
+ ;; FIXME
+ ((elstr-suffix? elverb "άω")
+ (list "B1"
+ #f
+ #f
+ "ησ"
+ #f
+ #f))
+ ((elstr-suffix? elverb "ώ")
+ (list "B2"
+ #f
+ #f
+ "ησ"
+ #f
+ #f))
(else
- (let ((root (elstr-trim elverb -1)))
- (list "A"
- #f
- "ε"
- #f))))))
+ (list "A"
+ #f
+ "ε"
+ #f
+ #f
+ #f)))))
-(define (get-verb-info verb)
- (let ((conn (dict-connect)))
+(define (get-verb-info verb . rest)
+ (let ((conn (dict-connect))
+ (class (if (null? rest)
+ ""
+ (string-append " AND conj='" (car rest) "'"))))
(let ((vdb (my-sql-query
conn
(string-append
- "SELECT conj,accmap,augment FROM verb \
-WHERE verb='" verb "'"))))
- (if (null? vdb)
- (guess-verb-info verb)
- (let ((x (car vdb)))
- (list
- (list-ref x 0)
- (list-ref x 1)
- (or (list-ref x 2) "ε")
- #f))))))
+ "SELECT conj,accmap,augment,suffix_aor_path FROM verb \
+WHERE verb='" (force-string verb) "'"
+ class))))
+ (cond
+ ((and vdb (not (null? vdb)))
+ (let ((x (car vdb)))
+ (list
+ (list-ref x 0)
+ (list-ref x 1)
+ (or (list-ref x 2) "ε")
+ (list-ref x 3)
+ #f
+ '(class))))
+ ((elstr-suffix? (force-elstr verb) "άω")
+ (get-verb-info (elstr-append
+ (elstr-trim (force-elstr verb) -2) "ώ") "B1"))
+ (else
+ (guess-verb-info verb))))))
+(define (thema-aoristoy-mesapathitikis root)
+ (cond
+ ((elstr-suffix? root "αίν")
+ (elstr-append (elstr-trim root -3) "ανθ")) ;; FIXME: Also αθ, ηθ
+ ((and
+ (elstr-suffix? root "ν")
+ (logand (elstr-char-prop-bitmask root -2) elmorph:vowel))
+ (elstr-append (elstr-trim root -1) "θ")) ;; FIXME: also στ, νθ, θ
+ ((and
+ (elstr-suffix? root "δ" "θ" "ζ" "ν") ;; FIXME: see above
+ (logand (elstr-char-prop-bitmask root -2) elmorph:vowel))
+ (elstr-append (elstr-trim root -1) "στ"))
+ ((elstr-suffix? root "γγ" "σσ" "ττ" "χν" "γ" "ζ" "κ" "χ") =>
+ (lambda (suf)
+ (elstr-append (elstr-trim root (- 0 (elstr-length (string->elstr suf))))
+ "χτ"))) ;; also χθ
+ ((elstr-suffix? root "π" "β" "φ" "πτ" "φτ") =>
+ (lambda (suf)
+ (elstr-append (elstr-trim root (- 0 (elstr-length (string->elstr suf))))
+ "φτ"))) ;; also φθ
+ ((elstr-suffix? root "αύ" "εύ") =>
+ (lambda (suf)
+ (elstr-append root "τ")))
+ ((elstr-suffix? root "άρ" "ίρ")
+ ((elstr-append root "ιστ")))
+ ((logand (elstr-char-prop-bitmask root -1) elmorph:vowel)
+ (elstr-append root "θ"))
+ (else
+ #f)))
+
(define (complement-verb-info vinfo verb voice thema)
; (format #t "COMPLEMENT ~S~%" thema)
- (let ((result (my-sql-query
+ (let ((elverb (string->elstr verb))
+ (result (my-sql-query
(dict-connect)
(string-append
"SELECT root FROM irregular_root \
WHERE verb='" verb "' AND voice='" voice "' AND thema='" thema "'"))))
- (list-set! vinfo 3
- (if (not (null? result))
- (caar result)
- (let ((root (elstr-trim (string->elstr verb) -1)))
- (cond
- ((string=? thema "pres")
- root)
- ((or (string=? thema "aor") (string=? thema "sub"))
- (elstr-thema-aoristoy root))
- (else
- #f)))))))
+ (verb-info-set! #:root vinfo
+ (cond
+ ((not (null? result))
+ (verb-info-set! #:attested vinfo 'root)
+ (caar result))
+ ((string=? (verb-info #:conj vinfo) "A")
+ (let ((root (elstr-trim elverb -1)))
+ (cond
+ ((string=? thema "pres")
+ (verb-info-set! #:attested vinfo 'root)
+ root)
+ ((or (string=? thema "aor") (string=? thema "sub"))
+ (if (string=? voice "act")
+ (elstr-thema-aoristoy root)
+ (thema-aoristoy-mesapathitikis root)))
+ (else
+ #f))))
+ ((string=? (verb-info #:conj vinfo) "B1")
+ (let ((root (if (elstr-suffix? elverb "άω")
+ (elstr-trim elverb -2)
+ (elstr-trim elverb -1))))
+ (cond
+ ((or (string=? voice "act") (string=? thema "pres"))
+ (verb-info-set! #:attested vinfo 'root)
+ root)
+ ((or (string=? thema "aor") (string=? thema "sub"))
+ (elstr-append root "ηθ")) ;; FIXME: guesswork
+ (else
+ #f))))
+ ((string=? (verb-info #:conj vinfo) "B2")
+ (let ((root (elstr-trim elverb -1)))
+ (cond
+ ((or (string=? voice "act") (string=? thema "pres"))
+ (verb-info-set! #:attested vinfo 'root)
+ root)
+ ((or (string=? thema "aor") (string=? thema "sub"))
+ (elstr-append root "ηθ")) ;; FIXME: guesswork
+ (else
+ #f))))
+ (else
+ #f)))))
(define-syntax verb-info
(syntax-rules ()
@@ -99,8 +187,31 @@ WHERE verb='" verb "' AND voice='" voice "' AND thema='" thema "'"))))
(list-ref v 1))
((verb-info #:augment v)
(list-ref v 2))
+ ((verb-info #:suffix v)
+ (list-ref v 3))
((verb-info #:root v)
- (list-ref v 3))))
+ (list-ref v 4))
+ ((verb-info #:attested v)
+ (list-ref v 5))))
+
+(define-syntax verb-info-set!
+ (syntax-rules ()
+ ((verb-info-set! #:root v val)
+ (list-set! v 4 val))
+ ((verb-info-set! #:attested v val)
+ (list-set! v 5
+ (if (not val)
+ val
+ (let ((oldval (list-ref v 5)))
+ (cond
+ ((not oldval)
+ (list val))
+ ((boolean? oldval)
+ (list val))
+ ((member val oldval)
+ oldval)
+ (else
+ (cons val oldval)))))))))
(define-syntax conj-info
(syntax-rules ()
@@ -130,7 +241,12 @@ WHERE verb='" verb "' AND voice='" voice "' AND thema='" thema "'"))))
(list-ref v 11))
((conj-info #:plur 1 v)
(list-ref v 12))))
-
+
+(define-syntax conj-info-set!
+ (syntax-rules ()
+ ((conj-info-set! #:particle v val)
+ (list-set! v 3 val))))
+
(define (get-conj-info conj voice mode tense)
(let ((conn (dict-connect)))
(let ((answer (my-sql-query
@@ -157,7 +273,10 @@ WHERE c.conj='" conj "' AND c.voice='" voice "' AND c.mode='" mode
(define (apply-flect conj vinfo)
(let ((root (verb-info #:root vinfo))
- (suffix (or (conj-info #:suffix conj) ""))
+ (suffix (let ((s (conj-info #:suffix conj)))
+ (if s
+ (or (verb-info #:suffix vinfo) s)
+ "")))
(accmap (string->list (or (verb-info #:accmap vinfo)
(conj-info #:accmap conj)
"000000")))
@@ -171,6 +290,7 @@ WHERE c.conj='" conj "' AND c.voice='" voice "' AND c.mode='" mode
(map
(lambda (flect acc)
(cond
+ ((not flect) #f)
((char=? acc #\0)
(let* ((rs (force-elstr root))
(suf (elstr-deaccent (elstr-append suffix flect)))
@@ -218,7 +338,7 @@ WHERE c.conj='" conj "' AND c.voice='" voice "' AND c.mode='" mode
(string-append
(conj-info #:particle conj) " " (force-string w))))
forms)
- forms))))
+ (map force-string forms)))))
(define (individual-verb verb voice mode tense)
(let ((res (my-sql-query
@@ -229,7 +349,9 @@ FROM individual_verb i,verbflect f \
WHERE i.verb='" verb "' AND i.voice='" voice "' AND i.mode='" mode
"' AND i.tense = '" tense "' AND i.ident=f.ident"))))
(if (not (null? res))
- (car res)
+ (append (car res)
+ (list "I"
+ '(class root)))
#f)))
(define (conjugate verb voice mode tense . rest)
@@ -244,24 +366,46 @@ WHERE i.verb='" verb "' AND i.voice='" voice "' AND i.mode='" mode
(error "cannot obtain conjugation information for "
(verb-info #:conj vinfo) voice mode tense))
(if (member #:nopart rest)
- (list-set! conj 3 #f))
+ (conj-info-set! #:particle conj #f))
(cond
((string=? (conj-info #:thema conj) "synt")
- (let ((form (list-ref
- (conjugate verb "act" "sub" "Αόριστος" #:nopart) 2))
- (part (conj-info #:particle conj)))
- (map
- (lambda (aux)
- (elstr->string
- (if part
- (elstr-append part " " aux " " form)
- (elstr-append aux " " form))))
- (conjugate (conj-info #:aux conj) "act" "ind"
- (conj-info #:auxtense conj))) ))
+ (let* ((verb-conj (conjugate verb "act" "sub" "Αόριστος" #:nopart))
+ (form (list-ref verb-conj 2))
+ (part (conj-info #:particle conj)))
+ (append
+ (map
+ (lambda (aux)
+ (elstr->string
+ (if part
+ (elstr-append part " " aux " " form)
+ (elstr-append aux " " form))))
+ (conjugation:table (conjugate (conj-info #:aux conj) "act" "ind"
+ (conj-info #:auxtense conj))))
+ (list (verb-info #:conj vinfo)
+ (conjugation:attested verb-conj)))))
(else
; (format #t "CONJ ~S~%" conj)
(complement-verb-info vinfo verb voice (conj-info #:thema conj))
- (apply-flect conj vinfo)))))))
+ (append (apply-flect conj vinfo)
+ (list (verb-info #:conj vinfo)
+ (verb-info #:attested vinfo)))))))))
+
+(define (conjugation:table conj)
+ (list-head conj 6))
+(define (conjugation:class conj)
+ (list-ref conj 6))
+(define (conjugation:attested conj)
+ (list-ref conj 7))
+
+(define (empty-conjugation? conj)
+ (call-with-current-continuation
+ (lambda (return)
+ (for-each
+ (lambda (x)
+ (if x
+ (return #f)))
+ conj)
+ (return #t))))
;;
;(display (verb-info "βρίσκω"))
@@ -269,18 +413,54 @@ WHERE i.verb='" verb "' AND i.voice='" voice "' AND i.mode='" mode
;(display (verb-info "ανοίγω"))
;(newline)
+(define transtab
+ '(("act" . "Ενεργητηκή φωνή")
+ ("pas" . "Μεσοπαθητική φωνή")
+ ("ind" . "Οριστική")
+ ("sub" . "Υποτακτική")
+ ("imp" . "Προστακτική")))
+
+(define (term x)
+ (or (assoc-ref transtab x) x))
+
(define (test-conjugation verb voice mode tense)
- (format #t "~A ~A ~A ~A: " verb voice mode tense)
- (display (map force-string (conjugate verb voice mode tense)))
+ (format #t "~A ~A/~A/~A: " verb (term voice) (term mode) tense)
+ (let* ((result (conjugate verb voice mode tense))
+ (conj (conjugation:table result)))
+ (cond
+ ((empty-conjugation? conj)
+ (display "#f"))
+ (else
+ (let ((att (conjugation:attested result)))
+ (cond
+ ((not att)
+ (display "*"))
+ (else
+ (if (not (member 'class att))
+ (display "*"))
+ (if (not (member 'root att))
+ (display "!"))))
+ (display conj)))))
(newline)
(gc))
(test-conjugation "είμαι" "act" "ind" "Ενεστώτας")
(test-conjugation "είμαι" "act" "ind" "Παρατατίκος")
(test-conjugation "είμαι" "act" "ind" "Μέλλοντας διαρκείας")
+(test-conjugation "είμαι" "act" "sub" "Ενεστώτας")
+(test-conjugation "είμαι" "act" "imp" "Ενεστώτας")
+(test-conjugation "είμαι" "act" "ind" "Αόριστος")
+
(test-conjugation "έχω" "act" "ind" "Ενεστώτας")
+(test-conjugation "έχω" "act" "ind" "Παρατατίκος")
+(test-conjugation "έχω" "act" "ind" "Μέλλοντας διαρκείας")
+(test-conjugation "έχω" "act" "sub" "Ενεστώτας")
+(test-conjugation "έχω" "act" "imp" "Ενεστώτας")
+(test-conjugation "έχω" "act" "imp" "Αόριστος")
+
(test-conjugation "ανοίγω" "act" "ind" "Ενεστώτας")
(test-conjugation "ανοίγω" "act" "ind" "Αόριστος")
+(test-conjugation "ανοίγω" "pas" "ind" "Αόριστος")
(test-conjugation "δένω" "act" "ind" "Αόριστος")
(test-conjugation "θέλω" "act" "ind" "Αόριστος")
(test-conjugation "θέλω" "act" "ind" "Παρατατικός")
@@ -292,5 +472,14 @@ WHERE i.verb='" verb "' AND i.voice='" voice "' AND i.mode='" mode
(test-conjugation "βρίσκω" "act" "sub" "Αόριστος")
(test-conjugation "βρίσκω" "act" "ind" "Παρακείμενος")
(test-conjugation "βρίσκω" "act" "sub" "Παρακείμενος")
+(test-conjugation "βρίσκω" "act" "imp" "Αόριστος")
+(test-conjugation "νικάω" "act" "ind" "Ενεστώτας")
+(test-conjugation "νικάω" "act" "ind" "Αόριστος")
+(test-conjugation "νικώ" "act" "ind" "Ενεστώτας")
+(test-conjugation "νικώ" "act" "ind" "Αόριστος")
+(test-conjugation "νικώ" "pas" "ind" "Αόριστος")
+(test-conjugation "κρεμάω" "act" "ind" "Αόριστος")
+(test-conjugation "κιτάω" "act" "ind" "Αόριστος")
+(test-conjugation "τραβάω" "act" "ind" "Αόριστος")
(newline)
diff --git a/src/ellinika/elmorph.c b/src/ellinika/elmorph.c
index faeeb49..5785f8d 100644
--- a/src/ellinika/elmorph.c
+++ b/src/ellinika/elmorph.c
@@ -596,12 +596,14 @@ SCM_DEFINE_PUBLIC(scm_elstr_char_prop_bitmask, "elstr-char-prop-bitmask",
#define FUNC_NAME s_scm_elstr_char_prop_bitmask
{
struct elstr *elstr;
- unsigned num;
+ int num;
SCM_ASSERT(scm_is_elstr(el), el, SCM_ARG1, FUNC_NAME);
SCM_ASSERT(scm_is_integer(n), n, SCM_ARG2, FUNC_NAME);
elstr = (struct elstr*) SCM_CDR(el);
- num = scm_to_uint(n);
+ num = scm_to_int(n);
+ if (num < 0)
+ num += elstr->len;
if (num >= elstr->len)
scm_misc_error(FUNC_NAME,
"cannot get character #~S: not enough characters: ~S",
@@ -812,6 +814,51 @@ SCM_DEFINE_PUBLIC(scm_elstr_index, "elstr-index",
}
#undef FUNC_NAME
+static int
+_suffix_matches(struct elstr *elstr, SCM suffix, int arg, const char *func_name)
+{
+ struct elstr *ep;
+
+ if (scm_is_elstr(suffix)) {
+ ep = (struct elstr*) SCM_CDR(suffix);
+ } else {
+ SCM scm;
+ char *str;
+
+ SCM_ASSERT(scm_is_string(suffix), suffix, arg, func_name);
+ str = scm_to_locale_string(suffix);
+ scm = _elstr_alloc(str, 0);
+ free(str);
+ ep = (struct elstr*) SCM_CDR(scm);
+ }
+ return (ep->len < elstr->len &&
+ memcmp(elstr->str + elstr->len - ep->len,
+ ep->str,
+ ep->len * sizeof(elstr->str[0])) == 0);
+}
+
+SCM_DEFINE_PUBLIC(scm_elstr_suffix_p, "elstr-suffix?",
+ 2, 0, 1,
+ (SCM word, SCM suffix, SCM rest),
+"Return #t if WORDS ends with SUFFIX")
+#define FUNC_NAME s_scm_elstr_suffix_p
+{
+ struct elstr *elstr;
+
+ SCM_ASSERT(scm_is_elstr(word), word, SCM_ARG1, FUNC_NAME);
+ elstr = (struct elstr*) SCM_CDR(word);
+ if (_suffix_matches(elstr, suffix, SCM_ARG2, FUNC_NAME))
+ return suffix;
+
+ for (; !scm_is_null(rest); rest = SCM_CDR(rest)) {
+ SCM val = SCM_CAR(rest);
+ if (_suffix_matches(elstr, val, SCM_ARGn, FUNC_NAME))
+ return val;
+ }
+ return SCM_BOOL_F;
+}
+#undef FUNC_NAME
+
SCM_DEFINE_PUBLIC(scm_elstr_append, "elstr-append",
0, 0, 1,
(SCM rest),
diff --git a/xml/pl/rhmata.xml b/xml/pl/rhmata.xml
index 1484ac6..10b9978 100644
--- a/xml/pl/rhmata.xml
+++ b/xml/pl/rhmata.xml
@@ -1511,7 +1511,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>εγώ</ITEM>
- <ITEM>ντύθ-ηκα</ITEM>
+ <ITEM>ντύθ-ηκ-α</ITEM>
<ITEM>έχω ντυθ-εί</ITEM>
<ITEM>είχα ντυθ-εί</ITEM>
<ITEM>θα έχω ντυθ-εί</ITEM>
@@ -1519,7 +1519,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
- <ITEM>ντύθ-ηκες</ITEM>
+ <ITEM>ντύθ-ηκ-ες</ITEM>
<ITEM>έχεις ντυθ-εί</ITEM>
<ITEM>είχες ντυθ-εί</ITEM>
<ITEM>θα έχεις ντυθ-εί</ITEM>
@@ -1527,7 +1527,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
- <ITEM>ντύθ-ηκε</ITEM>
+ <ITEM>ντύθ-ηκ-ε</ITEM>
<ITEM>έχει ντυθ-εί</ITEM>
<ITEM>είχε ντυθ-εί</ITEM>
<ITEM>θα έχει ντυθ-εί</ITEM>
@@ -1535,7 +1535,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
- <ITEM>ντυθ-ήκαμε</ITEM>
+ <ITEM>ντυθ-ήκ-αμε</ITEM>
<ITEM>έχουμε ντυθ-εί</ITEM>
<ITEM>είχαμε ντυθ-εί</ITEM>
<ITEM>θα έχουμε ντυθ-εί</ITEM>
@@ -1543,7 +1543,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
- <ITEM>ντύθ-ήκατε</ITEM>
+ <ITEM>ντύθ-ήκ-ατε</ITEM>
<ITEM>έχετε ντυθ-εί</ITEM>
<ITEM>είχατε ντυθ-εί</ITEM>
<ITEM>θα έχετε ντυθ-εί</ITEM>
@@ -1551,7 +1551,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
- <ITEM>ντύθ-ηκαν(ε)</ITEM>
+ <ITEM>ντύθ-ηκ-αν(ε)</ITEM>
<ITEM>έχουν ντυθ-εί</ITEM>
<ITEM>είχαν ντυθ-εί</ITEM>
<ITEM>θα έχουν ντυθ-εί</ITEM>
@@ -1669,37 +1669,37 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
<ROW>
<ITEM>εγώ</ITEM>
<ITEM>νικ-ώ, νικ-άω</ITEM>
- <ITEM>νικ-ούσα</ITEM>
+ <ITEM>νικ-ούσ-α</ITEM>
<ITEM>θα νικ-ώ, θα νικ-άω</ITEM>
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>νικ-άς</ITEM>
- <ITEM>νικ-ούσες</ITEM>
+ <ITEM>νικ-ούσ-ες</ITEM>
<ITEM>θα νικ-άς</ITEM>
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
<ITEM>νικ-ά, νικ-άει</ITEM>
- <ITEM>νικ-ούσε</ITEM>
+ <ITEM>νικ-ούσ-ε</ITEM>
<ITEM>θα νικ-ά, θα νικ-άει</ITEM>
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
<ITEM>νικ-άμε, νικ-ούμε</ITEM>
- <ITEM>νικ-ούσαμε</ITEM>
+ <ITEM>νικ-ούσ-αμε</ITEM>
<ITEM>θα νικ-άμε, θα νικ-ούμε</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>νικ-άτε</ITEM>
- <ITEM>νικ-ούσατε</ITEM>
+ <ITEM>νικ-ούσ-ατε</ITEM>
<ITEM>θα νικ-άτε</ITEM>
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
<ITEM>νικ-ούν(ε)</ITEM>
- <ITEM>νικ-ούσαν(ε)</ITEM>
+ <ITEM>νικ-ούσ-αν(ε)</ITEM>
<ITEM>θα νικ-ούν(ε)</ITEM>
</ROW>
@@ -1716,50 +1716,50 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>εγώ</ITEM>
- <ITEM>νίκ-ησα</ITEM>
- <ITEM>έχω νικ-ήσει</ITEM>
- <ITEM>είχα νικ-ήσει</ITEM>
- <ITEM>θα έχω νικ-ήσει</ITEM>
- <ITEM>θα νικ-ήσω</ITEM>
+ <ITEM>νίκ-ησ-α</ITEM>
+ <ITEM>έχω νικ-ήσ-ει</ITEM>
+ <ITEM>είχα νικ-ήσ-ει</ITEM>
+ <ITEM>θα έχω νικ-ήσ-ει</ITEM>
+ <ITEM>θα νικ-ήσ-ω</ITEM>
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
- <ITEM>νίκ-ησες</ITEM>
- <ITEM>έχεις νικ-ήσει</ITEM>
- <ITEM>είχες νικ-ήσει</ITEM>
- <ITEM>θα έχεις νικ-ήσει</ITEM>
- <ITEM>θα νικ-ήσεις</ITEM>
+ <ITEM>νίκ-ησ-ες</ITEM>
+ <ITEM>έχεις νικ-ήσ-ει</ITEM>
+ <ITEM>είχες νικ-ήσ-ει</ITEM>
+ <ITEM>θα έχεις νικ-ήσ-ει</ITEM>
+ <ITEM>θα νικ-ήσ-εις</ITEM>
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
- <ITEM>νίκ-ησε</ITEM>
- <ITEM>έχει νικ-ήσει</ITEM>
- <ITEM>είχε νικ-ήσει</ITEM>
- <ITEM>θα έχει νικ-ήσει</ITEM>
- <ITEM>θα νικ-ήσει</ITEM>
+ <ITEM>νίκ-ησ-ε</ITEM>
+ <ITEM>έχει νικ-ήσ-ει</ITEM>
+ <ITEM>είχε νικ-ήσ-ει</ITEM>
+ <ITEM>θα έχει νικ-ήσ-ει</ITEM>
+ <ITEM>θα νικ-ήσ-ει</ITEM>
</ROW> <ROW>
<ITEM>εμείς</ITEM>
- <ITEM>νικ-ήσαμε</ITEM>
- <ITEM>έχουμε νικ-ήσει</ITEM>
- <ITEM>είχαμε νικ-ήσει</ITEM>
- <ITEM>θα έχουμε νικ-ήσει</ITEM>
- <ITEM>θα νικ-ήσουμε</ITEM>
+ <ITEM>νικ-ήσ-αμε</ITEM>
+ <ITEM>έχουμε νικ-ήσ-ει</ITEM>
+ <ITEM>είχαμε νικ-ήσ-ει</ITEM>
+ <ITEM>θα έχουμε νικ-ήσ-ει</ITEM>
+ <ITEM>θα νικ-ήσ-ουμε</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
- <ITEM>νικ-ήσατε</ITEM>
- <ITEM>έχετε νικ-ήσει</ITEM>
- <ITEM>είχατε νικ-ήσει</ITEM>
- <ITEM>θα έχετε νικ-ήσει</ITEM>
- <ITEM>θα νικ-ήσετε</ITEM>
+ <ITEM>νικ-ήσ-ατε</ITEM>
+ <ITEM>έχετε νικ-ήσ-ει</ITEM>
+ <ITEM>είχατε νικ-ήσ-ει</ITEM>
+ <ITEM>θα έχετε νικ-ήσ-ει</ITEM>
+ <ITEM>θα νικ-ήσ-ετε</ITEM>
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
- <ITEM>νίκ-ησαν</ITEM>
- <ITEM>έχουν νικ-ήσει</ITEM>
- <ITEM>είχαν νικ-ήσει</ITEM>
- <ITEM>θα έχουν νικ-ήσει</ITEM>
- <ITEM>θα νικ-ήσουν</ITEM>
+ <ITEM>νίκ-ησ-αν</ITEM>
+ <ITEM>έχουν νικ-ήσ-ει</ITEM>
+ <ITEM>είχαν νικ-ήσ-ει</ITEM>
+ <ITEM>θα έχουν νικ-ήσ-ει</ITEM>
+ <ITEM>θα νικ-ήσ-ουν</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -1777,38 +1777,38 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
<ROW>
<ITEM>εγώ</ITEM>
<ITEM>να νικ-ώ, να νικ-άω</ITEM>
- <ITEM>να νικ-ήσω</ITEM>
- <ITEM>να έχω νικ-ήσει</ITEM>
+ <ITEM>να νικ-ήσ-ω</ITEM>
+ <ITEM>να έχω νικ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>να νικ-άς</ITEM>
- <ITEM>να νικ-ήσεις</ITEM>
- <ITEM>να έχεις νικ-ήσει</ITEM>
+ <ITEM>να νικ-ήσ-εις</ITEM>
+ <ITEM>να έχεις νικ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
<ITEM>να νικ-ά, να νικ-άει</ITEM>
- <ITEM>να νικ-ήσει</ITEM>
- <ITEM>να έχει νικ-ήσει</ITEM>
+ <ITEM>να νικ-ήσ-ει</ITEM>
+ <ITEM>να έχει νικ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
<ITEM>να νικ-άμε, να νικ-ούμε</ITEM>
- <ITEM>να νικ-ήσουμε</ITEM>
- <ITEM>να έχουμε νικ-ήσει</ITEM>
+ <ITEM>να νικ-ήσ-ουμε</ITEM>
+ <ITEM>να έχουμε νικ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>να νικ-άτε</ITEM>
- <ITEM>να νικ-ήσετε</ITEM>
- <ITEM>να έχετε νικ-ήσει</ITEM>
+ <ITEM>να νικ-ήσ-ετε</ITEM>
+ <ITEM>να έχετε νικ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
<ITEM>να νικ-ούν, να νικ-άνε</ITEM>
- <ITEM>να νικ-ήσουν</ITEM>
- <ITEM>να έχουν νικ-ήσει</ITEM>
+ <ITEM>να νικ-ήσ-ουν</ITEM>
+ <ITEM>να έχουν νικ-ήσ-ει</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -1826,14 +1826,14 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>νίκ-α</ITEM>
- <ITEM>νίκ-ησε</ITEM>
- <ITEM>να έχεις νικ-ήσει</ITEM>
+ <ITEM>νίκ-ησ-ε</ITEM>
+ <ITEM>να έχεις νικ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>νικ-άτε</ITEM>
- <ITEM>νικ-ήστε</ITEM>
- <ITEM>να έχετε νικ-ήσει</ITEM>
+ <ITEM>νικ-ήσ-τε</ITEM>
+ <ITEM>να έχετε νικ-ήσ-ει</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -1847,7 +1847,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>νικ-ώντας</ITEM>
- <ITEM>έχοντας νικ-ήσει</ITEM>
+ <ITEM>έχοντας νικ-ήσ-ει</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -1915,7 +1915,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>εγώ</ITEM>
- <ITEM>νικήθ-ηκα</ITEM>
+ <ITEM>νικήθ-ηκ-α</ITEM>
<ITEM>έχω νικηθ-εί</ITEM>
<ITEM>είχα νικηθ-εί</ITEM>
<ITEM>θα έχω νικηθ-εί</ITEM>
@@ -1923,7 +1923,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
- <ITEM>νικήθ-ηκες</ITEM>
+ <ITEM>νικήθ-ηκ-ες</ITEM>
<ITEM>έχεις νικηθ-εί</ITEM>
<ITEM>είχες νικηθ-εί</ITEM>
<ITEM>θα έχεις νικηθ-εί</ITEM>
@@ -1931,14 +1931,14 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
- <ITEM>νικήθ-ηκε</ITEM>
+ <ITEM>νικήθ-ηκ-ε</ITEM>
<ITEM>έχει νικηθ-εί</ITEM>
<ITEM>είχε νικηθ-εί</ITEM>
<ITEM>θα έχει νικηθ-εί</ITEM>
<ITEM>θα νικηθ-εί</ITEM>
</ROW> <ROW>
<ITEM>εμείς</ITEM>
- <ITEM>νικηθ-ήκαμε</ITEM>
+ <ITEM>νικηθ-ήκ-αμε</ITEM>
<ITEM>έχουμε νικηθ-εί</ITEM>
<ITEM>είχαμε νικηθ-εί</ITEM>
<ITEM>θα έχουμε νικηθ-εί</ITEM>
@@ -1946,7 +1946,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
- <ITEM>νικηθ-ήκατε</ITEM>
+ <ITEM>νικηθ-ήκ-ατε</ITEM>
<ITEM>έχετε νικηθ-εί</ITEM>
<ITEM>είχατε νικηθ-εί</ITEM>
<ITEM>θα έχετε νικηθ-εί</ITEM>
@@ -1954,7 +1954,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
- <ITEM>νικήθ-ηκαν</ITEM>
+ <ITEM>νικήθ-ηκ-αν</ITEM>
<ITEM>έχουν νικηθ-εί</ITEM>
<ITEM>είχαν νικηθ-εί</ITEM>
<ITEM>θα έχουν νικηθ-εί</ITEM>
@@ -2025,7 +2025,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>να νικ-ιέσαι</ITEM>
- <ITEM>νικήσ-ου</ITEM>
+ <ITEM>νικ-ήσ-ου</ITEM>
<ITEM>να έχεις νικηθ-εί</ITEM>
</ROW>
<ROW>
@@ -2073,37 +2073,37 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
<ROW>
<ITEM>εγώ</ITEM>
<ITEM>θεωρ-ώ</ITEM>
- <ITEM>θεωρ-ούσα</ITEM>
+ <ITEM>θεωρ-ούσ-α</ITEM>
<ITEM>θα θεωρ-ώ</ITEM>
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>θεωρ-είς</ITEM>
- <ITEM>θεωρ-ούσες</ITEM>
+ <ITEM>θεωρ-ούσ-ες</ITEM>
<ITEM>θα θεωρ-είς</ITEM>
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
<ITEM>θεωρ-εί</ITEM>
- <ITEM>θεωρ-ούσε</ITEM>
+ <ITEM>θεωρ-ούσ-ε</ITEM>
<ITEM>θα θεωρ-εί</ITEM>
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
<ITEM>θεωρ-ούμε</ITEM>
- <ITEM>θεωρ-ούσαμε</ITEM>
+ <ITEM>θεωρ-ούσ-αμε</ITEM>
<ITEM>θα θεωρ-ούμε</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>θεωρ-είτε</ITEM>
- <ITEM>θεωρ-ούσατε</ITEM>
+ <ITEM>θεωρ-ούσ-ατε</ITEM>
<ITEM>θα θεωρ-είτε</ITEM>
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
<ITEM>θεωρ-ούν(ε)</ITEM>
- <ITEM>θεωρ-ούσαν(ε)</ITEM>
+ <ITEM>θεωρ-ούσ-αν(ε)</ITEM>
<ITEM>θα θεωρ-ούν(ε)</ITEM>
</ROW>
</TABULAR>
@@ -2120,50 +2120,50 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
<ROW>
<ITEM>εγώ</ITEM>
<ITEM>θεώρησ-α</ITEM>
- <ITEM>έχω θεωρήσ-ει</ITEM>
- <ITEM>είχα θεωρήσ-ει</ITEM>
- <ITEM>θα έχω θεωρήσ-ει</ITEM>
- <ITEM>θα θεωρήσ-ω</ITEM>
+ <ITEM>έχω θεωρ-ήσ-ει</ITEM>
+ <ITEM>είχα θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα έχω θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα θεωρ-ήσ-ω</ITEM>
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
- <ITEM>θεώρησ-ες</ITEM>
- <ITEM>έχεις θεωρήσ-ει</ITEM>
- <ITEM>είχες θεωρήσ-ει</ITEM>
- <ITEM>θα έχεις θεωρήσ-ει</ITEM>
- <ITEM>θα θεωρήσ-εις</ITEM>
+ <ITEM>θεώρ-ησ-ες</ITEM>
+ <ITEM>έχεις θεωρ-ήσ-ει</ITEM>
+ <ITEM>είχες θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα έχεις θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα θεωρ-ήσ-εις</ITEM>
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
<ITEM>θεώρησ-ε</ITEM>
- <ITEM>έχει θεωρήσ-ει</ITEM>
- <ITEM>είχε θεωρήσ-ει</ITEM>
- <ITEM>θα έχει θεωρήσ-ει</ITEM>
- <ITEM>θα θεωρήσ-ει</ITEM>
+ <ITEM>έχει θεωρ-ήσ-ει</ITEM>
+ <ITEM>είχε θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα έχει θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
- <ITEM>θεωρήσ-αμε</ITEM>
- <ITEM>έχουμε θεωρήσ-ει</ITEM>
- <ITEM>είχαμε θεωρήσ-ει</ITEM>
- <ITEM>θα έχουμε θεωρήσ-ει</ITEM>
- <ITEM>θα θεωρήσ-ουμε</ITEM>
+ <ITEM>θεωρ-ήσ-αμε</ITEM>
+ <ITEM>έχουμε θεωρ-ήσ-ει</ITEM>
+ <ITEM>είχαμε θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα έχουμε θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα θεωρ-ήσ-ουμε</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
- <ITEM>θεωρήσ-ατε</ITEM>
- <ITEM>έχετε θεωρήσ-ει</ITEM>
- <ITEM>είχατε θεωρήσ-ει</ITEM>
- <ITEM>θα έχετε θεωρήσ-ει</ITEM>
- <ITEM>θα θεωρήσ-ετε</ITEM>
+ <ITEM>θεωρ-ήσ-ατε</ITEM>
+ <ITEM>έχετε θεωρ-ήσ-ει</ITEM>
+ <ITEM>είχατε θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα έχετε θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα θεωρ-ήσ-ετε</ITEM>
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
- <ITEM>θεώρησ-αν(ε)</ITEM>
- <ITEM>έχουν θεωρήσ-ει</ITEM>
- <ITEM>είχαν θεωρήσ-ει</ITEM>
- <ITEM>θα έχουν θεωρήσ-ει</ITEM>
- <ITEM>θα θεωρήσ-ουν(ε)</ITEM>
+ <ITEM>θεώρ-ησ-αν(ε)</ITEM>
+ <ITEM>έχουν θεωρ-ήσ-ει</ITEM>
+ <ITEM>είχαν θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα έχουν θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα θεωρ-ήσ-ουν(ε)</ITEM>
</ROW>
</TABULAR>
@@ -2183,38 +2183,38 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
<ROW>
<ITEM>εγώ</ITEM>
<ITEM>να θεωρ-ώ</ITEM>
- <ITEM>να θεωρήσ-ω</ITEM>
- <ITEM>να έχω θεωρήσ-ει</ITEM>
+ <ITEM>να θεωρ-ήσ-ω</ITEM>
+ <ITEM>να έχω θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>να θεωρ-είς</ITEM>
- <ITEM>να θεωρήσ-εις</ITEM>
- <ITEM>να έχεις θεωρήσ-ει</ITEM>
+ <ITEM>να θεωρ-ήσ-εις</ITEM>
+ <ITEM>να έχεις θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
<ITEM>να θεωρ-εί</ITEM>
- <ITEM>να θεωρήσ-ει</ITEM>
- <ITEM>να έχει θεωρήσ-ει</ITEM>
+ <ITEM>να θεωρ-ήσ-ει</ITEM>
+ <ITEM>να έχει θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
<ITEM>να θεωρ-ούμε</ITEM>
- <ITEM>να θεωρήσ-ουμε</ITEM>
- <ITEM>να έχουμε θεωρήσ-ει</ITEM>
+ <ITEM>να θεωρ-ήσ-ουμε</ITEM>
+ <ITEM>να έχουμε θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>να θεωρ-είτε</ITEM>
- <ITEM>να θεωρήσ-ετε</ITEM>
- <ITEM>να έχετε θεωρήσ-ει</ITEM>
+ <ITEM>να θεωρ-ήσ-ετε</ITEM>
+ <ITEM>να έχετε θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
<ITEM>να θεωρ-ούν(ε)</ITEM>
- <ITEM>να θεωρήσ-ουν(ε)</ITEM>
- <ITEM>να έχουν θεωρήσ-ει</ITEM>
+ <ITEM>να θεωρ-ήσ-ουν(ε)</ITEM>
+ <ITEM>να έχουν θεωρ-ήσ-ει</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -2232,14 +2232,14 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>να θεωρ-είς</ITEM>
- <ITEM>θεώρησ-ε</ITEM>
- <ITEM>να έχεις θεωρήσ-ει</ITEM>
+ <ITEM>θεώρ-ησ-ε</ITEM>
+ <ITEM>να έχεις θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>θεωρ-είτε</ITEM>
- <ITEM>θεωρήσ-τε</ITEM>
- <ITEM>να έχετε θεωρήσ-ει</ITEM>
+ <ITEM>θεωρ-ήσ-τε</ITEM>
+ <ITEM>να έχετε θεωρ-ήσ-ει</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -2253,7 +2253,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>θεωρ-ώντας</ITEM>
- <ITEM>έχοντας θεωρήσ-ει</ITEM>
+ <ITEM>έχοντας θεωρ-ήσ-ει</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -2280,7 +2280,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>θεωρ-είσαι</ITEM>
- <ITEM>θεωρ-ούσουν</ITEM>
+ <ITEM>θεωρ-ούσ-ουν</ITEM>
<ITEM>θα θεωρ-είσαι</ITEM>
</ROW>
<ROW>
@@ -2298,7 +2298,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>θεωρ-είστε</ITEM>
- <ITEM>θεωρ-ούσαστε</ITEM>
+ <ITEM>θεωρ-ούσ-αστε</ITEM>
<ITEM>θα θεωρ-είστε</ITEM>
</ROW>
<ROW>
@@ -2320,7 +2320,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>εγώ</ITEM>
- <ITEM>θεωρήθ-ηκα</ITEM>
+ <ITEM>θεωρήθ-ηκ-α</ITEM>
<ITEM>έχω θεωρηθ-εί</ITEM>
<ITEM>είχα θεωρηθ-εί</ITEM>
<ITEM>θα έχω θεωρηθ-εί</ITEM>
@@ -2328,7 +2328,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
- <ITEM>θεωρήθ-ηκες</ITEM>
+ <ITEM>θεωρήθ-ηκ-ες</ITEM>
<ITEM>έχεις θεωρηθ-εί</ITEM>
<ITEM>είχες θεωρηθ-εί</ITEM>
<ITEM>θα έχεις θεωρηθ-εί</ITEM>
@@ -2336,7 +2336,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
- <ITEM>θεωρήθ-ηκε</ITEM>
+ <ITEM>θεωρήθ-ηκ-ε</ITEM>
<ITEM>έχει θεωρηθ-εί</ITEM>
<ITEM>είχε θεωρηθ-εί</ITEM>
<ITEM>θα έχει θεωρηθ-εί</ITEM>
@@ -2344,7 +2344,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
- <ITEM>θεωρηθ-ήκαμε</ITEM>
+ <ITEM>θεωρηθ-ήκ-αμε</ITEM>
<ITEM>έχουμε θεωρηθ-εί</ITEM>
<ITEM>είχαμε θεωρηθ-εί</ITEM>
<ITEM>θα έχουμε θεωρηθ-εί</ITEM>
@@ -2352,7 +2352,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
- <ITEM>θεωρηθ-ήκατε</ITEM>
+ <ITEM>θεωρηθ-ήκ-ατε</ITEM>
<ITEM>έχετε θεωρηθ-εί</ITEM>
<ITEM>είχατε θεωρηθ-εί</ITEM>
<ITEM>θα έχετε θεωρηθ-εί</ITEM>
@@ -2360,7 +2360,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
- <ITEM>θεωρήθ-ηκαν</ITEM>
+ <ITEM>θεωρήθ-ηκ-αν</ITEM>
<ITEM>έχουν θεωρηθ-εί</ITEM>
<ITEM>είχαν θεωρηθ-εί</ITEM>
<ITEM>θα έχουν θεωρηθ-εί</ITEM>
@@ -2431,7 +2431,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>να θεωρ-είσαι</ITEM>
- <ITEM>θεωρήσ-ου</ITEM>
+ <ITEM>θεωρ-ήσ-ου</ITEM>
<ITEM>να έχεις θεωρηθ-εί</ITEM>
</ROW>
<ROW>
@@ -2478,7 +2478,7 @@ równy drugiej osobie czasu przeszłego dokonanego trybu łączącego:
</ROW>
<ROW>
<ITEM>αγαπ-άω</ITEM>
- <ITEM>αγαπ-ούσα</ITEM>
+ <ITEM>αγαπ-ούσ-α</ITEM>
<ITEM>θα αγαπ-ώ</ITEM>
<ITEM></ITEM>
diff --git a/xml/ru/rhmata.xml b/xml/ru/rhmata.xml
index f97c2e3..fc27622 100644
--- a/xml/ru/rhmata.xml
+++ b/xml/ru/rhmata.xml
@@ -1503,7 +1503,7 @@
</ROW>
<ROW>
<ITEM>εγώ</ITEM>
- <ITEM>ντύθ-ηκα</ITEM>
+ <ITEM>ντύθ-ηκ-α</ITEM>
<ITEM>έχω ντυθ-εί</ITEM>
<ITEM>είχα ντυθ-εί</ITEM>
<ITEM>θα έχω ντυθ-εί</ITEM>
@@ -1511,7 +1511,7 @@
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
- <ITEM>ντύθ-ηκες</ITEM>
+ <ITEM>ντύθ-ηκ-ες</ITEM>
<ITEM>έχεις ντυθ-εί</ITEM>
<ITEM>είχες ντυθ-εί</ITEM>
<ITEM>θα έχεις ντυθ-εί</ITEM>
@@ -1519,7 +1519,7 @@
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
- <ITEM>ντύθ-ηκε</ITEM>
+ <ITEM>ντύθ-ηκ-ε</ITEM>
<ITEM>έχει ντυθ-εί</ITEM>
<ITEM>είχε ντυθ-εί</ITEM>
<ITEM>θα έχει ντυθ-εί</ITEM>
@@ -1527,7 +1527,7 @@
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
- <ITEM>ντυθ-ήκαμε</ITEM>
+ <ITEM>ντυθ-ήκ-αμε</ITEM>
<ITEM>έχουμε ντυθ-εί</ITEM>
<ITEM>είχαμε ντυθ-εί</ITEM>
<ITEM>θα έχουμε ντυθ-εί</ITEM>
@@ -1535,7 +1535,7 @@
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
- <ITEM>ντύθ-ήκατε</ITEM>
+ <ITEM>ντύθ-ήκ-ατε</ITEM>
<ITEM>έχετε ντυθ-εί</ITEM>
<ITEM>είχατε ντυθ-εί</ITEM>
<ITEM>θα έχετε ντυθ-εί</ITEM>
@@ -1543,7 +1543,7 @@
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
- <ITEM>ντύθ-ηκαν(ε)</ITEM>
+ <ITEM>ντύθ-ηκ-αν(ε)</ITEM>
<ITEM>έχουν ντυθ-εί</ITEM>
<ITEM>είχαν ντυθ-εί</ITEM>
<ITEM>θα έχουν ντυθ-εί</ITEM>
@@ -1661,37 +1661,37 @@
<ROW>
<ITEM>εγώ</ITEM>
<ITEM>νικ-ώ, νικ-άω</ITEM>
- <ITEM>νικ-ούσα</ITEM>
+ <ITEM>νικ-ούσ-α</ITEM>
<ITEM>θα νικ-ώ, θα νικ-άω</ITEM>
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>νικ-άς</ITEM>
- <ITEM>νικ-ούσες</ITEM>
+ <ITEM>νικ-ούσ-ες</ITEM>
<ITEM>θα νικ-άς</ITEM>
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
<ITEM>νικ-ά, νικ-άει</ITEM>
- <ITEM>νικ-ούσε</ITEM>
+ <ITEM>νικ-ούσ-ε</ITEM>
<ITEM>θα νικ-ά, θα νικ-άει</ITEM>
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
<ITEM>νικ-άμε, νικ-ούμε</ITEM>
- <ITEM>νικ-ούσαμε</ITEM>
+ <ITEM>νικ-ούσ-αμε</ITEM>
<ITEM>θα νικ-άμε, θα νικ-ούμε</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>νικ-άτε</ITEM>
- <ITEM>νικ-ούσατε</ITEM>
+ <ITEM>νικ-ούσ-ατε</ITEM>
<ITEM>θα νικ-άτε</ITEM>
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
<ITEM>νικ-ούν(ε)</ITEM>
- <ITEM>νικ-ούσαν(ε)</ITEM>
+ <ITEM>νικ-ούσ-αν(ε)</ITEM>
<ITEM>θα νικ-ούν(ε)</ITEM>
</ROW>
@@ -1708,50 +1708,50 @@
</ROW>
<ROW>
<ITEM>εγώ</ITEM>
- <ITEM>νίκ-ησα</ITEM>
- <ITEM>έχω νικ-ήσει</ITEM>
- <ITEM>είχα νικ-ήσει</ITEM>
- <ITEM>θα έχω νικ-ήσει</ITEM>
- <ITEM>θα νικ-ήσω</ITEM>
+ <ITEM>νίκ-ησ-α</ITEM>
+ <ITEM>έχω νικ-ήσ-ει</ITEM>
+ <ITEM>είχα νικ-ήσ-ει</ITEM>
+ <ITEM>θα έχω νικ-ήσ-ει</ITEM>
+ <ITEM>θα νικ-ήσ-ω</ITEM>
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
- <ITEM>νίκ-ησες</ITEM>
- <ITEM>έχεις νικ-ήσει</ITEM>
- <ITEM>είχες νικ-ήσει</ITEM>
- <ITEM>θα έχεις νικ-ήσει</ITEM>
- <ITEM>θα νικ-ήσεις</ITEM>
+ <ITEM>νίκ-ησ-ες</ITEM>
+ <ITEM>έχεις νικ-ήσ-ει</ITEM>
+ <ITEM>είχες νικ-ήσ-ει</ITEM>
+ <ITEM>θα έχεις νικ-ήσ-ει</ITEM>
+ <ITEM>θα νικ-ήσ-εις</ITEM>
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
- <ITEM>νίκ-ησε</ITEM>
- <ITEM>έχει νικ-ήσει</ITEM>
- <ITEM>είχε νικ-ήσει</ITEM>
- <ITEM>θα έχει νικ-ήσει</ITEM>
- <ITEM>θα νικ-ήσει</ITEM>
+ <ITEM>νίκ-ησ-ε</ITEM>
+ <ITEM>έχει νικ-ήσ-ει</ITEM>
+ <ITEM>είχε νικ-ήσ-ει</ITEM>
+ <ITEM>θα έχει νικ-ήσ-ει</ITEM>
+ <ITEM>θα νικ-ήσ-ει</ITEM>
</ROW> <ROW>
<ITEM>εμείς</ITEM>
- <ITEM>νικ-ήσαμε</ITEM>
- <ITEM>έχουμε νικ-ήσει</ITEM>
- <ITEM>είχαμε νικ-ήσει</ITEM>
- <ITEM>θα έχουμε νικ-ήσει</ITEM>
- <ITEM>θα νικ-ήσουμε</ITEM>
+ <ITEM>νικ-ήσ-αμε</ITEM>
+ <ITEM>έχουμε νικ-ήσ-ει</ITEM>
+ <ITEM>είχαμε νικ-ήσ-ει</ITEM>
+ <ITEM>θα έχουμε νικ-ήσ-ει</ITEM>
+ <ITEM>θα νικ-ήσ-ουμε</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
- <ITEM>νικ-ήσατε</ITEM>
- <ITEM>έχετε νικ-ήσει</ITEM>
- <ITEM>είχατε νικ-ήσει</ITEM>
- <ITEM>θα έχετε νικ-ήσει</ITEM>
- <ITEM>θα νικ-ήσετε</ITEM>
+ <ITEM>νικ-ήσ-ατε</ITEM>
+ <ITEM>έχετε νικ-ήσ-ει</ITEM>
+ <ITEM>είχατε νικ-ήσ-ει</ITEM>
+ <ITEM>θα έχετε νικ-ήσ-ει</ITEM>
+ <ITEM>θα νικ-ήσ-ετε</ITEM>
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
- <ITEM>νίκ-ησαν</ITEM>
- <ITEM>έχουν νικ-ήσει</ITEM>
- <ITEM>είχαν νικ-ήσει</ITEM>
- <ITEM>θα έχουν νικ-ήσει</ITEM>
- <ITEM>θα νικ-ήσουν</ITEM>
+ <ITEM>νίκ-ησ-αν</ITEM>
+ <ITEM>έχουν νικ-ήσ-ει</ITEM>
+ <ITEM>είχαν νικ-ήσ-ει</ITEM>
+ <ITEM>θα έχουν νικ-ήσ-ει</ITEM>
+ <ITEM>θα νικ-ήσ-ουν</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -1769,38 +1769,38 @@
<ROW>
<ITEM>εγώ</ITEM>
<ITEM>να νικ-ώ, να νικ-άω</ITEM>
- <ITEM>να νικ-ήσω</ITEM>
- <ITEM>να έχω νικ-ήσει</ITEM>
+ <ITEM>να νικ-ήσ-ω</ITEM>
+ <ITEM>να έχω νικ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>να νικ-άς</ITEM>
- <ITEM>να νικ-ήσεις</ITEM>
- <ITEM>να έχεις νικ-ήσει</ITEM>
+ <ITEM>να νικ-ήσ-εις</ITEM>
+ <ITEM>να έχεις νικ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
<ITEM>να νικ-ά, να νικ-άει</ITEM>
- <ITEM>να νικ-ήσει</ITEM>
- <ITEM>να έχει νικ-ήσει</ITEM>
+ <ITEM>να νικ-ήσ-ει</ITEM>
+ <ITEM>να έχει νικ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
<ITEM>να νικ-άμε, να νικ-ούμε</ITEM>
- <ITEM>να νικ-ήσουμε</ITEM>
- <ITEM>να έχουμε νικ-ήσει</ITEM>
+ <ITEM>να νικ-ήσ-ουμε</ITEM>
+ <ITEM>να έχουμε νικ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>να νικ-άτε</ITEM>
- <ITEM>να νικ-ήσετε</ITEM>
- <ITEM>να έχετε νικ-ήσει</ITEM>
+ <ITEM>να νικ-ήσ-ετε</ITEM>
+ <ITEM>να έχετε νικ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
<ITEM>να νικ-ούν, να νικ-άνε</ITEM>
- <ITEM>να νικ-ήσουν</ITEM>
- <ITEM>να έχουν νικ-ήσει</ITEM>
+ <ITEM>να νικ-ήσ-ουν</ITEM>
+ <ITEM>να έχουν νικ-ήσ-ει</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -1818,14 +1818,14 @@
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>νίκ-α</ITEM>
- <ITEM>νίκ-ησε</ITEM>
- <ITEM>να έχεις νικ-ήσει</ITEM>
+ <ITEM>νίκ-ησ-ε</ITEM>
+ <ITEM>να έχεις νικ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>νικ-άτε</ITEM>
- <ITEM>νικ-ήστε</ITEM>
- <ITEM>να έχετε νικ-ήσει</ITEM>
+ <ITEM>νικ-ήσ-τε</ITEM>
+ <ITEM>να έχετε νικ-ήσ-ει</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -1839,7 +1839,7 @@
</ROW>
<ROW>
<ITEM>νικ-ώντας</ITEM>
- <ITEM>έχοντας νικ-ήσει</ITEM>
+ <ITEM>έχοντας νικ-ήσ-ει</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -1907,7 +1907,7 @@
</ROW>
<ROW>
<ITEM>εγώ</ITEM>
- <ITEM>νικήθ-ηκα</ITEM>
+ <ITEM>νικήθ-ηκ-α</ITEM>
<ITEM>έχω νικηθ-εί</ITEM>
<ITEM>είχα νικηθ-εί</ITEM>
<ITEM>θα έχω νικηθ-εί</ITEM>
@@ -1915,7 +1915,7 @@
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
- <ITEM>νικήθ-ηκες</ITEM>
+ <ITEM>νικήθ-ηκ-ες</ITEM>
<ITEM>έχεις νικηθ-εί</ITEM>
<ITEM>είχες νικηθ-εί</ITEM>
<ITEM>θα έχεις νικηθ-εί</ITEM>
@@ -1923,14 +1923,14 @@
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
- <ITEM>νικήθ-ηκε</ITEM>
+ <ITEM>νικήθ-ηκ-ε</ITEM>
<ITEM>έχει νικηθ-εί</ITEM>
<ITEM>είχε νικηθ-εί</ITEM>
<ITEM>θα έχει νικηθ-εί</ITEM>
<ITEM>θα νικηθ-εί</ITEM>
</ROW> <ROW>
<ITEM>εμείς</ITEM>
- <ITEM>νικηθ-ήκαμε</ITEM>
+ <ITEM>νικηθ-ήκ-αμε</ITEM>
<ITEM>έχουμε νικηθ-εί</ITEM>
<ITEM>είχαμε νικηθ-εί</ITEM>
<ITEM>θα έχουμε νικηθ-εί</ITEM>
@@ -1938,7 +1938,7 @@
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
- <ITEM>νικηθ-ήκατε</ITEM>
+ <ITEM>νικηθ-ήκ-ατε</ITEM>
<ITEM>έχετε νικηθ-εί</ITEM>
<ITEM>είχατε νικηθ-εί</ITEM>
<ITEM>θα έχετε νικηθ-εί</ITEM>
@@ -1946,7 +1946,7 @@
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
- <ITEM>νικήθ-ηκαν</ITEM>
+ <ITEM>νικήθ-ηκ-αν</ITEM>
<ITEM>έχουν νικηθ-εί</ITEM>
<ITEM>είχαν νικηθ-εί</ITEM>
<ITEM>θα έχουν νικηθ-εί</ITEM>
@@ -2017,7 +2017,7 @@
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>να νικ-ιέσαι</ITEM>
- <ITEM>νικήσ-ου</ITEM>
+ <ITEM>νικ-ήσ-ου</ITEM>
<ITEM>να έχεις νικηθ-εί</ITEM>
</ROW>
<ROW>
@@ -2065,37 +2065,37 @@
<ROW>
<ITEM>εγώ</ITEM>
<ITEM>θεωρ-ώ</ITEM>
- <ITEM>θεωρ-ούσα</ITEM>
+ <ITEM>θεωρ-ούσ-α</ITEM>
<ITEM>θα θεωρ-ώ</ITEM>
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>θεωρ-είς</ITEM>
- <ITEM>θεωρ-ούσες</ITEM>
+ <ITEM>θεωρ-ούσ-ες</ITEM>
<ITEM>θα θεωρ-είς</ITEM>
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
<ITEM>θεωρ-εί</ITEM>
- <ITEM>θεωρ-ούσε</ITEM>
+ <ITEM>θεωρ-ούσ-ε</ITEM>
<ITEM>θα θεωρ-εί</ITEM>
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
<ITEM>θεωρ-ούμε</ITEM>
- <ITEM>θεωρ-ούσαμε</ITEM>
+ <ITEM>θεωρ-ούσ-αμε</ITEM>
<ITEM>θα θεωρ-ούμε</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>θεωρ-είτε</ITEM>
- <ITEM>θεωρ-ούσατε</ITEM>
+ <ITEM>θεωρ-ούσ-ατε</ITEM>
<ITEM>θα θεωρ-είτε</ITEM>
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
<ITEM>θεωρ-ούν(ε)</ITEM>
- <ITEM>θεωρ-ούσαν(ε)</ITEM>
+ <ITEM>θεωρ-ούσ-αν(ε)</ITEM>
<ITEM>θα θεωρ-ούν(ε)</ITEM>
</ROW>
</TABULAR>
@@ -2111,51 +2111,51 @@
</ROW>
<ROW>
<ITEM>εγώ</ITEM>
- <ITEM>θεώρησ-α</ITEM>
- <ITEM>έχω θεωρήσ-ει</ITEM>
- <ITEM>είχα θεωρήσ-ει</ITEM>
- <ITEM>θα έχω θεωρήσ-ει</ITEM>
- <ITEM>θα θεωρήσ-ω</ITEM>
+ <ITEM>θεώρ-ησ-α</ITEM>
+ <ITEM>έχω θεωρ-ήσ-ει</ITEM>
+ <ITEM>είχα θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα έχω θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα θεωρ-ήσ-ω</ITEM>
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
- <ITEM>θεώρησ-ες</ITEM>
- <ITEM>έχεις θεωρήσ-ει</ITEM>
- <ITEM>είχες θεωρήσ-ει</ITEM>
- <ITEM>θα έχεις θεωρήσ-ει</ITEM>
- <ITEM>θα θεωρήσ-εις</ITEM>
+ <ITEM>θεώρ-ησ-ες</ITEM>
+ <ITEM>έχεις θεωρ-ήσ-ει</ITEM>
+ <ITEM>είχες θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα έχεις θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα θεωρ-ήσ-εις</ITEM>
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
<ITEM>θεώρησ-ε</ITEM>
- <ITEM>έχει θεωρήσ-ει</ITEM>
- <ITEM>είχε θεωρήσ-ει</ITEM>
- <ITEM>θα έχει θεωρήσ-ει</ITEM>
- <ITEM>θα θεωρήσ-ει</ITEM>
+ <ITEM>έχει θεωρ-ήσ-ει</ITEM>
+ <ITEM>είχε θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα έχει θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
- <ITEM>θεωρήσ-αμε</ITEM>
- <ITEM>έχουμε θεωρήσ-ει</ITEM>
- <ITEM>είχαμε θεωρήσ-ει</ITEM>
- <ITEM>θα έχουμε θεωρήσ-ει</ITEM>
- <ITEM>θα θεωρήσ-ουμε</ITEM>
+ <ITEM>θεωρ-ήσ-αμε</ITEM>
+ <ITEM>έχουμε θεωρ-ήσ-ει</ITEM>
+ <ITEM>είχαμε θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα έχουμε θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα θεωρ-ήσ-ουμε</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
- <ITEM>θεωρήσ-ατε</ITEM>
- <ITEM>έχετε θεωρήσ-ει</ITEM>
- <ITEM>είχατε θεωρήσ-ει</ITEM>
- <ITEM>θα έχετε θεωρήσ-ει</ITEM>
- <ITEM>θα θεωρήσ-ετε</ITEM>
+ <ITEM>θεωρ-ήσ-ατε</ITEM>
+ <ITEM>έχετε θεωρ-ήσ-ει</ITEM>
+ <ITEM>είχατε θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα έχετε θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα θεωρ-ήσ-ετε</ITEM>
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
- <ITEM>θεώρησ-αν(ε)</ITEM>
- <ITEM>έχουν θεωρήσ-ει</ITEM>
- <ITEM>είχαν θεωρήσ-ει</ITEM>
- <ITEM>θα έχουν θεωρήσ-ει</ITEM>
- <ITEM>θα θεωρήσ-ουν(ε)</ITEM>
+ <ITEM>θεώρ-ησ-αν(ε)</ITEM>
+ <ITEM>έχουν θεωρ-ήσ-ει</ITEM>
+ <ITEM>είχαν θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα έχουν θεωρ-ήσ-ει</ITEM>
+ <ITEM>θα θεωρ-ήσ-ουν(ε)</ITEM>
</ROW>
</TABULAR>
@@ -2175,38 +2175,38 @@
<ROW>
<ITEM>εγώ</ITEM>
<ITEM>να θεωρ-ώ</ITEM>
- <ITEM>να θεωρήσ-ω</ITEM>
- <ITEM>να έχω θεωρήσ-ει</ITEM>
+ <ITEM>να θεωρ-ήσ-ω</ITEM>
+ <ITEM>να έχω θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>να θεωρ-είς</ITEM>
- <ITEM>να θεωρήσ-εις</ITEM>
- <ITEM>να έχεις θεωρήσ-ει</ITEM>
+ <ITEM>να θεωρ-ήσ-εις</ITEM>
+ <ITEM>να έχεις θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
<ITEM>να θεωρ-εί</ITEM>
- <ITEM>να θεωρήσ-ει</ITEM>
- <ITEM>να έχει θεωρήσ-ει</ITEM>
+ <ITEM>να θεωρ-ήσ-ει</ITEM>
+ <ITEM>να έχει θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
<ITEM>να θεωρ-ούμε</ITEM>
- <ITEM>να θεωρήσ-ουμε</ITEM>
- <ITEM>να έχουμε θεωρήσ-ει</ITEM>
+ <ITEM>να θεωρ-ήσ-ουμε</ITEM>
+ <ITEM>να έχουμε θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>να θεωρ-είτε</ITEM>
- <ITEM>να θεωρήσ-ετε</ITEM>
- <ITEM>να έχετε θεωρήσ-ει</ITEM>
+ <ITEM>να θεωρ-ήσ-ετε</ITEM>
+ <ITEM>να έχετε θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
<ITEM>να θεωρ-ούν(ε)</ITEM>
- <ITEM>να θεωρήσ-ουν(ε)</ITEM>
- <ITEM>να έχουν θεωρήσ-ει</ITEM>
+ <ITEM>να θεωρ-ήσ-ουν(ε)</ITEM>
+ <ITEM>να έχουν θεωρ-ήσ-ει</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -2224,14 +2224,14 @@
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>να θεωρ-είς</ITEM>
- <ITEM>θεώρησ-ε</ITEM>
- <ITEM>να έχεις θεωρήσ-ει</ITEM>
+ <ITEM>θεώρ-ησ-ε</ITEM>
+ <ITEM>να έχεις θεωρ-ήσ-ει</ITEM>
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>θεωρ-είτε</ITEM>
- <ITEM>θεωρήσ-τε</ITEM>
- <ITEM>να έχετε θεωρήσ-ει</ITEM>
+ <ITEM>θεωρ-ήσ-τε</ITEM>
+ <ITEM>να έχετε θεωρ-ήσ-ει</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -2245,7 +2245,7 @@
</ROW>
<ROW>
<ITEM>θεωρ-ώντας</ITEM>
- <ITEM>έχοντας θεωρήσ-ει</ITEM>
+ <ITEM>έχοντας θεωρ-ήσ-ει</ITEM>
</ROW>
</TABULAR>
</SUBSECTION>
@@ -2272,7 +2272,7 @@
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>θεωρ-είσαι</ITEM>
- <ITEM>θεωρ-ούσουν</ITEM>
+ <ITEM>θεωρ-ούσ-ουν</ITEM>
<ITEM>θα θεωρ-είσαι</ITEM>
</ROW>
<ROW>
@@ -2290,7 +2290,7 @@
<ROW>
<ITEM>εσείς</ITEM>
<ITEM>θεωρ-είστε</ITEM>
- <ITEM>θεωρ-ούσαστε</ITEM>
+ <ITEM>θεωρ-ούσ-αστε</ITEM>
<ITEM>θα θεωρ-είστε</ITEM>
</ROW>
<ROW>
@@ -2312,7 +2312,7 @@
</ROW>
<ROW>
<ITEM>εγώ</ITEM>
- <ITEM>θεωρήθ-ηκα</ITEM>
+ <ITEM>θεωρήθ-ηκ-α</ITEM>
<ITEM>έχω θεωρηθ-εί</ITEM>
<ITEM>είχα θεωρηθ-εί</ITEM>
<ITEM>θα έχω θεωρηθ-εί</ITEM>
@@ -2320,7 +2320,7 @@
</ROW>
<ROW>
<ITEM>εσύ</ITEM>
- <ITEM>θεωρήθ-ηκες</ITEM>
+ <ITEM>θεωρήθ-ηκ-ες</ITEM>
<ITEM>έχεις θεωρηθ-εί</ITEM>
<ITEM>είχες θεωρηθ-εί</ITEM>
<ITEM>θα έχεις θεωρηθ-εί</ITEM>
@@ -2328,7 +2328,7 @@
</ROW>
<ROW>
<ITEM>αυτός,-ή,-ό</ITEM>
- <ITEM>θεωρήθ-ηκε</ITEM>
+ <ITEM>θεωρήθ-ηκ-ε</ITEM>
<ITEM>έχει θεωρηθ-εί</ITEM>
<ITEM>είχε θεωρηθ-εί</ITEM>
<ITEM>θα έχει θεωρηθ-εί</ITEM>
@@ -2336,7 +2336,7 @@
</ROW>
<ROW>
<ITEM>εμείς</ITEM>
- <ITEM>θεωρηθ-ήκαμε</ITEM>
+ <ITEM>θεωρηθ-ήκ-αμε</ITEM>
<ITEM>έχουμε θεωρηθ-εί</ITEM>
<ITEM>είχαμε θεωρηθ-εί</ITEM>
<ITEM>θα έχουμε θεωρηθ-εί</ITEM>
@@ -2344,7 +2344,7 @@
</ROW>
<ROW>
<ITEM>εσείς</ITEM>
- <ITEM>θεωρηθ-ήκατε</ITEM>
+ <ITEM>θεωρηθ-ήκ-ατε</ITEM>
<ITEM>έχετε θεωρηθ-εί</ITEM>
<ITEM>είχατε θεωρηθ-εί</ITEM>
<ITEM>θα έχετε θεωρηθ-εί</ITEM>
@@ -2352,7 +2352,7 @@
</ROW>
<ROW>
<ITEM>αυτοί,-ές,-ά</ITEM>
- <ITEM>θεωρήθ-ηκαν</ITEM>
+ <ITEM>θεωρήθ-ηκ-αν</ITEM>
<ITEM>έχουν θεωρηθ-εί</ITEM>
<ITEM>είχαν θεωρηθ-εί</ITEM>
<ITEM>θα έχουν θεωρηθ-εί</ITEM>
@@ -2423,7 +2423,7 @@
<ROW>
<ITEM>εσύ</ITEM>
<ITEM>να θεωρ-είσαι</ITEM>
- <ITEM>θεωρήσ-ου</ITEM>
+ <ITEM>θεωρ-ήσ-ου</ITEM>
<ITEM>να έχεις θεωρηθ-εί</ITEM>
</ROW>
<ROW>

Return to:

Send suggestions and report system problems to the System administrator.