Theorem wl-equsald 34773

Description: Deduction version of equsal 2435. (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 2205	. . 3 ⊢ (Ⅎ𝑥𝜒 → (∀𝑥(𝑥 = 𝑦 → 𝜒) ↔ (∃𝑥 𝑥 = 𝑦 → 𝜒)))
3	1, 2	syl 17	. 2 ⊢ (𝜑 → (∀𝑥(𝑥 = 𝑦 → 𝜒) ↔ (∃𝑥 𝑥 = 𝑦 → 𝜒)))
4		wl-equsald.1	. . 3 ⊢ Ⅎ𝑥𝜑
5		wl-equsald.3	. . . 4 ⊢ (𝜑 → (𝑥 = 𝑦 → (𝜓 ↔ 𝜒)))
6	5	pm5.74d 275	. . 3 ⊢ (𝜑 → ((𝑥 = 𝑦 → 𝜓) ↔ (𝑥 = 𝑦 → 𝜒)))
7	4, 6	albid 2219	. 2 ⊢ (𝜑 → (∀𝑥(𝑥 = 𝑦 → 𝜓) ↔ ∀𝑥(𝑥 = 𝑦 → 𝜒)))
8		ax6e 2397	. . . 4 ⊢ ∃𝑥 𝑥 = 𝑦
9	8	a1bi 365	. . 3 ⊢ (𝜒 ↔ (∃𝑥 𝑥 = 𝑦 → 𝜒))
10	9	a1i 11	. 2 ⊢ (𝜑 → (𝜒 ↔ (∃𝑥 𝑥 = 𝑦 → 𝜒)))
11	3, 7, 10	3bitr4d 313	1 ⊢ (𝜑 → (∀𝑥(𝑥 = 𝑦 → 𝜓) ↔ 𝜒))

Syntax hints:   → wi 4   ↔ wb 208  ∀wal 1531  ∃wex 1776  Ⅎwnf 1780

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-12 2172  ax-13 2386

This theorem depends on definitions:  df-bi 209  df-an 399  df-ex 1777  df-nf 1781

This theorem is referenced by:  wl-equsal  34774  wl-equsal1t  34775  wl-sb6rft  34778