Theorem sbiedh 1775

Description: Conversion of implicit substitution to explicit substitution (deduction version of sbieh 1778). New proofs should use sbied 1776 instead. (Contributed by NM, 30-Jun-1994.) (Proof shortened by Andrew Salmon, 25-May-2011.) (New usage is discouraged.)

Hypotheses

Ref	Expression
sbiedh.1	⊢ (𝜑 → ∀𝑥𝜑)
sbiedh.2	⊢ (𝜑 → (𝜒 → ∀𝑥𝜒))
sbiedh.3	⊢ (𝜑 → (𝑥 = 𝑦 → (𝜓 ↔ 𝜒)))

Assertion

Ref	Expression
sbiedh	⊢ (𝜑 → ([𝑦 / 𝑥]𝜓 ↔ 𝜒))

Proof of Theorem sbiedh

Step	Hyp	Ref	Expression
1		sb1 1754	. . . 4 ⊢ ([𝑦 / 𝑥]𝜓 → ∃𝑥(𝑥 = 𝑦 ∧ 𝜓))
2		sbiedh.1	. . . . 5 ⊢ (𝜑 → ∀𝑥𝜑)
3		sbiedh.3	. . . . . . 7 ⊢ (𝜑 → (𝑥 = 𝑦 → (𝜓 ↔ 𝜒)))
4		biimp 117	. . . . . . 7 ⊢ ((𝜓 ↔ 𝜒) → (𝜓 → 𝜒))
5	3, 4	syl6 33	. . . . . 6 ⊢ (𝜑 → (𝑥 = 𝑦 → (𝜓 → 𝜒)))
6	5	impd 252	. . . . 5 ⊢ (𝜑 → ((𝑥 = 𝑦 ∧ 𝜓) → 𝜒))
7	2, 6	eximdh 1599	. . . 4 ⊢ (𝜑 → (∃𝑥(𝑥 = 𝑦 ∧ 𝜓) → ∃𝑥𝜒))
8	1, 7	syl5 32	. . 3 ⊢ (𝜑 → ([𝑦 / 𝑥]𝜓 → ∃𝑥𝜒))
9		sbiedh.2	. . . 4 ⊢ (𝜑 → (𝜒 → ∀𝑥𝜒))
10	2, 9	19.9hd 1650	. . 3 ⊢ (𝜑 → (∃𝑥𝜒 → 𝜒))
11	8, 10	syld 45	. 2 ⊢ (𝜑 → ([𝑦 / 𝑥]𝜓 → 𝜒))
12		biimpr 129	. . . . . . 7 ⊢ ((𝜓 ↔ 𝜒) → (𝜒 → 𝜓))
13	3, 12	syl6 33	. . . . . 6 ⊢ (𝜑 → (𝑥 = 𝑦 → (𝜒 → 𝜓)))
14	13	com23 78	. . . . 5 ⊢ (𝜑 → (𝜒 → (𝑥 = 𝑦 → 𝜓)))
15	2, 14	alimdh 1455	. . . 4 ⊢ (𝜑 → (∀𝑥𝜒 → ∀𝑥(𝑥 = 𝑦 → 𝜓)))
16		sb2 1755	. . . 4 ⊢ (∀𝑥(𝑥 = 𝑦 → 𝜓) → [𝑦 / 𝑥]𝜓)
17	15, 16	syl6 33	. . 3 ⊢ (𝜑 → (∀𝑥𝜒 → [𝑦 / 𝑥]𝜓))
18	9, 17	syld 45	. 2 ⊢ (𝜑 → (𝜒 → [𝑦 / 𝑥]𝜓))
19	11, 18	impbid 128	1 ⊢ (𝜑 → ([𝑦 / 𝑥]𝜓 ↔ 𝜒))

Syntax hints:   → wi 4   ∧ wa 103   ↔ wb 104  ∀wal 1341  ∃wex 1480  [wsb 1750

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-5 1435  ax-gen 1437  ax-ie1 1481  ax-ie2 1482  ax-4 1498  ax-i9 1518  ax-ial 1522

This theorem depends on definitions:  df-bi 116  df-sb 1751

This theorem is referenced by:  sbied  1776  sbieh  1778  sbcomxyyz  1960