mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-22 09:32:53 -06:00
ExtAdvS in Pol
This commit is contained in:
@@ -74,6 +74,7 @@ lin
|
|||||||
|
|
||||||
-- AdvS : Adv -> S -> S ; -- today, I will go home
|
-- AdvS : Adv -> S -> S ; -- today, I will go home
|
||||||
AdvS adv s = { s = adv.s ++ s.s };
|
AdvS adv s = { s = adv.s ++ s.s };
|
||||||
|
ExtAdvS adv s = { s = adv.s ++ "," ++ s.s };
|
||||||
|
|
||||||
-- SlashPrep : Cl -> Prep -> ClSlash ; -- (with whom) he walks
|
-- SlashPrep : Cl -> Prep -> ClSlash ; -- (with whom) he walks
|
||||||
SlashPrep c p = { s=c.s; c=p };
|
SlashPrep c p = { s=c.s; c=p };
|
||||||
|
|||||||
Reference in New Issue
Block a user