Users' Mathboxes Mathbox for Anthony Hart < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  waj-ax Structured version   Visualization version   GIF version

Theorem waj-ax 37172
Description: A single axiom for propositional calculus discovered by Mordchaj Wajsberg (Logical Works, Polish Academy of Sciences, 1977). See: Fitelson, Some recent results in algebra and logical calculi obtained using automated reasoning, 2003 (axiom W on slide 8). (Contributed by Anthony Hart, 13-Aug-2011.)
Assertion
Ref Expression
waj-ax ((𝜑 ⊼ (𝜓 ⊼ 𝜒)) ⊼ (((𝜃 ⊼ 𝜒) ⊼ ((𝜑 ⊼ 𝜃) ⊼ (𝜑 ⊼ 𝜃))) ⊼ (𝜑 ⊼ (𝜑 ⊼ 𝜓))))

Proof of Theorem waj-ax
StepHypRef Expression
1 nannan 1527 . . 3 ((𝜑 ⊼ (𝜓 ⊼ 𝜒)) ↔ (𝜑 → (𝜓 ∧ 𝜒)))
2 simpr 490 . . . . . . . . 9 ((𝜓 ∧ 𝜒) → 𝜒)
32imim2i 17 . . . . . . . 8 ((𝜑 → (𝜓 ∧ 𝜒)) → (𝜑 → 𝜒))
4 pm2.27 43 . . . . . . . . . 10 (𝜑 → ((𝜑 → 𝜒) → 𝜒))
54anim2d 624 . . . . . . . . 9 (𝜑 → ((𝜃 ∧ (𝜑 → 𝜒)) → (𝜃 ∧ 𝜒)))
65expdimp 458 . . . . . . . 8 ((𝜑 ∧ 𝜃) → ((𝜑 → 𝜒) → (𝜃 ∧ 𝜒)))
73, 6syl5com 32 . . . . . . 7 ((𝜑 → (𝜓 ∧ 𝜒)) → ((𝜑 ∧ 𝜃) → (𝜃 ∧ 𝜒)))
87con3d 153 . . . . . 6 ((𝜑 → (𝜓 ∧ 𝜒)) → (¬ (𝜃 ∧ 𝜒) → ¬ (𝜑 ∧ 𝜃)))
9 df-nan 1522 . . . . . 6 ((𝜃 ⊼ 𝜒) ↔ ¬ (𝜃 ∧ 𝜒))
10 df-nan 1522 . . . . . 6 ((𝜑 ⊼ 𝜃) ↔ ¬ (𝜑 ∧ 𝜃))
118, 9, 103imtr4g 299 . . . . 5 ((𝜑 → (𝜓 ∧ 𝜒)) → ((𝜃 ⊼ 𝜒) → (𝜑 ⊼ 𝜃)))
12 nanim 1528 . . . . 5 (((𝜃 ⊼ 𝜒) → (𝜑 ⊼ 𝜃)) ↔ ((𝜃 ⊼ 𝜒) ⊼ ((𝜑 ⊼ 𝜃) ⊼ (𝜑 ⊼ 𝜃))))
1311, 12sylib 221 . . . 4 ((𝜑 → (𝜓 ∧ 𝜒)) → ((𝜃 ⊼ 𝜒) ⊼ ((𝜑 ⊼ 𝜃) ⊼ (𝜑 ⊼ 𝜃))))
14 pm3.21 477 . . . . . . . 8 (𝜓 → (𝜑 → (𝜑 ∧ 𝜓)))
1514adantr 486 . . . . . . 7 ((𝜓 ∧ 𝜒) → (𝜑 → (𝜑 ∧ 𝜓)))
1615com12 33 . . . . . 6 (𝜑 → ((𝜓 ∧ 𝜒) → (𝜑 ∧ 𝜓)))
1716a2i 15 . . . . 5 ((𝜑 → (𝜓 ∧ 𝜒)) → (𝜑 → (𝜑 ∧ 𝜓)))
18 nannan 1527 . . . . 5 ((𝜑 ⊼ (𝜑 ⊼ 𝜓)) ↔ (𝜑 → (𝜑 ∧ 𝜓)))
1917, 18sylibr 237 . . . 4 ((𝜑 → (𝜓 ∧ 𝜒)) → (𝜑 ⊼ (𝜑 ⊼ 𝜓)))
2013, 19jca 521 . . 3 ((𝜑 → (𝜓 ∧ 𝜒)) → (((𝜃 ⊼ 𝜒) ⊼ ((𝜑 ⊼ 𝜃) ⊼ (𝜑 ⊼ 𝜃))) ∧ (𝜑 ⊼ (𝜑 ⊼ 𝜓))))
211, 20sylbi 220 . 2 ((𝜑 ⊼ (𝜓 ⊼ 𝜒)) → (((𝜃 ⊼ 𝜒) ⊼ ((𝜑 ⊼ 𝜃) ⊼ (𝜑 ⊼ 𝜃))) ∧ (𝜑 ⊼ (𝜑 ⊼ 𝜓))))
22 nannan 1527 . 2 (((𝜑 ⊼ (𝜓 ⊼ 𝜒)) ⊼ (((𝜃 ⊼ 𝜒) ⊼ ((𝜑 ⊼ 𝜃) ⊼ (𝜑 ⊼ 𝜃))) ⊼ (𝜑 ⊼ (𝜑 ⊼ 𝜓)))) ↔ ((𝜑 ⊼ (𝜓 ⊼ 𝜒)) → (((𝜃 ⊼ 𝜒) ⊼ ((𝜑 ⊼ 𝜃) ⊼ (𝜑 ⊼ 𝜃))) ∧ (𝜑 ⊼ (𝜑 ⊼ 𝜓)))))
2321, 22mpbir 234 1 ((𝜑 ⊼ (𝜓 ⊼ 𝜒)) ⊼ (((𝜃 ⊼ 𝜒) ⊼ ((𝜑 ⊼ 𝜃) ⊼ (𝜑 ⊼ 𝜃))) ⊼ (𝜑 ⊼ (𝜑 ⊼ 𝜓))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 401   ⊼ 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-nan 1522
This theorem is used by: (None)
  Copyright terms: Public domain W3C validator