I created this knowledge base in Prolog:
family(person(tom,fox,dateofbirth(may_7,1950),salary(15200,bbc)),person(ann,fox,dateofbirth(may_9,1949),salary(0,unem