UNCURRY_EXISTS_CONVPairRules.UNCURRY_EXISTS_CONV : conv
Uncurrys consecutive existential quantifications into a paired existential quantification.
> PairRules.UNCURRY_EXISTS_CONV (Term `?x y. x + y = y + x`);
val it = ⊢ (∃x y. x + y = y + x) ⇔ ∃(x,y). x + y = y + x: thm
> PairRules.UNCURRY_EXISTS_CONV (Term `?(w,x) (y,z). w+x+y+z = z+y+x+w`);
val it =
⊢ (∃(w,x) (y,z). w + x + y + z = z + y + x + w) ⇔
∃((w,x),y,z). w + x + y + z = z + y + x + w: thm
UNCURRY_EXISTS_CONV tm fails if tm is not a
consecutive existential quantification.
PairRules.CURRY_CONV,
PairRules.UNCURRY_CONV,
PairRules.CURRY_EXISTS_CONV,
PairRules.CURRY_FORALL_CONV,
PairRules.UNCURRY_FORALL_CONV