Theorem ifpnannanb 44492

Description: Factor conditional logic operator over nand in terms 2 and 3. (Contributed by RP, 21-Apr-2020.)

Assertion

Ref	Expression
ifpnannanb	⊢ (if-(𝜑, (𝜓 ⊼ 𝜒), (𝜃 ⊼ 𝜏)) ↔ (if-(𝜑, 𝜓, 𝜃) ⊼ if-(𝜑, 𝜒, 𝜏)))

Proof of Theorem ifpnannanb

Step	Hyp	Ref	Expression
1		df-nan 1522	. . 3 ⊢ ((𝜓 ⊼ 𝜒) ↔ ¬ (𝜓 ∧ 𝜒))
2		df-nan 1522	. . 3 ⊢ ((𝜃 ⊼ 𝜏) ↔ ¬ (𝜃 ∧ 𝜏))
3		ifpbi23 44458	. . 3 ⊢ ((((𝜓 ⊼ 𝜒) ↔ ¬ (𝜓 ∧ 𝜒)) ∧ ((𝜃 ⊼ 𝜏) ↔ ¬ (𝜃 ∧ 𝜏))) → (if-(𝜑, (𝜓 ⊼ 𝜒), (𝜃 ⊼ 𝜏)) ↔ if-(𝜑, ¬ (𝜓 ∧ 𝜒), ¬ (𝜃 ∧ 𝜏))))
4	1, 2, 3	mp2an 705	. 2 ⊢ (if-(𝜑, (𝜓 ⊼ 𝜒), (𝜃 ⊼ 𝜏)) ↔ if-(𝜑, ¬ (𝜓 ∧ 𝜒), ¬ (𝜃 ∧ 𝜏)))
5		ifpananb 44491	. . . 4 ⊢ (if-(𝜑, (𝜓 ∧ 𝜒), (𝜃 ∧ 𝜏)) ↔ (if-(𝜑, 𝜓, 𝜃) ∧ if-(𝜑, 𝜒, 𝜏)))
6	5	notbii 323	. . 3 ⊢ (¬ if-(𝜑, (𝜓 ∧ 𝜒), (𝜃 ∧ 𝜏)) ↔ ¬ (if-(𝜑, 𝜓, 𝜃) ∧ if-(𝜑, 𝜒, 𝜏)))
7		ifpnotnotb 44464	. . 3 ⊢ (if-(𝜑, ¬ (𝜓 ∧ 𝜒), ¬ (𝜃 ∧ 𝜏)) ↔ ¬ if-(𝜑, (𝜓 ∧ 𝜒), (𝜃 ∧ 𝜏)))
8		df-nan 1522	. . 3 ⊢ ((if-(𝜑, 𝜓, 𝜃) ⊼ if-(𝜑, 𝜒, 𝜏)) ↔ ¬ (if-(𝜑, 𝜓, 𝜃) ∧ if-(𝜑, 𝜒, 𝜏)))
9	6, 7, 8	3bitr4i 306	. 2 ⊢ (if-(𝜑, ¬ (𝜓 ∧ 𝜒), ¬ (𝜃 ∧ 𝜏)) ↔ (if-(𝜑, 𝜓, 𝜃) ⊼ if-(𝜑, 𝜒, 𝜏)))
10	4, 9	bitri 278	1 ⊢ (if-(𝜑, (𝜓 ⊼ 𝜒), (𝜃 ⊼ 𝜏)) ↔ (if-(𝜑, 𝜓, 𝜃) ⊼ if-(𝜑, 𝜒, 𝜏)))

This proof depends on syntax axioms:  ¬ wn 3   ↔ wb 209   ∧ wa 401  if-wif 1078   ⊼ wnan 1521

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-ifp 1079  df-nan 1522

This theorem is used by: (None)