# Pastebin kZNzPQfP
:- pred grammar_solutions(string, list(list(string))).
:- mode grammar_solutions(in, out) is det.
grammar_solutions(Cat, Matches) :-
    solutions.solutions(pred(RR::out) is nondet :- (get_things2(Cat, RR)), Matches).