mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 17:08:54 -06:00
(Fin) quality SOFT_BIND with Prelude
This commit is contained in:
@@ -23,7 +23,7 @@ concrete PhraseFin of Phrase = CatFin ** open ResFin, StemFin, (P = Prelude) in
|
||||
PConjConj conj = {s = conj.s2} ;
|
||||
|
||||
NoVoc = {s = []} ;
|
||||
VocNP np = {s = SOFT_BIND ++ "," ++ np.s ! NPSep} ;
|
||||
VocNP np = {s = P.SOFT_BIND ++ "," ++ np.s ! NPSep} ;
|
||||
|
||||
oper
|
||||
addNegation : P.Bool -> Str = \isNeg -> case isNeg of {P.True => "ei" ; _ => []} ;
|
||||
|
||||
Reference in New Issue
Block a user