forked from GitHub/gf-core
PeacePhrase_Fin ; -p in resource Makefile
This commit is contained in:
@@ -20,16 +20,23 @@ concrete PeaceLexExt_Fin of PeaceLexExt =
|
|||||||
corpse_N = regN "ruumis" ;
|
corpse_N = regN "ruumis" ;
|
||||||
doctor_N = regN "lääkäri";
|
doctor_N = regN "lääkäri";
|
||||||
enemy_N = regN "vihollinen";
|
enemy_N = regN "vihollinen";
|
||||||
|
face_N = regN "naama" ; ---- kasvot
|
||||||
food_N = regN "ruoka";
|
food_N = regN "ruoka";
|
||||||
friend_N = regN "ystävä";
|
friend_N = regN "ystävä";
|
||||||
|
ground_N = regN "maa" ;
|
||||||
|
knife_N = reg2N "veitsi" "veitsiä" ; ---- veistä
|
||||||
landmine_N = regN "maamiina" ;
|
landmine_N = regN "maamiina" ;
|
||||||
|
map_N = regN "kartta" ;
|
||||||
medicine_N = regN "lääke" ;
|
medicine_N = regN "lääke" ;
|
||||||
|
police8officer_N = regN "poliisi" ;
|
||||||
skin_N = regN "iho" ;
|
skin_N = regN "iho" ;
|
||||||
soldier_N = regN "sotilas" ;
|
soldier_N = regN "sotilas" ;
|
||||||
weapon_N = regN "ase";
|
weapon_N = regN "ase";
|
||||||
|
|
||||||
-- Verbs
|
-- Verbs
|
||||||
cough_V = regV "yskiä" ;
|
cough_V = regV "yskiä" ;
|
||||||
|
drop_V2 = dirV2 (regV "pudottaa") ;
|
||||||
|
hurt_V = regV "sattua" ;
|
||||||
need_V2 = dirV2 (regV "tarvita");
|
need_V2 = dirV2 (regV "tarvita");
|
||||||
own_V2 = dirV2 (regV "omistaa") ;
|
own_V2 = dirV2 (regV "omistaa") ;
|
||||||
show_V3 = dirdirV3 (regV "näyttää") ;
|
show_V3 = dirdirV3 (regV "näyttää") ;
|
||||||
|
|||||||
@@ -1,7 +1,14 @@
|
|||||||
--# -path=.:..:present:prelude
|
--# -path=.:..:present:prelude
|
||||||
|
|
||||||
concrete PeacePhrases_Fin of PeacePhrases =
|
concrete PeacePhrases_Fin of PeacePhrases =
|
||||||
PeaceCat_Fin ** {
|
PeaceCat_Fin ** open LangFin, ParadigmsFin in {
|
||||||
|
|
||||||
|
lin
|
||||||
|
Hello = { s = "terve" ++ "." } ;
|
||||||
|
GoodMorning = { s = ["hyvää huomenta"] ++ "." } ;
|
||||||
|
GoodEvening = { s = ["hyvää iltaa"] ++ "." } ;
|
||||||
|
WhatIsNamePron p = PhrUtt NoPConj (UttQS (UseQCl TPres ASimul PPos
|
||||||
|
(QuestVP whatSg_IP (UseComp (CompNP (DetCN (DetSg (SgQuant (PossPron p)) NoOrd)
|
||||||
|
(UseN (reg2N "nimi" "nimiä")))))))) NoVoc ;
|
||||||
|
|
||||||
}
|
}
|
||||||
@@ -14,7 +14,7 @@ pretest:
|
|||||||
echo "gr -cat=Cl -number=11 -prob | tb" | $(GF) -probs=lang.gfprob -path=present:prelude -nocf ../present/Lang???.gfc
|
echo "gr -cat=Cl -number=11 -prob | tb" | $(GF) -probs=lang.gfprob -path=present:prelude -nocf ../present/Lang???.gfc
|
||||||
|
|
||||||
langs:
|
langs:
|
||||||
echo "s ;; pm | wf langs.gfcm" | $(GF) -nocf -src */Lang??*.gf english/LangEng.gf +RTS -p -M800M -K100M
|
echo "s ;; pm | wf langs.gfcm" | $(GF) -nocf -src */Lang??*.gf english/LangEng.gf +RTS -M800M -K100M
|
||||||
cp -p */*.gfc */*.gfr ../alltenses
|
cp -p */*.gfc */*.gfr ../alltenses
|
||||||
|
|
||||||
present:
|
present:
|
||||||
|
|||||||
Reference in New Issue
Block a user