Prolog experiment in the field of interactive storytelling