mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 17:08:54 -06:00
(Fin) add internal table for the pronoun "kukin"
This commit is contained in:
@@ -216,6 +216,21 @@ oper
|
|||||||
}
|
}
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
|
kukinInt : MorphoFin.Number => MorphoFin.Case => Str =
|
||||||
|
let ku : Noun = nForms2N (dUkko "ku" "kun")
|
||||||
|
in table {
|
||||||
|
Sg => table {
|
||||||
|
Part => "kutakin" ;
|
||||||
|
Illat => "kuhunkin" ;
|
||||||
|
c => ku.s ! NCase Sg c + "kin"
|
||||||
|
} ;
|
||||||
|
Pl => table {
|
||||||
|
Gen => "kuidenkin" ;
|
||||||
|
Part => "kuitakin" ;
|
||||||
|
c => ku.s ! NCase Pl c + "kin"
|
||||||
|
}
|
||||||
|
} ;
|
||||||
|
|
||||||
kukaInt : MorphoFin.Number => (MorphoFin.Case) => Str =
|
kukaInt : MorphoFin.Number => (MorphoFin.Case) => Str =
|
||||||
let
|
let
|
||||||
kuka = snoun2nounBind (mkN "kuka" "kenen" "ketä" "kenä" "keneen"
|
kuka = snoun2nounBind (mkN "kuka" "kenen" "ketä" "kenä" "keneen"
|
||||||
|
|||||||
Reference in New Issue
Block a user