Create data.prolog