Programmet upptager : prolog , säng,