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

some fixes to Wanjiku's list

Browse Source
This commit is contained in:
aarne
2005-08-09 20:30:45 +00:00
parent 35ed9d459b
commit 08f5d157b6
6 changed files with 16 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -37,7 +37,7 @@ oper
human : Gender ;
nonhuman : Gender ;
Number : Type;
Number : Type ;
singular : Number ;
plural : Number ;
@@ -214,7 +214,7 @@ oper
-- Two-place adjectives need a case for the second argument.
mkA2 : A -> Case -> A2 ;
mkA2 : A -> PPosition -> A2 ;
-- Comparison adjectives have three forms. The comparative and the superlative
-- are always inflected in the same way, so the nominative of them is actually
@@ -482,7 +482,7 @@ reg3N = \vesi,veden,vesi
mkPN n = mkProperName n ** {lock_PN = <>} ;
mkA = \x -> noun2adj x ** {lock_A = <>} ;
mkA2 = \x,c -> x ** {c = CCase c ; lock_A2 = <>} ;
mkA2 = \x,c -> x ** {s3 = c.s3 ; p = c.p ; c = c.c ; lock_A2 = <>} ;
mkADeg x kivempi kivin =
let
a = last (x.s ! ((NCase Sg Part))) ; ---- gives "kivinta"