diff options
| author | krasimir <krasimir@chalmers.se> | 2008-11-27 14:08:50 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2008-11-27 14:08:50 +0000 |
| commit | 4af8cf36171af49882009f1f15d2ce7cd6a1c220 (patch) | |
| tree | c33f1d3701eb81b9c26b97b2d0c9a911cbda8300 /next-lib/src/russian/DiffRus.gf | |
| parent | 7f81aa43af09d37f857361096d3b2c4f27dceef6 (diff) | |
further refactoring in Russian
Diffstat (limited to 'next-lib/src/russian/DiffRus.gf')
| -rw-r--r-- | next-lib/src/russian/DiffRus.gf | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/next-lib/src/russian/DiffRus.gf b/next-lib/src/russian/DiffRus.gf index a29690e86..a1d2dafff 100644 --- a/next-lib/src/russian/DiffRus.gf +++ b/next-lib/src/russian/DiffRus.gf @@ -6,4 +6,12 @@ instance DiffRus of DiffSlavic = open CommonSlavic, Prelude in { NForm = NF Number Case ;
+ PronGen = PGen Gender | PNoGen ;
+
+ oper
+ Agr = {n : Number; p : Person; g : PronGen} ;
+
+ agrP3 : Number -> PronGen -> Agr = \n,g ->
+ {n = n; p = P3; g = g} ;
+
}
\ No newline at end of file |