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 32883
Description: Technical lemma for bnj69 32890. 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 2830 . . . . . . . . . . . . . . 15 (𝑤𝐶𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵))
54notbii 319 . . . . . . . . . . . . . 14 𝑤𝐶 ↔ ¬ 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵))
6 ianor 978 . . . . . . . . . . . . . . . . 17 (¬ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ 𝑤𝐵) ↔ (¬ 𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∨ ¬ 𝑤𝐵))
7 elin 3899 . . . . . . . . . . . . . . . . . 18 (𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) ↔ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ 𝑤𝐵))
87notbii 319 . . . . . . . . . . . . . . . . 17 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) ↔ ¬ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ 𝑤𝐵))
9 pm4.62 852 . . . . . . . . . . . . . . . . 17 ((𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → ¬ 𝑤𝐵) ↔ (¬ 𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∨ ¬ 𝑤𝐵))
106, 8, 93bitr4i 302 . . . . . . . . . . . . . . . 16 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) ↔ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → ¬ 𝑤𝐵))
1110biimpi 215 . . . . . . . . . . . . . . 15 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) → (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → ¬ 𝑤𝐵))
1211impcom 407 . . . . . . . . . . . . . 14 ((𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ ¬ 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵)) → ¬ 𝑤𝐵)
135, 12sylan2b 593 . . . . . . . . . . . . 13 ((𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ ¬ 𝑤𝐶) → ¬ 𝑤𝐵)
1413ex 412 . . . . . . . . . . . 12 (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → (¬ 𝑤𝐶 → ¬ 𝑤𝐵))
152, 14syl6 35 . . . . . . . . . . 11 (𝜃 → (𝑤𝑅𝑧 → (¬ 𝑤𝐶 → ¬ 𝑤𝐵)))
1615a2d 29 . . . . . . . . . 10 (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))
1716biantru 529 . . . . . . . . 9 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ↔ ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
18 df-3an 1087 . . . . . . . . 9 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
19 3anass 1093 . . . . . . . . 9 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
2017, 18, 193bitr2i 298 . . . . . . . 8 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ↔ (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
2120imbi2i 335 . . . . . . 7 (((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)))) ↔ ((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))))
2221albii 1823 . . . . . 6 (∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)))) ↔ ∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))))
2322exbii 1851 . . . . 5 (∃𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)))) ↔ ∃𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))))
241, 23mpbi 229 . . . 4 𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
25 imdi 390 . . . . . . . 8 ((𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))) ↔ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
26 pm3.35 799 . . . . . . . 8 (((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))
2725, 26sylan2b 593 . . . . . . 7 (((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))
2827anim2i 616 . . . . . 6 ((𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
2928imim2i 16 . . . . 5 (((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))) → ((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3029alimi 1815 . . . 4 (∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))) → ∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3124, 30bnj101 32602 . . 3 𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
32 ancl 544 . . . . 5 (((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → ((𝜑𝜓) → ((𝜑𝜓) ∧ (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
33 bnj256 32585 . . . . 5 ((𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))) ↔ ((𝜑𝜓) ∧ (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3432, 33syl6ibr 251 . . . 4 (((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → ((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3534alimi 1815 . . 3 (∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → ∀𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3631, 35bnj101 32602 . 2 𝑧𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
37 df-bnj17 32566 . . . . 5 ((𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))) ↔ ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
3837imbi2i 335 . . . 4 (((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3938albii 1823 . . 3 (∀𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ∀𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
4039exbii 1851 . 2 (∃𝑧𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ∃𝑧𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
4136, 40mpbi 229 1 𝑧𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  wo 843  w3a 1085  wal 1537   = wceq 1539  wex 1783  wcel 2108  cin 3882   class class class wbr 5070  w-bnj17 32565   trClc-bnj18 32573
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-ext 2709
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3an 1087  df-tru 1542  df-ex 1784  df-sb 2069  df-clab 2716  df-cleq 2730  df-clel 2817  df-v 3424  df-in 3890  df-bnj17 32566
This theorem is referenced by:  bnj1190  32888
  Copyright terms: Public domain W3C validator