diff options
Diffstat (limited to 'deprecated/old-lib/resource/finnish/AdverbFin.gf')
| -rw-r--r-- | deprecated/old-lib/resource/finnish/AdverbFin.gf | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/deprecated/old-lib/resource/finnish/AdverbFin.gf b/deprecated/old-lib/resource/finnish/AdverbFin.gf new file mode 100644 index 000000000..a331f985a --- /dev/null +++ b/deprecated/old-lib/resource/finnish/AdverbFin.gf @@ -0,0 +1,21 @@ +concrete AdverbFin of Adverb = CatFin ** open ResFin, Prelude in { + + lin + PositAdvAdj a = {s = a.s ! Posit ! AAdv} ; + ComparAdvAdj cadv a np = { + s = cadv.s ++ a.s ! Posit ! AAdv ++ "kuin" ++ np.s ! NPCase Nom + } ; + ComparAdvAdjS cadv a s = { + s = cadv.s ++ a.s ! Posit ! AAdv ++ "kuin" ++ s.s + } ; + + PrepNP prep np = {s = preOrPost prep.isPre prep.s (np.s ! prep.c)} ; + + AdAdv = cc2 ; + + SubjS = cc2 ; +----b AdvSC s = s ; + + AdnCAdv cadv = {s = cadv.s ++ "kuin"} ; + +} |
