Added ExtAdvS separate from AdvS in Sentence
This commit is contained in:
1 parent
99e68d91a8
commit
e99f6d0239
6 files changed
+12
-4
No files matched your search
@@ -60,6 +60,7 @@ concrete SentenceFin of Sentence = CatFin ** open Prelude, ResFin in {
|
||||
} ;
|
||||
|
||||
AdvS a s = {s = a.s ++ s.s} ;
|
||||
ExtAdvS a s = {s = a.s ++ "," ++ s.s} ;
|
||||
|
||||
RelS s r = {s = s.s ++ "," ++ r.s ! agrP3 Sg} ; ---- mikä
|
||||
|
||||
|
||||
Reference in new issue
Block a user