mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-28 01:18:57 -06:00
Uncommented large functions
This commit is contained in:
@@ -18,7 +18,7 @@ lin
|
|||||||
|
|
||||||
ImpVP vp = { s = \\pol,num => vp.v.s ! pol ! (VImp num) ++ vp.compl ! (AgrP2 num Masc) } ;
|
ImpVP vp = { s = \\pol,num => vp.v.s ! pol ! (VImp num) ++ vp.compl ! (AgrP2 num Masc) } ;
|
||||||
|
|
||||||
-- SlashVP np vp = mkClause np vp ** { prep = vp.rightVal } ;
|
SlashVP np vp = mkClause np vp ** { prep = vp.rightVal } ;
|
||||||
-- FIX ME tmp comment
|
-- FIX ME tmp comment
|
||||||
|
|
||||||
AdvSlash slash adv = {
|
AdvSlash slash adv = {
|
||||||
|
|||||||
@@ -182,7 +182,7 @@ lin
|
|||||||
|
|
||||||
-- VPSlash -> NP -> VP
|
-- VPSlash -> NP -> VP
|
||||||
-- e.g. 'love it'
|
-- e.g. 'love it'
|
||||||
{- ComplSlash vpslash np =
|
ComplSlash vpslash np =
|
||||||
let agr : Agreement = np.agr in {
|
let agr : Agreement = np.agr in {
|
||||||
v = vpslash.v ;
|
v = vpslash.v ;
|
||||||
-- compl = \\agr => case vpslash.voice of {
|
-- compl = \\agr => case vpslash.voice of {
|
||||||
@@ -202,7 +202,7 @@ lin
|
|||||||
rightPol = np.pol ;
|
rightPol = np.pol ;
|
||||||
objPron = np.isPron ;
|
objPron = np.isPron ;
|
||||||
rightVal = vpslash.rightVal
|
rightVal = vpslash.rightVal
|
||||||
} ; -} -- FIX ME tmp comment
|
} ; -- FIX ME tmp comment
|
||||||
|
|
||||||
-- VV -> VPSlash -> VPSlash
|
-- VV -> VPSlash -> VPSlash
|
||||||
-- e.g. 'want to buy'
|
-- e.g. 'want to buy'
|
||||||
@@ -219,7 +219,7 @@ lin
|
|||||||
|
|
||||||
-- V2V -> NP -> VPSlash -> VPSlash
|
-- V2V -> NP -> VPSlash -> VPSlash
|
||||||
-- e.g. '-- beg me to buy'
|
-- e.g. '-- beg me to buy'
|
||||||
{- SlashV2VNP v2v np vpslash = insertObjSlash
|
SlashV2VNP v2v np vpslash = insertObjSlash
|
||||||
(\\_ => v2v.rightVal.s ++ np.s ! (v2v.rightVal.c ! (fromAgr np.agr).num))
|
(\\_ => v2v.rightVal.s ++ np.s ! (v2v.rightVal.c ! (fromAgr np.agr).num))
|
||||||
{
|
{
|
||||||
v = v2v ;
|
v = v2v ;
|
||||||
@@ -230,7 +230,7 @@ lin
|
|||||||
rightPol = np.pol ;
|
rightPol = np.pol ;
|
||||||
objPron = np.isPron ;
|
objPron = np.isPron ;
|
||||||
rightVal = v2v.rightVal
|
rightVal = v2v.rightVal
|
||||||
} ; -} -- FIX ME tmp comment
|
} ; -- FIX ME tmp comment
|
||||||
|
|
||||||
-- Other ways of forming verb phrases
|
-- Other ways of forming verb phrases
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user