a([als(nom)],[komp]) --> [größer].
a([als(nom)],[komp]) --> [kleiner].

n([mask],[pl,nom]) --> [km].

n([Gen],[Num,Kas]) --> rn([Gen],[Num,Kas]). 

v([sein],[3,sg,praes,ind]) --> [ist].
v([sein],[3,sg,praet,ind]) --> [war].
v([sein],[3,pl,praes,ind]) --> [sind].
v([sein],[3,pl,praet,ind]) --> [waren].

v(Art,Form) --> [Vollform],
    { wort(_Stamm,v(Art,Form),Vollform) }.
n(Art,Form) --> [Vollform],
    { wort(_Stamm,n(Art,Form),Vollform) }.
rn(Art,Form) --> [Vollform],
    { wort(_Stamm,rn(Art,Form),Vollform) }.
en(Art,Form) --> [Vollform],
    { wort(_Stamm,en(Art,Form),Vollform) }.
a(Art,Form) --> [Vollform],
    { wort(_Stamm,a(Art,Form),Vollform) }.

v([werden], [3,sg,praes,ind]) --> [wird].
v([werden], [3,sg,praet,ind]) --> [wurde].
v([werden], [3,pl,praes,ind]) --> [werden].
v([werden], [3,pl,praet,ind]) --> [wurden].