/* Irassa ki az elemeket balról jobbra haladva ! 
   (inorder bejárás)
*/


  csalad(fa('Kati', fa('Barna', fa('Anna',ures,ures),
         fa('Bela',ures,ures)), 
         fa('Pali', fa('Marta',fa('Laci',ures,ures),ures), 
	 fa('Zoli', fa('Robi',ures,ures), ures)))).

  kiir(ures).
  kiir(fa(Elem,Bal,Jobb)) :- ....

  indit :- csalad(Fa), kiir(Fa), nl.       
          