GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-23 09:52:55 -06:00
Code Issues Packages Projects Releases Wiki Activity

merging Lexicon with Swadesh

Browse Source
This commit is contained in:
aarne
2006-03-07 18:26:47 +00:00
parent c168b6c489
commit 6c46034c09
35 changed files with 3837 additions and 1947 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/resource-1.0/finnish/ParadigmsFin.gf
View File

@@ -224,7 +224,7 @@ oper
-- The regular adjectives are based on $regN$ in the positive.
regADeg : (punainen : Str) -> A ;
regA : (punainen : Str) -> A ;
--2 Verbs
@@ -490,13 +490,15 @@ reg3N = \vesi,veden,vesi
in
regAdjective x kivempaa kivinta ** {lock_A = <>} ;
regADeg suuri =
regA suuri =
let suur = regN suuri in
mkADeg
suur
(init (suur.s ! NCase Sg Gen) + "mpi")
(init (suur.s ! NCase Pl Ess)) ;
regADeg = regA ; -- for bw compat
mkV a b c d e f g h i j k l = mkVerb a b c d e f g h i j k l **
{sc = NPCase Nom ; lock_V = <>} ;