I have a predicate calculus (first-order logic) problem. I have the formula
$\qquad \forall x[\neg P(x) \land \forall y \neg Q(x,y) \rightarrow \forall x \forall y R(x,y,z)]$
I want to express this in Skolem normal form. How can I do this using Mathematica?