mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-09-18 08:16:05 -06:00
better inflection table for clauses
This commit is contained in:
@@ -177,11 +177,10 @@ oper
|
|||||||
{-
|
{-
|
||||||
-} --# notpresent
|
-} --# notpresent
|
||||||
clauseTense : Str -> ResRus.Tense -> Cl -> Str = \label,tense,cl ->
|
clauseTense : Str -> ResRus.Tense -> Cl -> Str = \label,tense,cl ->
|
||||||
tr (th (label ++ " (полож.)") ++
|
tr (intagAttr "th" "rowspan=\"2\"" label ++
|
||||||
td (clauseForm tense Pos cl) ++
|
td (clauseForm tense Pos cl) ++
|
||||||
td (clauseForm tense Pos cl)) ++
|
td (clauseForm tense Pos cl)) ++
|
||||||
tr (th (label ++ " (отриц.)") ++
|
tr (td (clauseForm tense Neg cl) ++
|
||||||
td (clauseForm tense Neg cl) ++
|
|
||||||
td (clauseForm tense Neg cl)) ;
|
td (clauseForm tense Neg cl)) ;
|
||||||
|
|
||||||
clauseForm : ResRus.Tense -> Polarity -> Cl -> Str = \tense,pol,cl ->
|
clauseForm : ResRus.Tense -> Polarity -> Cl -> Str = \tense,pol,cl ->
|
||||||
|
|||||||
Reference in New Issue
Block a user