mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 04:59:31 -06:00
some adjective fixes in FoodsGle
This commit is contained in:
@@ -36,8 +36,8 @@ concrete FoodsGle of Foods = open MutationsGle, CharactersGle in {
|
||||
s = table{Sg => (mutate sg); Pl => (mutate pl)};
|
||||
g = g;
|
||||
pe = case pl of {
|
||||
_ + v@(#broadVowel) + c@(#consonant*) => Broad;
|
||||
_ + v@(#slenderVowel) + c@(#consonant*) => Slender;
|
||||
_ + v@(#broadVowel) + c@(#consonant*) + #consonant => Broad;
|
||||
_ + v@(#slenderVowel) + c@(#consonant*) + #consonant => Slender;
|
||||
_ => NoBreadth
|
||||
}
|
||||
} ;
|
||||
|
||||
Reference in New Issue
Block a user