\lambda n:nat.
 \lambda H:n=n.\lambda g:(?\to (le n 0))\to True.(g \lambda f.(f n H))