1
0
forked from GitHub/gf-core

Finnish extras

This commit is contained in:
aarne
2006-06-03 21:57:48 +00:00
parent b6295359d1
commit aaab25754a
4 changed files with 25 additions and 0 deletions

View File

@@ -0,0 +1,12 @@
concrete ExtraFin of ExtraFinAbs = CatFin ** open ResFin, Prelude in {
lin
GenNP np = {
s1 = \\_,_ => np.s ! NPCase Gen ;
s2 = [] ;
isNum = False ;
isPoss = False ;
isDef = True --- "Jussin kolme autoa ovat" ; thus "...on" is missing
} ;
}

View File

@@ -0,0 +1,3 @@
abstract ExtraFinAbs = Extra [GenNP] ** {
}

View File

@@ -0,0 +1,6 @@
--# -path=.:../abstract:../common:prelude
concrete Finnish of FinnishAbs =
LangFin,
ExtraFin
** {} ;

View File

@@ -0,0 +1,4 @@
abstract FinnishAbs =
Lang,
ExtraFinAbs
** {} ;