%French Language Mdoule

:- module(fra,[]).

%Sentence
se(sentence(NP, VP)) --> ne(NP), ve(VP).

%Noun Phrase
ne(nphrase(D,N)) --> dr(D, Gdr), nn(N, Gdr).

%Verb Phrase
ve(vphrase(V,N)) --> vb(V), ne(N).
ve(vphrase(V)) --> vb(V).

%Determiners
dr(det(the), masc) --> [le].
dr(det(the), fem) --> [la].

%Nouns
nn(noun(dog), masc) --> [chien].
nn(noun(food), fem) --> [nourriture].

%Verbs
vb(verb(eats)) --> [mange].