Sentence adverbials.

This commit is contained in:
aarne
2003-10-03 13:11:23 +00:00
parent 719fcd09ea
commit 3aa5921fbc
6 changed files with 50 additions and 20 deletions

View File

@@ -170,6 +170,7 @@ lin
SubjS = subjunctSentence ;
SubjImper = subjunctImperative ;
SubjQu = subjunctQuestion ;
SubjVP = subjunctVerbPhrase ;
PhrNP = useNounPhrase ;
PhrOneCN = useCommonNounPhrase singular ;

View File

@@ -889,6 +889,9 @@ oper
subjunctVariants : Subjunction -> Str -> Str -> Str = \if,A,B ->
variants {if.s ++ A ++ "," ++ B ; B ++ "," ++ if.s ++ A} ;
subjunctVerbPhrase : VerbPhrase -> Subjunction -> Sentence -> VerbPhrase =
\V, if, A ->
adVerbPhrase V (advPost (if.s ++ A.s)) ;
--2 One-word utterances
--