summaryrefslogtreecommitdiff
path: root/examples/discourse/Discourse.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2011-02-09 17:11:45 +0000
committeraarne <aarne@chalmers.se>2011-02-09 17:11:45 +0000
commit805c12c49a82888fc791a238c39b8c1cf725345a (patch)
tree9151977271e5511af5cdf112bc182904204e2a33 /examples/discourse/Discourse.gf
parent9c68dbcdb108a84fee55f902029572552b59f23e (diff)
factored DiscourseFin to 4+5 constructors
Diffstat (limited to 'examples/discourse/Discourse.gf')
-rw-r--r--examples/discourse/Discourse.gf16
1 files changed, 15 insertions, 1 deletions
diff --git a/examples/discourse/Discourse.gf b/examples/discourse/Discourse.gf
index 1172032c5..0b942dbdf 100644
--- a/examples/discourse/Discourse.gf
+++ b/examples/discourse/Discourse.gf
@@ -9,16 +9,30 @@ abstract Discourse =
flags startcat = S ;
cat
+ Clause ; -- subject, verb, object, adverb(s)
Marker ; -- discourse marker
fun
+ PreSubjS : Marker -> Temp -> Pol -> Clause -> S ; -- Jussihan juo maitoa nyt
+ PreVerbS : Marker -> Temp -> Pol -> Clause -> S ; -- juohan Jussi maitoa nyt
+ PreObjS : Marker -> Temp -> Pol -> Clause -> S ; -- maitoahan Jussi juo nyt
+ PreAdvS : Marker -> Temp -> Pol -> Clause -> S ; -- nythän Jussi juo maitoa
+
+ NoFocClause : NP -> VP -> Clause ; -- Jussi juo maitoa nyt
+ FocSubjClause : NP -> VP -> Clause ; -- Jussikin juo maitoa nyt
+ FocVerbClause : NP -> VP -> Clause ; -- Jussi juokin maitoa nyt
+ FocObjClause : NP -> VPSlash -> NP -> Clause ; -- Jussi juo maitoakin nyt
+ FocAdvClause : NP -> VP -> Adv -> Clause ; -- Jussi juo maitoa nytkin
+
+
+{-
ClauseS : Marker -> Temp -> Pol -> NP -> VP -> S ; -- Jussihan juo maitoa nyt
FocSubjS : Marker -> Temp -> Pol -> NP -> VP -> S ; -- Jussikinhan juo maitoa nyt
FocVerbS : Marker -> Temp -> Pol -> NP -> VP -> S ; -- Jussihan juokin maitoa nyt
FocObjS : Marker -> Temp -> Pol -> NP -> VPSlash -> NP -> S ; -- Jussihan juo maitoakin nyt
FocAdvS : Marker -> Temp -> Pol -> NP -> VP -> Adv -> S ; -- Jussihan juo maitoa nytkin
-
+-}
{-
PreAdvS : Part -> Temp -> Pol -> Adv -> Clause -> S ; -- nythän Jussi juo maitoa
PreAdvKinS : Part -> Temp -> Pol -> Adv -> Clause -> S ; -- nytkinhän Jussi juo maitoa