Theorem wl-equsald 33325

Description: Deduction version of equsal 2291. (Contributed by Wolf Lammen, 27-Jul-2019.)

Hypotheses

Ref	Expression
wl-equsald.1	⊢ Ⅎ𝑥𝜑
wl-equsald.2	⊢ (𝜑 → Ⅎ𝑥𝜒)
wl-equsald.3	⊢ (𝜑 → (𝑥 = 𝑦 → (𝜓 ↔ 𝜒)))

Assertion

Ref	Expression
wl-equsald	⊢ (𝜑 → (∀𝑥(𝑥 = 𝑦 → 𝜓) ↔ 𝜒))

Proof of Theorem wl-equsald

Step	Hyp	Ref	Expression
1		wl-equsald.2	. . 3 ⊢ (𝜑 → Ⅎ𝑥𝜒)
2		19.23t 2079	. . 3 ⊢ (Ⅎ𝑥𝜒 → (∀𝑥(𝑥 = 𝑦 → 𝜒) ↔ (∃𝑥 𝑥 = 𝑦 → 𝜒)))
3	1, 2	syl 17	. 2 ⊢ (𝜑 → (∀𝑥(𝑥 = 𝑦 → 𝜒) ↔ (∃𝑥 𝑥 = 𝑦 → 𝜒)))
4		wl-equsald.1	. . 3 ⊢ Ⅎ𝑥𝜑
5		wl-equsald.3	. . . 4 ⊢ (𝜑 → (𝑥 = 𝑦 → (𝜓 ↔ 𝜒)))
6	5	pm5.74d 262	. . 3 ⊢ (𝜑 → ((𝑥 = 𝑦 → 𝜓) ↔ (𝑥 = 𝑦 → 𝜒)))
7	4, 6	albid 2090	. 2 ⊢ (𝜑 → (∀𝑥(𝑥 = 𝑦 → 𝜓) ↔ ∀𝑥(𝑥 = 𝑦 → 𝜒)))
8		ax6e 2250	. . . 4 ⊢ ∃𝑥 𝑥 = 𝑦
9	8	a1bi 352	. . 3 ⊢ (𝜒 ↔ (∃𝑥 𝑥 = 𝑦 → 𝜒))
10	9	a1i 11	. 2 ⊢ (𝜑 → (𝜒 ↔ (∃𝑥 𝑥 = 𝑦 → 𝜒)))
11	3, 7, 10	3bitr4d 300	1 ⊢ (𝜑 → (∀𝑥(𝑥 = 𝑦 → 𝜓) ↔ 𝜒))

Syntax hints:   → wi 4   ↔ wb 196  ∀wal 1481  ∃wex 1704  Ⅎwnf 1708

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-12 2047  ax-13 2246

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-ex 1705  df-nf 1710

This theorem is referenced by:  wl-equsal  33326  wl-equsal1t  33327  wl-sb6rft  33330