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

Some more DictFin items. 50 of the 3220 Penn examples remain to be covered.

Browse Source
This commit is contained in:
aarne
2013-03-29 21:34:50 +00:00
parent 5c75ec2cd2
commit 660d21000d
3 changed files with 20 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
lib/src/finnish/stemmed/DictEngFin.gf
View File

@@ -18259,10 +18259,10 @@ expatiate_V = mkWV (k54A "täsmentää") ;
expatiation_N = mkWN (k2 "keskustelu") "laaja" ;
expatriate_N = mkWN (k2 "henkilö") "ulkomailla" "asuva" ;
expatriate_V2 = mkWV2 (k53A "muuttaa") "maasta" ;
expect_V = mkWV (k53A "odottaa") "lasta" ;
expect_V2 = mkWV2 (k53A "odottaa") "lasta" ;
expect_V2V = mkWV2V (k53A "odottaa") "lasta" ;
expect_VS = mkWVS (k53A "odottaa") "lasta" ;
expect_V = mkWV (k53A "odottaa") ; ---MANC
expect_V2 = mkWV2 (k53A "odottaa") ; ---MANC
expect_V2V = mkWV2V (k53A "odottaa") ; ---MANC
expect_VS = mkWVS (k53A "odottaa") ; ---MANC
--PLURNOUN --PREDEF expect_VV = mkWVV (k53A "odottaa") "lasta" ;
expectable_A = mkWA (k10 "oleva") "odotettavissa" ;
expectancy_N = mkWN (k39 "odotus") ;
@@ -59319,6 +59319,9 @@ part_of_N2 = mkN2 (mkN "osa") (mkPrep elative) ; --MAN
idea_of_N2 = mkN2 (mkN "ajatus") (mkPrep elative) ; --MAN
familiar_with_A2 = mkA2 (mkA "perehtynyt") (mkPrep illative) ; --MAN
some_Quant = heavyQuant {s1 = S.jokinPron ; s2 = \\_ => [] ; isNum,isPoss,isNeg,isDef = False} ; --MAN
anyPl_Det = {s1,sp = S.mikaInt ! Pl ; s2 = \\_ => "tahansa" ; isNum,isPoss,isNeg,isDef = False ; n = Pl} ; --MAN
both_Det = mkDet Pl (snoun2nounBind (nforms2snoun (dSuurempi "molempi"))) ; --MAN
most_Det = mkDet Pl (snoun2nounBind (nforms2snoun (dSuurin "usein"))) ; --MAN
several_Num = {s = \\n,c => (snoun2nounBind (mkN "usea")).s ! NCase n c ; n = Sg ; isNum = True} ; --suspect --MAN
@@ -59331,14 +59334,19 @@ start_V2 = mkV2 "aloittaa" ; --MAN
few_Num = {s = \\n,c => (snoun2nounBind (mkN "harva")).s ! NCase n c ; n = Sg ; isNum = True} ; --suspect --MAN
blame_V2 = mkV2 "syyttää" ; --MAN
feel_VA = mkVA (caseV elative (mkV "tuntua")) (mkPrep ablative) ; --MAN
--anything_NP 4
--anySg_Det 4
--moreSg_Det 3
anything_NP = {s = \\c => S.mikaInt ! Sg ! (npform2case Sg c) ++ "tahansa" ; a = agrP3 Sg ; isPron, isNeg = False} ; --MAN
anySg_Det = {s1,sp = S.mikaInt ! Sg ; s2 = \\_ => "tahansa" ; isNum,isPoss,isNeg,isDef = False ; n = Sg} ; --MAN
moreSg_Det = mkDet Sg (snoun2nounBind (nforms2snoun (dSuurempi "useampi"))) ; --MAN
lack_V2 = mkV2 (caseV ablative (mkV "puuttua")) ; --MAN
exceed_V2 = mkV2 "ylittää" ; --MAN
everyone_NP = S.everybody_NP ; --MAN
begin_V2 = mkV2 "aloittaa" ; --MAN
withdraw_V2 = mkV2 (mkV (mkV "vetää") "pois") ; --MAN
survivor_N = mkN "selviytyjä" ; --MAN
morePl_Det = mkDet Pl (snoun2nounBind (nforms2snoun (dSuurempi "useampi"))) ; --MAN
less_Det = mkDet Sg (snoun2nounBind (nforms2snoun (dSuurempi "vähempi"))) ; --MAN
enjoy_V2 = mkV2 (mkV "nauttia") partitive ;
enforce_V2 = mkV2 "pakottaa" ;
}

2
lib/src/finnish/stemmed/ParseFin.gf
View File

@@ -6,7 +6,7 @@ concrete ParseFin of ParseEngAbs =
NounFin - [PPartNP],
AdjectiveFin,
NumeralFin,
SymbolFin [PN, Symb, MkSymb, SymbPN],
SymbolFin [PN, Symb, String, CN, Card, NP, MkSymb, SymbPN, CNNumNP],
ConjunctionFin,
VerbFin - [SlashV2V, PassV2, UseCopula, ComplVV],
AdverbFin,

3
lib/src/finnish/stemmed/log.txt
View File

@@ -81,5 +81,8 @@ constants. 314 without lin.
Attacked the first ten missing constructs down to 4 occurrences. Now 13 with unknown, 167 missing.
Thus almost 95% complete.
Defined some more, down to the 34th with 2 occurrences. Now 32 missing, 18 with unknown
(version 7, 7-eng-fin-wsj.txt). Thus over 98% complete. Soon time to fix errors in the things covered!