Users' Mathboxes Mathbox for Richard Penner < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  ifpor123g Structured version   Visualization version   GIF version

Theorem ifpor123g 44452
Description: Disjunction of conditional logical operators. (Contributed by RP, 18-Apr-2020.)
Assertion
Ref Expression
ifpor123g ((if-(𝜑, 𝜒, 𝜏) ∨ if-(𝜓, 𝜃, 𝜂)) ↔ ((((𝜑 → ¬ 𝜓) ∨ (𝜒 ∨ 𝜃)) ∧ ((𝜓 → 𝜑) ∨ (𝜏 ∨ 𝜃))) ∧ (((𝜑 → 𝜓) ∨ (𝜒 ∨ 𝜂)) ∧ ((¬ 𝜓 → 𝜑) ∨ (𝜏 ∨ 𝜂)))))

Proof of Theorem ifpor123g
StepHypRef Expression
1 df-or 862 . . . 4 ((if-(𝜑, 𝜒, 𝜏) ∨ if-(𝜓, 𝜃, 𝜂)) ↔ (¬ if-(𝜑, 𝜒, 𝜏) → if-(𝜓, 𝜃, 𝜂)))
2 ifpnot23 44422 . . . . 5 (¬ if-(𝜑, 𝜒, 𝜏) ↔ if-(𝜑, ¬ 𝜒, ¬ 𝜏))
32imbi1i 352 . . . 4 ((¬ if-(𝜑, 𝜒, 𝜏) → if-(𝜓, 𝜃, 𝜂)) ↔ (if-(𝜑, ¬ 𝜒, ¬ 𝜏) → if-(𝜓, 𝜃, 𝜂)))
41, 3bitri 278 . . 3 ((if-(𝜑, 𝜒, 𝜏) ∨ if-(𝜓, 𝜃, 𝜂)) ↔ (if-(𝜑, ¬ 𝜒, ¬ 𝜏) → if-(𝜓, 𝜃, 𝜂)))
5 ifpim123g 44444 . . 3 ((if-(𝜑, ¬ 𝜒, ¬ 𝜏) → if-(𝜓, 𝜃, 𝜂)) ↔ ((((𝜑 → ¬ 𝜓) ∨ (¬ 𝜒 → 𝜃)) ∧ ((𝜓 → 𝜑) ∨ (¬ 𝜏 → 𝜃))) ∧ (((𝜑 → 𝜓) ∨ (¬ 𝜒 → 𝜂)) ∧ ((¬ 𝜓 → 𝜑) ∨ (¬ 𝜏 → 𝜂)))))
64, 5bitri 278 . 2 ((if-(𝜑, 𝜒, 𝜏) ∨ if-(𝜓, 𝜃, 𝜂)) ↔ ((((𝜑 → ¬ 𝜓) ∨ (¬ 𝜒 → 𝜃)) ∧ ((𝜓 → 𝜑) ∨ (¬ 𝜏 → 𝜃))) ∧ (((𝜑 → 𝜓) ∨ (¬ 𝜒 → 𝜂)) ∧ ((¬ 𝜓 → 𝜑) ∨ (¬ 𝜏 → 𝜂)))))
7 pm4.64 863 . . . . 5 ((¬ 𝜒 → 𝜃) ↔ (𝜒 ∨ 𝜃))
87orbi2i 926 . . . 4 (((𝜑 → ¬ 𝜓) ∨ (¬ 𝜒 → 𝜃)) ↔ ((𝜑 → ¬ 𝜓) ∨ (𝜒 ∨ 𝜃)))
9 pm4.64 863 . . . . 5 ((¬ 𝜏 → 𝜃) ↔ (𝜏 ∨ 𝜃))
109orbi2i 926 . . . 4 (((𝜓 → 𝜑) ∨ (¬ 𝜏 → 𝜃)) ↔ ((𝜓 → 𝜑) ∨ (𝜏 ∨ 𝜃)))
118, 10anbi12i 640 . . 3 ((((𝜑 → ¬ 𝜓) ∨ (¬ 𝜒 → 𝜃)) ∧ ((𝜓 → 𝜑) ∨ (¬ 𝜏 → 𝜃))) ↔ (((𝜑 → ¬ 𝜓) ∨ (𝜒 ∨ 𝜃)) ∧ ((𝜓 → 𝜑) ∨ (𝜏 ∨ 𝜃))))
12 pm4.64 863 . . . . 5 ((¬ 𝜒 → 𝜂) ↔ (𝜒 ∨ 𝜂))
1312orbi2i 926 . . . 4 (((𝜑 → 𝜓) ∨ (¬ 𝜒 → 𝜂)) ↔ ((𝜑 → 𝜓) ∨ (𝜒 ∨ 𝜂)))
14 pm4.64 863 . . . . 5 ((¬ 𝜏 → 𝜂) ↔ (𝜏 ∨ 𝜂))
1514orbi2i 926 . . . 4 (((¬ 𝜓 → 𝜑) ∨ (¬ 𝜏 → 𝜂)) ↔ ((¬ 𝜓 → 𝜑) ∨ (𝜏 ∨ 𝜂)))
1613, 15anbi12i 640 . . 3 ((((𝜑 → 𝜓) ∨ (¬ 𝜒 → 𝜂)) ∧ ((¬ 𝜓 → 𝜑) ∨ (¬ 𝜏 → 𝜂))) ↔ (((𝜑 → 𝜓) ∨ (𝜒 ∨ 𝜂)) ∧ ((¬ 𝜓 → 𝜑) ∨ (𝜏 ∨ 𝜂))))
1711, 16anbi12i 640 . 2 (((((𝜑 → ¬ 𝜓) ∨ (¬ 𝜒 → 𝜃)) ∧ ((𝜓 → 𝜑) ∨ (¬ 𝜏 → 𝜃))) ∧ (((𝜑 → 𝜓) ∨ (¬ 𝜒 → 𝜂)) ∧ ((¬ 𝜓 → 𝜑) ∨ (¬ 𝜏 → 𝜂)))) ↔ ((((𝜑 → ¬ 𝜓) ∨ (𝜒 ∨ 𝜃)) ∧ ((𝜓 → 𝜑) ∨ (𝜏 ∨ 𝜃))) ∧ (((𝜑 → 𝜓) ∨ (𝜒 ∨ 𝜂)) ∧ ((¬ 𝜓 → 𝜑) ∨ (𝜏 ∨ 𝜂)))))
186, 17bitri 278 1 ((if-(𝜑, 𝜒, 𝜏) ∨ if-(𝜓, 𝜃, 𝜂)) ↔ ((((𝜑 → ¬ 𝜓) ∨ (𝜒 ∨ 𝜃)) ∧ ((𝜓 → 𝜑) ∨ (𝜏 ∨ 𝜃))) ∧ (((𝜑 → 𝜓) ∨ (𝜒 ∨ 𝜂)) ∧ ((¬ 𝜓 → 𝜑) ∨ (𝜏 ∨ 𝜂)))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861  if-wif 1078
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
This theorem is used by: (None)
  Copyright terms: Public domain W3C validator