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

small fixes in Est translation and app.probs

Browse Source
This commit is contained in:
aarne
2015-11-09 12:44:19 +00:00
parent f456f4841f
commit 236a4b2550
3 changed files with 13 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
examples/app/app.probs
View File

@@ -65056,9 +65056,9 @@ V2Q_V 0.01
V2S_V 0.01 V2S_V 0.01
V2V_V 0.01 V2V_V 0.01
Phrase_Chunk 0.1 Phrase_Chunk 0.1
PhrasePhr 0.8 PhrasePhr 0.9
PhrUtt 0.199 PhrUtt 0.09999
ChunkPhr 1.0e-9 ChunkPhr 1.0e-15
OneChunk 0.999 OneChunk 0.999
PlusChunk 0.001 PlusChunk 0.001
refl_SgP1_Chunk 5.751177721092363e-4 refl_SgP1_Chunk 5.751177721092363e-4

12
lib/src/translator/DictionaryEst.gf
View File

@@ -3,7 +3,7 @@ concrete DictionaryEst of Dictionary = CatEst ** open ParadigmsEst,
(S = StructuralEst), (S = StructuralEst),
(L = LexiconEst), (L = LexiconEst),
(R = ResEst), (R = ResEst),
MorphoEst, SyntaxEst, (E = ExtraEst), (X = ConstructX), Prelude in { MorphoEst, SyntaxEst, (M=MakeStructuralEst), (E = ExtraEst), (X = ConstructX), Prelude in {
flags coding=utf8 ; flags coding=utf8 ;
--------------------- ---------------------
@@ -39,10 +39,10 @@ flags coding=utf8 ;
during_Prep = postGenPrep "ajal" ; during_Prep = postGenPrep "ajal" ;
either7or_DConj = sd2 "kas" "või" ** {n = Sg} ; either7or_DConj = sd2 "kas" "või" ** {n = Sg} ;
everybody_NP = makeNP (mkN "igaüks") Sg ; everybody_NP = makeNP (mkN "igaüks") Sg ;
---- every_Det = mkDet Sg (mkN "iga") ; every_Det = MorphoEst.mkDet Sg (mkN "iga") ;
everything_NP = makeNP ((mkN "kõik") ** {lock_N = <>}) Sg ; everything_NP = makeNP ((mkN "kõik") ** {lock_N = <>}) Sg ;
everywhere_Adv = ss "kõikjal" ; everywhere_Adv = ss "kõikjal" ;
---- few_Det = mkDet Sg (mkN "mõni") ; few_Det = MorphoEst.mkDet Sg (mkN "mõni") ;
--- first_Ord = {s = \\n,c => (mkN "ensimmäinen").s ! NCase n c} ; --- first_Ord = {s = \\n,c => (mkN "ensimmäinen").s ! NCase n c} ;
for_Prep = casePrep allative ; for_Prep = casePrep allative ;
from_Prep = casePrep elative ; from_Prep = casePrep elative ;
@@ -67,10 +67,10 @@ flags coding=utf8 ;
isPron = False isPron = False
} ; } ;
less_CAdv = X.mkCAdv "vähem" "kui" ; less_CAdv = X.mkCAdv "vähem" "kui" ;
---- many_Det = mkDet Sg (mkN "mitu") ; many_Det = MorphoEst.mkDet Sg (mkN "mitu") ;
more_CAdv = X.mkCAdv "rohkem" "kui" ; more_CAdv = X.mkCAdv "rohkem" "kui" ;
most_Predet = {s = \\n,c => (nForms2N (dSuurin "MOST")).s ! NCase n (npform2case n c)} ; most_Predet = {s = \\n,c => (nForms2N (dSuurin "MOST")).s ! NCase n (npform2case n c)} ;
---- much_Det = mkDet Sg {s = \\_ => "palju"} ; much_Det = MorphoEst.mkDet Sg {s = \\_ => "palju"} ;
must_VV = mkVVf (mkV "pidama" "pidada" "peab" "peetakse" "pidage" "pidi" "pidanud" "peetud") infMa ; must_VV = mkVVf (mkV "pidama" "pidada" "peab" "peetakse" "pidage" "pidi" "pidanud" "peetud") infMa ;
no_Utt = ss "ei" ; no_Utt = ss "ei" ;
on_Prep = casePrep adessive ; on_Prep = casePrep adessive ;
@@ -304,7 +304,7 @@ lin
-- Name of the language in that language, s/suomi/eesti/ :--P -- Name of the language in that language, s/suomi/eesti/ :--P
lin language_title_Utt = ss "eesti" ; lin language_title_Utt = ss "eesti" ;
lin of_Prep = S.possess_Prep ;
---------------------- ----------------------
-- Conjunctions -- Conjunctions

7
lib/src/translator/ExtensionsEst.gf
View File

@@ -49,12 +49,13 @@ lin
h = v.h ; p = v.p h = v.h ; p = v.p
} }
) ; ) ;
-}
CompoundN noun cn = { CompoundN noun cn = lin N {
s = \\nf => noun.s ! 10 ++ BIND ++ cn.s ! nf ; s = \\nf => noun.s ! NCase Sg Gen ++ BIND ++ cn.s ! nf ---- AR genitive best?
h = cn.h
} ; } ;
{-
CompoundAP noun adj = { CompoundAP noun adj = {
s = \\_ => (snoun2nounSep {s = \\f => noun.s ! 10 ++ BIND ++ adj.s ! Posit ! sAN f ; h = adj.h}).s s = \\_ => (snoun2nounSep {s = \\f => noun.s ! 10 ++ BIND ++ adj.s ! Posit ! sAN f ; h = adj.h}).s
} ; } ;