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 : Str -> VForms = \du ->
|
||||
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
|
||||
_ + "u" => du + "e" ; -- du / due+n
|
||||
_ + "z" => du + "e" ; -- naiz / naize+n
|
||||
_ + "un" => du + "a" ; -- dun / duna+la
|
||||
|
||||
_ + "uk" => init du + "a" ; -- duk / dua+la
|
||||
x + "t" => x + "da" ; -- dut / duda+n
|
||||
_ + "r" => du + "re" ; -- dator / datorre+n
|
||||
@@ -135,7 +138,7 @@ oper
|
||||
Zuek => mkVForms "zinatekete" ;
|
||||
Hauek => mkVForms "lirateke" } ;
|
||||
-- Present and future are identical
|
||||
_ => table {Ni => mkVForms "naiz" ;
|
||||
pres => table {Ni => mkVForms "naiz" ;
|
||||
Hi _ => mkVForms "haiz" ;
|
||||
Zu => mkVForms "zara" "zare" ;
|
||||
Hau => mkVForms "da" "de" ;
|
||||
|
||||
@@ -214,10 +214,7 @@ lin leave_V2 = mkV2 "utzi" ; --| mkV2 "laga" ; --Apertium
|
||||
lin leg_N = mkN "hanka" ; --Apertium
|
||||
-- lin lie_V = mkV2 "gezur8erran" ; --Apertium
|
||||
-- lin lie_V = mkV2 "gezurra8esan" ; --Apertium
|
||||
--lin like_V2 = mkV2 "gustatu" ; --Apertium -- NOR-NORI
|
||||
-- lin like_V2 = mkV2 "atsegin_izan" ; --Apertium
|
||||
-- lin like_V2 = mkV2 "atsegin8izan<per>" ; --Apertium
|
||||
-- lin like_V2 = mkV2 "gogoko8izan<per>" ; --Apertium
|
||||
lin like_V2 = mkV2 "gustatu" zaio ; -- | ukanV "atsegin" ;
|
||||
lin listen_V2 = mkV2 "entzun" ; --Apertium
|
||||
lin live_V = izanV "bizi" ;
|
||||
lin liver_N = mkN "gibel" ; --Apertium
|
||||
|
||||
Reference in New Issue
Block a user