forked from GitHub/gf-core
factored DiscourseFin to 4+5 constructors
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user