Theorem sbidm 1851

Description: An idempotent law for substitution. (Contributed by NM, 30-Jun-1994.) (Proof rewritten by Jim Kingdon, 21-Jan-2018.)

Assertion

Ref	Expression
sbidm	⊢ ([𝑦 / 𝑥][𝑦 / 𝑥]𝜑 ↔ [𝑦 / 𝑥]𝜑)

Proof of Theorem sbidm

Step	Hyp	Ref	Expression
1		df-sb 1763	. . . . 5 ⊢ ([𝑦 / 𝑥]𝜑 ↔ ((𝑥 = 𝑦 → 𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑)))
2	1	simplbi 274	. . . 4 ⊢ ([𝑦 / 𝑥]𝜑 → (𝑥 = 𝑦 → 𝜑))
3	2	sbimi 1764	. . 3 ⊢ ([𝑦 / 𝑥][𝑦 / 𝑥]𝜑 → [𝑦 / 𝑥](𝑥 = 𝑦 → 𝜑))
4		sbequ8 1847	. . 3 ⊢ ([𝑦 / 𝑥]𝜑 ↔ [𝑦 / 𝑥](𝑥 = 𝑦 → 𝜑))
5	3, 4	sylibr 134	. 2 ⊢ ([𝑦 / 𝑥][𝑦 / 𝑥]𝜑 → [𝑦 / 𝑥]𝜑)
6		ax-1 6	. . 3 ⊢ ([𝑦 / 𝑥]𝜑 → (𝑥 = 𝑦 → [𝑦 / 𝑥]𝜑))
7		sb1 1766	. . . 4 ⊢ ([𝑦 / 𝑥]𝜑 → ∃𝑥(𝑥 = 𝑦 ∧ 𝜑))
8		pm4.24 395	. . . . . . . 8 ⊢ (∃𝑥(𝑥 = 𝑦 ∧ 𝜑) ↔ (∃𝑥(𝑥 = 𝑦 ∧ 𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑)))
9		ax-ie1 1493	. . . . . . . . 9 ⊢ (∃𝑥(𝑥 = 𝑦 ∧ 𝜑) → ∀𝑥∃𝑥(𝑥 = 𝑦 ∧ 𝜑))
10	9	19.41h 1685	. . . . . . . 8 ⊢ (∃𝑥((𝑥 = 𝑦 ∧ 𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑)) ↔ (∃𝑥(𝑥 = 𝑦 ∧ 𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑)))
11	8, 10	bitr4i 187	. . . . . . 7 ⊢ (∃𝑥(𝑥 = 𝑦 ∧ 𝜑) ↔ ∃𝑥((𝑥 = 𝑦 ∧ 𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑)))
12		ax-1 6	. . . . . . . . . 10 ⊢ (𝜑 → (𝑥 = 𝑦 → 𝜑))
13	12	anim2i 342	. . . . . . . . 9 ⊢ ((𝑥 = 𝑦 ∧ 𝜑) → (𝑥 = 𝑦 ∧ (𝑥 = 𝑦 → 𝜑)))
14	13	anim1i 340	. . . . . . . 8 ⊢ (((𝑥 = 𝑦 ∧ 𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑)) → ((𝑥 = 𝑦 ∧ (𝑥 = 𝑦 → 𝜑)) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑)))
15	14	eximi 1600	. . . . . . 7 ⊢ (∃𝑥((𝑥 = 𝑦 ∧ 𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑)) → ∃𝑥((𝑥 = 𝑦 ∧ (𝑥 = 𝑦 → 𝜑)) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑)))
16	11, 15	sylbi 121	. . . . . 6 ⊢ (∃𝑥(𝑥 = 𝑦 ∧ 𝜑) → ∃𝑥((𝑥 = 𝑦 ∧ (𝑥 = 𝑦 → 𝜑)) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑)))
17		anass 401	. . . . . . 7 ⊢ (((𝑥 = 𝑦 ∧ (𝑥 = 𝑦 → 𝜑)) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑)) ↔ (𝑥 = 𝑦 ∧ ((𝑥 = 𝑦 → 𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑))))
18	17	exbii 1605	. . . . . 6 ⊢ (∃𝑥((𝑥 = 𝑦 ∧ (𝑥 = 𝑦 → 𝜑)) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑)) ↔ ∃𝑥(𝑥 = 𝑦 ∧ ((𝑥 = 𝑦 → 𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑))))
19	16, 18	sylib 122	. . . . 5 ⊢ (∃𝑥(𝑥 = 𝑦 ∧ 𝜑) → ∃𝑥(𝑥 = 𝑦 ∧ ((𝑥 = 𝑦 → 𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑))))
20	1	anbi2i 457	. . . . . 6 ⊢ ((𝑥 = 𝑦 ∧ [𝑦 / 𝑥]𝜑) ↔ (𝑥 = 𝑦 ∧ ((𝑥 = 𝑦 → 𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑))))
21	20	exbii 1605	. . . . 5 ⊢ (∃𝑥(𝑥 = 𝑦 ∧ [𝑦 / 𝑥]𝜑) ↔ ∃𝑥(𝑥 = 𝑦 ∧ ((𝑥 = 𝑦 → 𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ 𝜑))))
22	19, 21	sylibr 134	. . . 4 ⊢ (∃𝑥(𝑥 = 𝑦 ∧ 𝜑) → ∃𝑥(𝑥 = 𝑦 ∧ [𝑦 / 𝑥]𝜑))
23	7, 22	syl 14	. . 3 ⊢ ([𝑦 / 𝑥]𝜑 → ∃𝑥(𝑥 = 𝑦 ∧ [𝑦 / 𝑥]𝜑))
24		df-sb 1763	. . 3 ⊢ ([𝑦 / 𝑥][𝑦 / 𝑥]𝜑 ↔ ((𝑥 = 𝑦 → [𝑦 / 𝑥]𝜑) ∧ ∃𝑥(𝑥 = 𝑦 ∧ [𝑦 / 𝑥]𝜑)))
25	6, 23, 24	sylanbrc 417	. 2 ⊢ ([𝑦 / 𝑥]𝜑 → [𝑦 / 𝑥][𝑦 / 𝑥]𝜑)
26	5, 25	impbii 126	1 ⊢ ([𝑦 / 𝑥][𝑦 / 𝑥]𝜑 ↔ [𝑦 / 𝑥]𝜑)

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105  ∃wex 1492  [wsb 1762

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-5 1447  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-4 1510  ax-ial 1534

This theorem depends on definitions:  df-bi 117  df-sb 1763

This theorem is referenced by: (None)