msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

(Cat) new instance of prefA

Browse Source
This commit is contained in:
Inari Listenmaa
2021-09-17 11:33:55 +08:00
parent 99469eeb54
commit 38cdfc8efe
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/catalan/ParadigmsCat.gf
View File

@@ -340,7 +340,10 @@ oper
prefA = overload {
prefA : A -> A = \a -> a ** {isPre = True} ;
prefA : Str -> Str -> A = \bo,bon ->
let adj : A = compADeg (adjBo bo bon) ;
let adj : A = compADeg (adjBo bo bon (bon+"ament")) ; -- not sure if there is any actual adjective that behaves like this /IL
in adj ** {isPre = True} ;
prefA : (bo,bon,be : Str) -> A = \bo,bon,be ->
let adj : A = compADeg (adjBo bo bon be) ;
in adj ** {isPre = True} ;
} ;