mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-28 01:18:57 -06:00
ParadigmsEng.verbalN for default verbal nouns adding -ing to verbs
This commit is contained in:
@@ -99,6 +99,12 @@ oper
|
|||||||
mkN : Str -> N -> N -- e.g. baby + boom
|
mkN : Str -> N -> N -- e.g. baby + boom
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
|
--3 Verbal nouns
|
||||||
|
--
|
||||||
|
-- A systematic way to form a verbal noun is the ending "-ing".
|
||||||
|
|
||||||
|
verbalN : V -> N ; -- e.g. sing -> singing
|
||||||
|
|
||||||
|
|
||||||
--3 Relational nouns
|
--3 Relational nouns
|
||||||
|
|
||||||
@@ -406,6 +412,8 @@ mkInterj : Str -> Interj
|
|||||||
|
|
||||||
compoundN s n = lin N {s = \\x,y => s ++ n.s ! x ! y ; g=n.g} ;
|
compoundN s n = lin N {s = \\x,y => s ++ n.s ! x ! y ; g=n.g} ;
|
||||||
|
|
||||||
|
verbalN v = regN (v.s ! VPresPart) ;
|
||||||
|
|
||||||
mkPN = overload {
|
mkPN = overload {
|
||||||
mkPN : Str -> PN = regPN ;
|
mkPN : Str -> PN = regPN ;
|
||||||
mkPN : N -> PN = nounPN
|
mkPN : N -> PN = nounPN
|
||||||
|
|||||||
Reference in New Issue
Block a user