/****************************************************************
A DCG for simple English relative clauses

This version: 13/06/03 stwa
****************************************************************/

np(nogap) --> det, n.
np(nogap) --> det, n, rel.
np(nogap) --> pn.
np(nogap) --> pn, rel.
np(gap(np)) --> [].

s(Gap) --> np(nogap),vp(Gap).
vp(Gap) --> v(1), np(Gap).

rel --> prorel, s(gap(np)).
rel --> prorel, vp(nogap).


% lexicon

det --> [the].
det --> [a].

n --> [witch].
n --> [wizard].
n --> [house-elf].

pn --> [harry].

v(1) --> [curses].
v(1) --> [likes].
v(1) --> [watches].

prorel --> [who].




