df-∃1-alt1

Theorem.

Arguments:

x (sv), phi (pr), y (sv),

Distinct variable conditions:

(x, y),

Hypotheses:

(y bound in phi)

Assertions:

(_e1xphileftrightarrowexistsx(phiwedgeforally([y/x]phito(xeqy))))

Proof:

Hyp Ref Line Expr
Hypo1(y bound in phi)
bv-sbb-dv2(x bound in [y/x]phi)
2df-∃1-alt3(_e1y[y/x]phileftrightarrowexistsxforally([y/x]phileftrightarrow(yeqx)))
1chvar-∃14(_e1xphileftrightarrow_e1y[y/x]phi)
com5((xeqy)leftrightarrow(yeqx))
5bi.bldim>6(([y/x]phito(xeqy))leftrightarrow([y/x]phito(yeqx)))
6eqt-∀-i7(forally([y/x]phito(xeqy))leftrightarrowforally([y/x]phito(yeqx)))
dfsb-dval8([x/y][y/x]phileftrightarrowforally((yeqx)to[y/x]phi))
1sbco29([x/y][y/x]phileftrightarrow[x/x]phi)
sbid10([x/x]phileftrightarrowphi)
9, 10bitr11([x/y][y/x]phileftrightarrowphi)
8, 11<>bitr12(phileftrightarrowforally((yeqx)to[y/x]phi))
7, 12bi.bldan<>13((forally([y/x]phito(xeqy))wedgephi)leftrightarrow(forally([y/x]phito(yeqx))wedgeforally((yeqx)to[y/x]phi)))
ancom14((phiwedgeforally([y/x]phito(xeqy)))leftrightarrow(forally([y/x]phito(xeqy))wedgephi))
al.dfbi15(forally([y/x]phileftrightarrow(yeqx))leftrightarrow(forally([y/x]phito(yeqx))wedgeforally((yeqx)to[y/x]phi)))
13, 14, 15<2bitr16((phiwedgeforally([y/x]phito(xeqy)))leftrightarrowforally([y/x]phileftrightarrow(yeqx)))
16eqt-∃-i17(existsx(phiwedgeforally([y/x]phito(xeqy)))leftrightarrowexistsxforally([y/x]phileftrightarrow(yeqx)))
3, 4, 17<2bitr18(_e1xphileftrightarrowexistsx(phiwedgeforally([y/x]phito(xeqy))))