Theorem dedth4h 4526

Description: Weak deduction theorem eliminating four hypotheses. See comments in dedth2h 4524. (Contributed by NM, 16-May-1999.)

Hypotheses

Ref	Expression
dedth4h.1	⊢ (𝐴 = if(𝜑, 𝐴, 𝑅) → (𝜏 ↔ 𝜂))
dedth4h.2	⊢ (𝐵 = if(𝜓, 𝐵, 𝑆) → (𝜂 ↔ 𝜁))
dedth4h.3	⊢ (𝐶 = if(𝜒, 𝐶, 𝐹) → (𝜁 ↔ 𝜎))
dedth4h.4	⊢ (𝐷 = if(𝜃, 𝐷, 𝐺) → (𝜎 ↔ 𝜌))
dedth4h.5	⊢ 𝜌

Assertion

Ref	Expression
dedth4h	⊢ (((𝜑 ∧ 𝜓) ∧ (𝜒 ∧ 𝜃)) → 𝜏)

Proof of Theorem dedth4h

Step	Hyp	Ref	Expression
1		dedth4h.1	. . . 4 ⊢ (𝐴 = if(𝜑, 𝐴, 𝑅) → (𝜏 ↔ 𝜂))
2	1	imbi2d 343	. . 3 ⊢ (𝐴 = if(𝜑, 𝐴, 𝑅) → (((𝜒 ∧ 𝜃) → 𝜏) ↔ ((𝜒 ∧ 𝜃) → 𝜂)))
3		dedth4h.2	. . . 4 ⊢ (𝐵 = if(𝜓, 𝐵, 𝑆) → (𝜂 ↔ 𝜁))
4	3	imbi2d 343	. . 3 ⊢ (𝐵 = if(𝜓, 𝐵, 𝑆) → (((𝜒 ∧ 𝜃) → 𝜂) ↔ ((𝜒 ∧ 𝜃) → 𝜁)))
5		dedth4h.3	. . . 4 ⊢ (𝐶 = if(𝜒, 𝐶, 𝐹) → (𝜁 ↔ 𝜎))
6		dedth4h.4	. . . 4 ⊢ (𝐷 = if(𝜃, 𝐷, 𝐺) → (𝜎 ↔ 𝜌))
7		dedth4h.5	. . . 4 ⊢ 𝜌
8	5, 6, 7	dedth2h 4524	. . 3 ⊢ ((𝜒 ∧ 𝜃) → 𝜁)
9	2, 4, 8	dedth2h 4524	. 2 ⊢ ((𝜑 ∧ 𝜓) → ((𝜒 ∧ 𝜃) → 𝜏))
10	9	imp 409	1 ⊢ (((𝜑 ∧ 𝜓) ∧ (𝜒 ∧ 𝜃)) → 𝜏)

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   = wceq 1537  ifcif 4467

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-ext 2793

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-ex 1781  df-sb 2070  df-clab 2800  df-cleq 2814  df-clel 2893  df-if 4468

This theorem is referenced by:  dedth4v  4529  fprg  6917  omopth  8285  nn0opth2  13633  ax5seglem8  26722  hvsubsub4  28837  norm3lemt  28929  eigorth  29615