[LYSEFGG] Partial implementation for sample from Mnesia chapter.