(Kor) Tweaks in Adv+AdV
This commit is contained in:
1 parent
1d621f5a7f
commit
5153005d51
4 files changed
+10
-11
No files matched your search
@@ -171,7 +171,7 @@ concrete NounKor of Noun = CatKor ** open ResKor, Prelude in {
|
||||
|
||||
-- : CN -> Adv -> CN ;
|
||||
AdvCN cn adv = cn ** {
|
||||
rs = cn.rs ++ adv.s
|
||||
rs = adv.s ++ cn.rs
|
||||
} ;
|
||||
|
||||
-- Nouns can also be modified by embedded sentences and questions.
|
||||
|
||||
Reference in new issue
Block a user