mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-07-02 03:58:34 -06:00
Complete AdjectiveTur (#12)
* remove unnecessary flags from GrammarTur.gf
* Implement the linearization for UseA2
* Minor formatting fixes
* Manually specify the preposition "ile" for married_A2
* Implement the linearization for ComplA2
* Implement the linearization for ReflA2 ("kendi ile evli")
* Fix ReflA2 adjective case to Nom
* Add a TODO comment
* Add a linearization for AdAP
* Implement the linearization for UseA2
* Minor formatting fixes
* Manually specify the preposition "ile" for married_A2
* Implement the linearization for ComplA2
* Implement the linearization for ReflA2 ("kendi ile evli")
* Fix ReflA2 adjective case to Nom
* Add a TODO comment
* Add a linearization for AdAP
* Fix AdAP
* Add linearization for at_most_AdN
* Add linearization for at_least_AdN
* added dummies for the missing modules in Turkish
* Add the linearization for as_CAdv
* Add rudimentary linearization for UsePN
* Add the linearization for CAdvAP
* Add preliminary linearization for EmbedVP
* Add linearization stub for SentAP
* Fix code-formatting and indentation in HarmonyTur
* Patterns for front and back vowels
* Add an oper for attaching the -mA suffix
* Formatting fixes in ParadigmsTur
* Attempt to implement attachMe
* Almost-working linearization for SentAP
* Update TODO for SentAP
* Move the addition of suffix si to the linearization of EmbedVP
* Import PhraseTur in GrammarTur
* Fix the duplication of PhraseTur in GrammarTur
* Start working on PhraseTur
* Fix formatting of makeH4Table
* Formatting
* Begin implementing the gerund inflection `makeVerb`
* Attach Number and Case data to the Gerund constructor of param VForm
* Get rid of hacky appending of "si" in EmbedVP
This commit is contained in:
committed by
Krasimir Angelov
parent
432a6295cc
commit
76d6749797
+16
-1
@@ -14,7 +14,11 @@ resource ResTur = ParamX ** open Prelude, Predef, HarmonyTur in {
|
||||
|
||||
oper
|
||||
Agr = {n : Number ; p : Person} ;
|
||||
Noun = {s : Number => Case => Str; gen : Number => Agr => Str; harmony : Harmony} ;
|
||||
Noun = {
|
||||
s : Number => Case => Str ;
|
||||
gen : Number => Agr => Str ;
|
||||
harmony : Harmony
|
||||
} ;
|
||||
Pron = {s : Case => Str; a : Agr} ;
|
||||
|
||||
agrP3 : Number -> Agr ;
|
||||
@@ -32,6 +36,7 @@ resource ResTur = ParamX ** open Prelude, Predef, HarmonyTur in {
|
||||
| VAorist Agr
|
||||
| VImperative
|
||||
| VInfinitive
|
||||
| Gerund Number Case
|
||||
;
|
||||
|
||||
UseGen = NoGen | YesGen Agr | UseIndef ;
|
||||
@@ -70,4 +75,14 @@ resource ResTur = ParamX ** open Prelude, Predef, HarmonyTur in {
|
||||
|
||||
mkClause : Str -> Agr -> Verb -> {s : Str} =
|
||||
\np, a, v -> ss (np ++ v.s ! VProg a) ;
|
||||
|
||||
attachMe : Verb -> {s : Str} =
|
||||
\v ->
|
||||
let
|
||||
s : Str = v.s ! VImperative
|
||||
in
|
||||
case s of {
|
||||
(_ + #vowel + _ )* + (_ + #frontVowel + _) => ss (s ++ "me") ;
|
||||
(_ + #vowel + _)* + (_ + #backVowel + _) => ss (s ++ "ma")
|
||||
} ;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user