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

(Morphodict) Improvements in Fin config + header

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

6
src/morphodict/MorphoDictFin.config Normal file
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

3
src/morphodict/MorphoDictFin.header
View File

@@ -8,3 +8,6 @@ concrete MorphoDictFin of MorphoDictFinAbs = CatFin ** open
-- extracted from http://kaino.kotus.fi/sanat/nykysuomi/, licensed under LGPL -- extracted from http://kaino.kotus.fi/sanat/nykysuomi/, licensed under LGPL
flags coding = utf8 ; 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

4
src/morphodict/MorphoDictFinAbs.header Normal file
View File

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