Theorem sbel2x 1852

Description: Elimination of double substitution. (Contributed by NM, 5-Aug-1993.)

Assertion

Ref	Expression
sbel2x	⊢ (φ ↔ ∃x∃y((x = z ∧ y = w) ∧ [y / w][x / z]φ))

Distinct variable groups:   x,y,z   y,w   φ,x,y

Allowed substitution hints:   φ(z,w)

Proof of Theorem sbel2x

Step	Hyp	Ref	Expression
1		sbelx 1851	. . . . 5 ⊢ ([x / z]φ ↔ ∃y(y = w ∧ [y / w][x / z]φ))
2	1	anbi2i 433	. . . 4 ⊢ ((x = z ∧ [x / z]φ) ↔ (x = z ∧ ∃y(y = w ∧ [y / w][x / z]φ)))
3	2	exbii 1474	. . 3 ⊢ (∃x(x = z ∧ [x / z]φ) ↔ ∃x(x = z ∧ ∃y(y = w ∧ [y / w][x / z]φ)))
4		sbelx 1851	. . 3 ⊢ (φ ↔ ∃x(x = z ∧ [x / z]φ))
5		exdistr 1765	. . 3 ⊢ (∃x∃y(x = z ∧ (y = w ∧ [y / w][x / z]φ)) ↔ ∃x(x = z ∧ ∃y(y = w ∧ [y / w][x / z]φ)))
6	3, 4, 5	3bitr4i 201	. 2 ⊢ (φ ↔ ∃x∃y(x = z ∧ (y = w ∧ [y / w][x / z]φ)))
7		anass 383	. . 3 ⊢ (((x = z ∧ y = w) ∧ [y / w][x / z]φ) ↔ (x = z ∧ (y = w ∧ [y / w][x / z]φ)))
8	7	2exbii 1475	. 2 ⊢ (∃x∃y((x = z ∧ y = w) ∧ [y / w][x / z]φ) ↔ ∃x∃y(x = z ∧ (y = w ∧ [y / w][x / z]φ)))
9	6, 8	bitr4i 176	1 ⊢ (φ ↔ ∃x∃y((x = z ∧ y = w) ∧ [y / w][x / z]φ))

Syntax hints:   ∧ wa 97   ↔ wb 98  ∃wex 1358  [wsb 1623

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 99  ax-ia2 100  ax-ia3 101  ax-5 1312  ax-gen 1314  ax-ie1 1359  ax-ie2 1360  ax-8 1372  ax-11 1374  ax-4 1377  ax-17 1396  ax-i9 1400  ax-ial 1405

This theorem depends on definitions:  df-bi 110  df-sb 1624

This theorem is referenced by: (None)