diff --git a/src/faroese/ParadigmsFao.gf b/src/faroese/ParadigmsFao.gf index b4eb8c54..2e7a0972 100644 --- a/src/faroese/ParadigmsFao.gf +++ b/src/faroese/ParadigmsFao.gf @@ -507,6 +507,10 @@ oper mkA : Str -> Str -> A = reg2A -- s;Masc;Sg;Nom s;Masc;Sg;Dat } ; + invarA : Str -> A = \s -> lin A { + s = \\_,_,_ => s + } ; + mkA2 = overload { mkA2 : A -> A2 = \a -> lin A2 (a ** {c2 = noPrep}) ; mkA2 : A -> Prep -> A2 = \a,p -> lin A2 (a ** {c2 = p}) ;