mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-25 10:48:54 -06:00
polite imperative in Fre
This commit is contained in:
@@ -123,7 +123,7 @@ instance DiffFre of DiffRomance = open CommonRomance, PhonoFre, Prelude in {
|
|||||||
let
|
let
|
||||||
agr = Ag g n p ;
|
agr = Ag g n p ;
|
||||||
num = if_then_else Number b Pl n ;
|
num = if_then_else Number b Pl n ;
|
||||||
verb = vp.s.s ! vImper n p ;
|
verb = vp.s.s ! vImper num p ;
|
||||||
neg = vp.neg ! pol ;
|
neg = vp.neg ! pol ;
|
||||||
clpr = <vp.clit1 ++ vp.clit2, False> ; ---- TODO: True if clit
|
clpr = <vp.clit1 ++ vp.clit2, False> ; ---- TODO: True if clit
|
||||||
compl = vp.comp ! agr ++ vp.ext ! pol
|
compl = vp.comp ! agr ++ vp.ext ! pol
|
||||||
|
|||||||
Reference in New Issue
Block a user