% % part4.pl % % name: % comments: % % % to run your parse-checker % % :- [part4]. % :- [g0]. % or whatever grammar you'd like to check % % :- parse([s], [1, +]). % no (false) % % :- parse([s], [1, +, 0, +, 1]). % yes (true) % % don't let parse get too big! % you'll need relatively few lines of code here: