% file: notabup
% purpose: to show inability of top-down parser to handle left recursion
% query: np([my, sister, s, brother],[])?

np(L0,L) :-  det(L0,L1), noun(L1,L).
det(L0,L) :-  np(L0,L1), poss(L1,L).

det([my|L],L).
poss([s|L],L).
noun([sister|L],L).	noun([brother|L],L).	
noun([father|L],L).	noun([mother|L],L).


