forked from GitHub/gf-rgl
sketched SlashVSS in resource
This commit is contained in:
@@ -68,6 +68,10 @@ abstract Sentence = Cat ** {
|
||||
}
|
||||
|
||||
--.
|
||||
|
||||
--- todo: tense of embedded Slash
|
||||
-- SlashVSS : NP -> VS -> Slash -> Slash; -- (whom) I think he sees
|
||||
|
||||
-- Examples for English $S$/$Cl$:
|
||||
{-
|
||||
Pres Simul Pos ODir : he sleeps
|
||||
|
||||
@@ -53,3 +53,12 @@ concrete SentenceEng of Sentence = CatEng ** open Prelude, ResEng in {
|
||||
oper
|
||||
ctr = contrNeg True ; -- contracted negations
|
||||
}
|
||||
|
||||
{-
|
||||
--- todo: tense of embedded Slash
|
||||
|
||||
SlashVSS np vs s =
|
||||
mkClause (np.s ! Nom) np.a
|
||||
(insertObj (\\_ => conjThat ++ s.s) (predV vs)) **
|
||||
{c2 = s.c2} ;
|
||||
-}
|
||||
Reference in New Issue
Block a user