msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

dictionary experiment in uusisuomi

Browse Source
This commit is contained in:
aarne
2008-01-04 10:15:15 +00:00
parent 2dc58680cc
commit 30b03d1fee
6 changed files with 295 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
examples/uusisuomi/Nominal.gf
View File

@@ -57,10 +57,12 @@ resource Nominal = ResFin ** open MorphoFin,Declensions,CatFin,Prelude in {
<_ + ("a" | "o" | "u" | "y" | "ä" | "ö"), _ + "n"> =>
dUkko ukko ukon ; -- auto,auton
<arp + "i", arv + "en"> => dArpi ukko ukon ;
<arp + "i", _ + "i" + ("a" | "ä")> => -- for b-w compat.
dArpi ukko (init (weakGrade ukko) + "en") ;
--- <arp + "i", _ + "i" + ("a" | "ä")> => -- for b-w compat.
--- dArpi ukko (init (weakGrade ukko) + "en") ;
<terv + "e", terv + "een"> =>
dRae ukko (terv + "een") ;
dRae ukko ukon ;
<taiv + ("as" | "äs"), taiv + ("aan" | "ään")> =>
dRae ukko ukon ;
<nukk + "e", nuk + "en"> => dNukke ukko ukon ;
<_ + ("us" | "ys"), _ + "den"> => dLujuus ukko ;
<_, _ + ":n"> => dSDP ukko ;
@@ -80,7 +82,7 @@ resource Nominal = ResFin ** open MorphoFin,Declensions,CatFin,Prelude in {
"ie" | "uo" | "yö" | "ea" | "eä" |
"ia" | "iä" | "io" | "iö"), _ + "n"> =>
nForms1 ukko ; --- to protect --- how to get "dioja"?
<_ + "a" | "ä" | "o" | "ö", _ + "n", _ + ("a" | "ä")> =>
<_ + ("a" | "ä" | "o" | "ö"), _ + "n", _ + ("a" | "ä")> =>
dSilakka ukko ukon ukkoja ;
<_ + "i", _ + "n", _ + ("eita" | "eitä")> =>
dTohtori ukko ;