mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-09-29 21:53:38 -06:00
extensions from Codex
This commit is contained in:
@@ -16,7 +16,7 @@ concrete QuestionEus of Question = CatEus ** open ResEus, (VE=VerbEus), (NE=Noun
|
||||
|
||||
-- : IAdv -> Cl -> QCl ; -- why does John walk
|
||||
-- nola (how), zerbait (how much), noiz (when), non (where), zergatik (why)
|
||||
QuestIAdv iadv cl =
|
||||
QuestIAdv iadv cl =
|
||||
{ s = \\t,a,p,c =>
|
||||
let sent = cl.s ! t ! a ! p ! Indir ; -- no "al" with a wh-word!
|
||||
in { beforeAux = iadv.s ++ sent.beforeAux ;
|
||||
@@ -78,4 +78,4 @@ concrete QuestionEus of Question = CatEus ** open ResEus, (VE=VerbEus), (NE=Noun
|
||||
QuestQVP : IP -> QVP -> QCl ; -- who buys what where
|
||||
-}
|
||||
|
||||
}
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user