mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-10 03:32:51 -06:00
adjective form with Ger determiners
This commit is contained in:
@@ -167,8 +167,8 @@ resource ResGer = ParamX ** open Prelude in {
|
||||
|
||||
-- This is used twice in NounGer.
|
||||
|
||||
adjfCase : Adjf -> Case -> Adjf = \a,c -> case <a,c> of {
|
||||
<Strong, Nom|Acc> => Strong ;
|
||||
adjfCase : Adjf -> Number -> Case -> Adjf = \a,n,c -> case <n,c> of {
|
||||
<Sg, Nom|Acc> => a ;
|
||||
_ => Weak
|
||||
} ;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user