如何使用apply(X ^ P,X,P)减少像这个dtv(P1 ^ P2 ^ P3 ^ Q1)的DCG规则? 我试图描述不同语法成分的语义,并且我使用lambda演算。 这就是我对双传递动词的看法,然而,第二个应用函数并不起作用,我想知道我做错了什么。
dtv(P1^P2^P3^Q1)-->[gave],
{apply(P1,X^Q3,Q1)},
{apply(P,Y^Q3, P2)},
{apply(P3,Z^gave(X,Y,Z),Q3)}.
以下是完整的代码:
% Apply function takes a lambda expression in the form X^P. It unifies X
% in the first argument with the second argument to get a result P
apply(X^P, X,P).
%%%%%%%%
%SYNTAX
%%%%%%%%
% I converted the lambda symbol to ^ in order to make it consistent with
% the prolog convention and also the library module on lambda.
s(S) --> np(NP), vp(VP),
{apply(VP, NP, S)}.%This applies NP and VP to get S
adjp(Adjp)-->adj(Adj),noun(X^P),
{apply(Adj,X^P,Adjp)}.%This applies Adjective to noun to get an
% adjective Phrase
np(NP) --> det(Det), noun(X^P), {apply(Det, X^P, NP)}.%Applies Determiner and Noun to get NounPhrase
np(NP) --> pn(NP).
np(NP)-->det(Det), adjp(Adjp),
{apply(Det,Adjp,NP)}.%This applies determiner to adjective phrase to get a Noun Phrase
pp(PP)-->prep(Prep),np(NP),%prepositional phrase
{apply(Prep,NP,PP)}.
mp(MP)--> dtv(DTV),np(NP),
{apply(DTV,NP,MP)}.%This applies ditransitive verb
%noun phrase to get a modal phrase.
vp(VP)--> tv(TV), np(NP),
{apply(TV, NP, VP)}.%This applies transitive verb, noun phrase
% to get a verb phrase.
vp(VP)--> modal(M),np(NP),
{apply(M, NP, VP)}.%This applies modal (to be) to an adjective to get a verb phrase.
vp(VP)--> mp(MP),pp(PP),
{apply(MP,PP,VP)}.%This applies ditransitive verb,
%noun phrase to get a verb phrase.
vp(VP) --> iv(VP).
%%%%%%%%
% LEXICON
%%%%%%%%
prep(X^to(X))-->[to].
modal(R^S^M)-->[is],
{apply(R,X,M)},
{apply(S,X,M)}.
noun(X^food(X))-->[food].
noun(X^girl(X))-->[girl].
adj((X^P)^(Y^and(P,beautiful(Y))))-->[beautiful].
pn(P^Q)-->[jane],
{apply(P,jane,Q)}.
iv(P^Q)-->[runs],
{apply(P,X^runs(X),Q)}.
iv(P^Q)-->[sings],
{apply(P,X^sings(X),Q)}.
tv(P1^P2^Q2)-->[loves],
{apply(P2,X^Q1,Q2)},
{apply(P1,Y^loves(X,Y),Q1)}.
%Problem spot
dtv(P1^P2^P3^Q1)-->[gave],
{apply(P1,X^Q3,P2)},
{apply(P2^P3,Y^Q3, P)},
{apply(Q1,Z^gave(X,Y,Z),Q3)}.
det(P1^P2^the(X,Q1,Q2))-->[the],
{apply(P1,X,Q1)},
{apply(P2,X,Q2)}.
det(P1^P2^a(X,Q1,Q2))-->[a],
{apply(P1,X,Q1)},
{apply(P2,X,Q2)}.
答案 0 :(得分:3)
所以,让我先来看一条建议:至少阅读Prolog and Natural-Language Analysis第4章,pdf。它完全涵盖了您所看到的内容 - apply/3
被称为reduce/3
。这个apply/3
是一种解释事物的形式主义方式,即参数传递。似乎在很多例子中你把它混合了一点。
作为第一步,请考虑您的计划的这一部分:
apply(X^P,X,P).
s(S) --> np(NP), vp(VP), {apply(VP, NP, S)}.
这对应于 1 :
s(S) --> np(NP), vp(NP^S).
如此有效,没有必要使用apply/3
- 它是一个不错的设备,但最后,上面的符号更紧凑,因为它使用更少的变量。
我建议你清理你的代码,我发现它很难阅读。
您可以放心忽略的脚注
1 实际上,对应关系只是一个声明,转换可能会改善(=更改)vp//1
的终止。