Assume H1.

Apply H1 to the current goal.

Assume H2 _.

An exact proof term for the current goal is not_TransSet_Sing1 H2.

∎