1
0
forked from GitHub/gf-core

improve the lexicon

This commit is contained in:
krasimir
2008-03-15 12:13:11 +00:00
parent ab0b9d44fa
commit 6c32384f4f

View File

@@ -229,13 +229,6 @@ oper
(v0+"-") (v0+"-")
(v0+"číĺ") (v0+"číĺ")
DMasc ; DMasc ;
mkN024 : Str -> N ;
mkN024 base = let v0 = base
in mkNoun (v0)
(v0+"ĺ")
(v0+"-")
(v0+"î")
DMasc ;
mkN024a : Str -> N ; mkN024a : Str -> N ;
mkN024a base = let v0 = tk 1 base mkN024a base = let v0 = tk 1 base
in mkNoun (v0+"ç") in mkNoun (v0+"ç")
@@ -243,6 +236,13 @@ oper
(v0+"-") (v0+"-")
(v0+"ćĺ") (v0+"ćĺ")
DMasc ; DMasc ;
mkN024 : Str -> N ;
mkN024 base = let v0 = base
in mkNoun (v0)
(v0+"ĺ")
(v0+"ĺ")
(v0+"î")
DMascPersonal ;
mkN025 : Str -> N ; mkN025 : Str -> N ;
mkN025 base = let v0 = base mkN025 base = let v0 = base
in mkNoun (v0) in mkNoun (v0)
@@ -303,9 +303,9 @@ oper
mkN031a base = let v0 = base mkN031a base = let v0 = base
in mkNoun (v0) in mkNoun (v0)
(v0+"č") (v0+"č")
(v0+"-") (v0+"˙")
(v0+"ţ") (v0+"ţ")
DMasc ; DMascPersonal ;
mkN032 : Str -> N ; mkN032 : Str -> N ;
mkN032 base = let v0 = tk 1 base mkN032 base = let v0 = tk 1 base
in mkNoun (v0+"é") in mkNoun (v0+"é")
@@ -317,7 +317,7 @@ oper
mkN032a base = let v0 = tk 1 base mkN032a base = let v0 = tk 1 base
in mkNoun (v0+"é") in mkNoun (v0+"é")
(v0+"č") (v0+"č")
(v0+"-") (v0+"˙")
(v0+"ţ") (v0+"ţ")
DMascPersonal ; DMascPersonal ;
mkN033 : Str -> N ; mkN033 : Str -> N ;