(Morphodict) Improvements in Fin config + header

This commit is contained in:
Inari Listenmaa
2021-06-04 11:07:23 +08:00
parent 7c79aae07f
commit e7f620fc60
3 changed files with 14 additions and 1 deletions

View File

@@ -0,0 +1,6 @@
N : N mkN 0 1 2 4 7 13 14 16 17 19
A : A mkA' 0 1 2 4 7 13 14 16 17 19
V : V mkV 0 17 19 22 43 49 23 25 31 58 94 37
V2 : V mkV 0 17 19 22 43 49 23 25 31 58 94 37
Adv : Adv mkAdv 0
Prep : Prep mkPrep 0

View File

@@ -8,3 +8,6 @@ concrete MorphoDictFin of MorphoDictFinAbs = CatFin ** open
-- extracted from http://kaino.kotus.fi/sanat/nykysuomi/, licensed under LGPL
flags coding = utf8 ;
oper mkA' : (x1,_,_,_,_,_,_,_,_,x10 : Str) -> A = \a,b,c,d,e,f,g,h,i,j -> mkA (mkN a b c d e f g h i j) ; -- Need a single worst-case paradigm for how config is implemented

View File

@@ -0,0 +1,4 @@
abstract MorphoDictFinAbs =
Cat [N,A,V,Adv,Prep] **
{