mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-30 10:28:53 -06:00
small fixes
This commit is contained in:
@@ -17,11 +17,14 @@ oper
|
|||||||
mkVForms = overload {
|
mkVForms = overload {
|
||||||
mkVForms : Str -> VForms = \du ->
|
mkVForms : Str -> VForms = \du ->
|
||||||
let due : Str = case du of {
|
let due : Str = case du of {
|
||||||
_ + "en" => init du ; -- zen / zen
|
_ + "en" => init du ; -- zen / ze+la
|
||||||
|
_ + "on" => init du ; -- zitzaion / zitzaio+la
|
||||||
|
_ + "an" => init du ; -- zitzaidan / zitzaida+la
|
||||||
_ + "gu" => du ; -- dugu / dugu+la
|
_ + "gu" => du ; -- dugu / dugu+la
|
||||||
_ + "u" => du + "e" ; -- du / due+n
|
_ + "u" => du + "e" ; -- du / due+n
|
||||||
_ + "z" => du + "e" ; -- naiz / naize+n
|
_ + "z" => du + "e" ; -- naiz / naize+n
|
||||||
_ + "un" => du + "a" ; -- dun / duna+la
|
_ + "un" => du + "a" ; -- dun / duna+la
|
||||||
|
|
||||||
_ + "uk" => init du + "a" ; -- duk / dua+la
|
_ + "uk" => init du + "a" ; -- duk / dua+la
|
||||||
x + "t" => x + "da" ; -- dut / duda+n
|
x + "t" => x + "da" ; -- dut / duda+n
|
||||||
_ + "r" => du + "re" ; -- dator / datorre+n
|
_ + "r" => du + "re" ; -- dator / datorre+n
|
||||||
@@ -135,7 +138,7 @@ oper
|
|||||||
Zuek => mkVForms "zinatekete" ;
|
Zuek => mkVForms "zinatekete" ;
|
||||||
Hauek => mkVForms "lirateke" } ;
|
Hauek => mkVForms "lirateke" } ;
|
||||||
-- Present and future are identical
|
-- Present and future are identical
|
||||||
_ => table {Ni => mkVForms "naiz" ;
|
pres => table {Ni => mkVForms "naiz" ;
|
||||||
Hi _ => mkVForms "haiz" ;
|
Hi _ => mkVForms "haiz" ;
|
||||||
Zu => mkVForms "zara" "zare" ;
|
Zu => mkVForms "zara" "zare" ;
|
||||||
Hau => mkVForms "da" "de" ;
|
Hau => mkVForms "da" "de" ;
|
||||||
|
|||||||
@@ -214,10 +214,7 @@ lin leave_V2 = mkV2 "utzi" ; --| mkV2 "laga" ; --Apertium
|
|||||||
lin leg_N = mkN "hanka" ; --Apertium
|
lin leg_N = mkN "hanka" ; --Apertium
|
||||||
-- lin lie_V = mkV2 "gezur8erran" ; --Apertium
|
-- lin lie_V = mkV2 "gezur8erran" ; --Apertium
|
||||||
-- lin lie_V = mkV2 "gezurra8esan" ; --Apertium
|
-- lin lie_V = mkV2 "gezurra8esan" ; --Apertium
|
||||||
--lin like_V2 = mkV2 "gustatu" ; --Apertium -- NOR-NORI
|
lin like_V2 = mkV2 "gustatu" zaio ; -- | ukanV "atsegin" ;
|
||||||
-- lin like_V2 = mkV2 "atsegin_izan" ; --Apertium
|
|
||||||
-- lin like_V2 = mkV2 "atsegin8izan<per>" ; --Apertium
|
|
||||||
-- lin like_V2 = mkV2 "gogoko8izan<per>" ; --Apertium
|
|
||||||
lin listen_V2 = mkV2 "entzun" ; --Apertium
|
lin listen_V2 = mkV2 "entzun" ; --Apertium
|
||||||
lin live_V = izanV "bizi" ;
|
lin live_V = izanV "bizi" ;
|
||||||
lin liver_N = mkN "gibel" ; --Apertium
|
lin liver_N = mkN "gibel" ; --Apertium
|
||||||
|
|||||||
Reference in New Issue
Block a user