(Ara) Fix dual for nouns ending in ة
This commit is contained in:
1 parent
a324377661
commit
9624952703
2 files changed
+8
-5
No files matched your search
@@ -559,8 +559,9 @@ resource ParadigmsAra = open
|
||||
mkA2V v p = mkA2 v p ** {lock_A2 = <>} ;
|
||||
|
||||
|
||||
smartN : Str -> N = \s -> case last s of {
|
||||
"ة" => mkFullN (sndf s) Fem NoHum ;
|
||||
smartN : Str -> N = \s -> case s of {
|
||||
_ + "ة" => mkFullN (sndf s) Fem NoHum ;
|
||||
_ + "ة" + #vow => mkFullN (sndf s) Fem NoHum ;
|
||||
_ => mkFullN (sndm s) Masc NoHum
|
||||
} ;
|
||||
|
||||
|
||||
Reference in new issue
Block a user