kind(erwin,eva).
kind(maria,eva).
kind(otto,eva).
kind(hanna,erwin).
kind(wilhelm,maria).
kind(petra,otto).
kind(susi,hanna).
kind(karl,susi).
enkel(X,Y):-kind(X,C),kind(C,Y).