HaskProof: make the succedent level part of the judgment