Users' Mathboxes Mathbox for Jonathan Ben-Naim < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  bnj1174 Structured version   Visualization version   GIF version

Theorem bnj1174 35499
Description: Technical lemma for bnj69 35506. This lemma may no longer be used or have become an indirect lemma of the theorem in question (i.e. a lemma of a lemma... of the theorem). (Contributed by Jonathan Ben-Naim, 3-Jun-2011.) (New usage is discouraged.)
Hypotheses
Ref Expression
bnj1174.3 𝐶 = ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵)
bnj1174.59 𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))))
bnj1174.74 (𝜃 → (𝑤𝑅𝑧𝑤 ∈ trCl(𝑋, 𝐴, 𝑅)))
Assertion
Ref Expression
bnj1174 𝑧𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))

Proof of Theorem bnj1174
StepHypRef Expression
1 bnj1174.59 . . . . 5 𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))))
2 bnj1174.74 . . . . . . . . . . . 12 (𝜃 → (𝑤𝑅𝑧𝑤 ∈ trCl(𝑋, 𝐴, 𝑅)))
3 bnj1174.3 . . . . . . . . . . . . . . . 16 𝐶 = ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵)
43eleq2i 2854 . . . . . . . . . . . . . . 15 (𝑤𝐶𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵))
54notbii 323 . . . . . . . . . . . . . 14 𝑤𝐶 ↔ ¬ 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵))
6 ianor 997 . . . . . . . . . . . . . . . . 17 (¬ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ 𝑤𝐵) ↔ (¬ 𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∨ ¬ 𝑤𝐵))
7 elin 3918 . . . . . . . . . . . . . . . . . 18 (𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) ↔ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ 𝑤𝐵))
87notbii 323 . . . . . . . . . . . . . . . . 17 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) ↔ ¬ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ 𝑤𝐵))
9 pm4.62 870 . . . . . . . . . . . . . . . . 17 ((𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → ¬ 𝑤𝐵) ↔ (¬ 𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∨ ¬ 𝑤𝐵))
106, 8, 93bitr4i 306 . . . . . . . . . . . . . . . 16 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) ↔ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → ¬ 𝑤𝐵))
1110biimpi 219 . . . . . . . . . . . . . . 15 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) → (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → ¬ 𝑤𝐵))
1211impcom 413 . . . . . . . . . . . . . 14 ((𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ ¬ 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵)) → ¬ 𝑤𝐵)
135, 12sylan2b 606 . . . . . . . . . . . . 13 ((𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ ¬ 𝑤𝐶) → ¬ 𝑤𝐵)
1413ex 418 . . . . . . . . . . . 12 (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → (¬ 𝑤𝐶 → ¬ 𝑤𝐵))
152, 14syl6 36 . . . . . . . . . . 11 (𝜃 → (𝑤𝑅𝑧 → (¬ 𝑤𝐶 → ¬ 𝑤𝐵)))
1615a2d 30 . . . . . . . . . 10 (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))
1716biantru 539 . . . . . . . . 9 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ↔ ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
18 df-3an 1105 . . . . . . . . 9 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
19 3anass 1111 . . . . . . . . 9 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
2017, 18, 193bitr2i 302 . . . . . . . 8 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ↔ (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
2120imbi2i 339 . . . . . . 7 (((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)))) ↔ ((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))))
2221albii 1852 . . . . . 6 (∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)))) ↔ ∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))))
2322exbii 1881 . . . . 5 (∃𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)))) ↔ ∃𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))))
241, 23mpbi 233 . . . 4 𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
25 imdi 394 . . . . . . . 8 ((𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))) ↔ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
26 pm3.35 815 . . . . . . . 8 (((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))
2725, 26sylan2b 606 . . . . . . 7 (((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))
2827anim2i 629 . . . . . 6 ((𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
2928imim2i 17 . . . . 5 (((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))) → ((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3029alimi 1844 . . . 4 (∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))) → ∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3124, 30bnj101 35220 . . 3 𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
32 ancl 554 . . . . 5 (((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → ((𝜑𝜓) → ((𝜑𝜓) ∧ (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
33 bnj256 35203 . . . . 5 ((𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))) ↔ ((𝜑𝜓) ∧ (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3432, 33imbitrrdi 255 . . . 4 (((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → ((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3534alimi 1844 . . 3 (∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → ∀𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3631, 35bnj101 35220 . 2 𝑧𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
37 df-bnj17 35184 . . . . 5 ((𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))) ↔ ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
3837imbi2i 339 . . . 4 (((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3938albii 1852 . . 3 (∀𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ∀𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
4039exbii 1881 . 2 (∃𝑧𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ∃𝑧𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
4136, 40mpbi 233 1 𝑧𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wa 401  wo 861  w3a 1103  wal 1568   = wceq 1570  wex 1812  wcel 2145  cin 3901   class class class wbr 5107  w-bnj17 35183   trClc-bnj18 35191
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-ext 2734
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-ex 1813  df-sb 2100  df-clab 2741  df-cleq 2754  df-clel 2837  df-v 3455  df-in 3909  df-bnj17 35184
This theorem is used by:  bnj1190  35504
  Copyright terms: Public domain W3C validator