my code in prolog
:- dynamic kitchenfurniture/1. kitchenfurniture([furniture(fridge,1), furniture(table,2), furniture(chair,1)]). writel([H|T]) :- write(H), nl, w
