summaryrefslogtreecommitdiff
path: root/deprecated/old-lib/resource/scandinavian/AdverbScand.gf
diff options
context:
space:
mode:
Diffstat (limited to 'deprecated/old-lib/resource/scandinavian/AdverbScand.gf')
-rw-r--r--deprecated/old-lib/resource/scandinavian/AdverbScand.gf27
1 files changed, 27 insertions, 0 deletions
diff --git a/deprecated/old-lib/resource/scandinavian/AdverbScand.gf b/deprecated/old-lib/resource/scandinavian/AdverbScand.gf
new file mode 100644
index 000000000..1afa40cf1
--- /dev/null
+++ b/deprecated/old-lib/resource/scandinavian/AdverbScand.gf
@@ -0,0 +1,27 @@
+incomplete concrete AdverbScand of Adverb = CatScand ** open CommonScand, ResScand, Prelude in {
+
+ lin
+ PositAdvAdj a = {
+ s = a.s ! adverbForm
+ } ;
+ ComparAdvAdj cadv a np = {
+ s = cadv.s ++ a.s ! adverbForm ++ conjThan ++ np.s ! nominative
+ } ;
+ ComparAdvAdjS cadv a s = {
+ s = cadv.s ++ a.s ! adverbForm ++ conjThan ++ s.s ! Sub
+ } ;
+
+ PrepNP prep np = {s = prep.s ++ np.s ! accusative} ;
+
+ AdAdv = cc2 ;
+
+ SubjS subj s = {
+ s = subj.s ++ s.s ! Sub
+ } ;
+
+ AdnCAdv cadv = {s = cadv.s ++ conjThan} ;
+
+ oper
+ adverbForm : AForm = AF (APosit (Strong SgNeutr)) Nom ;
+
+}