The system is accessible function passing by a sort ordering that equates all sorts.

We start by computing the following initial DP problem:

  P1. (1) f#(true, x, y) => f#(x > y /\ y > 2, 1 + x, 2 * y)

***** No progress could be made on DP problem P1.