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 32385
Description: Technical lemma for bnj69 32392. 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 2881 . . . . . . . . . . . . . . 15 (𝑤𝐶𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵))
54notbii 323 . . . . . . . . . . . . . 14 𝑤𝐶 ↔ ¬ 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵))
6 ianor 979 . . . . . . . . . . . . . . . . 17 (¬ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ 𝑤𝐵) ↔ (¬ 𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∨ ¬ 𝑤𝐵))
7 elin 3897 . . . . . . . . . . . . . . . . . 18 (𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) ↔ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ 𝑤𝐵))
87notbii 323 . . . . . . . . . . . . . . . . 17 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) ↔ ¬ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ 𝑤𝐵))
9 pm4.62 853 . . . . . . . . . . . . . . . . 17 ((𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → ¬ 𝑤𝐵) ↔ (¬ 𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∨ ¬ 𝑤𝐵))
106, 8, 93bitr4i 306 . . . . . . . . . . . . . . . 16 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) ↔ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → ¬ 𝑤𝐵))
1110biimpi 219 . . . . . . . . . . . . . . 15 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) → (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → ¬ 𝑤𝐵))
1211impcom 411 . . . . . . . . . . . . . 14 ((𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ ¬ 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵)) → ¬ 𝑤𝐵)
135, 12sylan2b 596 . . . . . . . . . . . . 13 ((𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ ¬ 𝑤𝐶) → ¬ 𝑤𝐵)
1413ex 416 . . . . . . . . . . . 12 (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → (¬ 𝑤𝐶 → ¬ 𝑤𝐵))
152, 14syl6 35 . . . . . . . . . . 11 (𝜃 → (𝑤𝑅𝑧 → (¬ 𝑤𝐶 → ¬ 𝑤𝐵)))
1615a2d 29 . . . . . . . . . 10 (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))
1716biantru 533 . . . . . . . . 9 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ↔ ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
18 df-3an 1086 . . . . . . . . 9 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
19 3anass 1092 . . . . . . . . 9 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
2017, 18, 193bitr2i 302 . . . . . . . 8 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ↔ (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
2120imbi2i 339 . . . . . . 7 (((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)))) ↔ ((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))))
2221albii 1821 . . . . . 6 (∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)))) ↔ ∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))))
2322exbii 1849 . . . . 5 (∃𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)))) ↔ ∃𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))))
241, 23mpbi 233 . . . 4 𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
25 imdi 394 . . . . . . . 8 ((𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))) ↔ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
26 pm3.35 802 . . . . . . . 8 (((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))
2725, 26sylan2b 596 . . . . . . 7 (((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))
2827anim2i 619 . . . . . 6 ((𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
2928imim2i 16 . . . . 5 (((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))) → ((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3029alimi 1813 . . . 4 (∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))) → ∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3124, 30bnj101 32103 . . 3 𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
32 ancl 548 . . . . 5 (((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → ((𝜑𝜓) → ((𝜑𝜓) ∧ (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
33 bnj256 32086 . . . . 5 ((𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))) ↔ ((𝜑𝜓) ∧ (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3432, 33syl6ibr 255 . . . 4 (((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → ((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3534alimi 1813 . . 3 (∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → ∀𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3631, 35bnj101 32103 . 2 𝑧𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
37 df-bnj17 32067 . . . . 5 ((𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))) ↔ ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
3837imbi2i 339 . . . 4 (((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3938albii 1821 . . 3 (∀𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ∀𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
4039exbii 1849 . 2 (∃𝑧𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ∃𝑧𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
4136, 40mpbi 233 1 𝑧𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 399  wo 844  w3a 1084  wal 1536   = wceq 1538  wex 1781  wcel 2111  cin 3880   class class class wbr 5030  w-bnj17 32066   trClc-bnj18 32074
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-ext 2770
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3an 1086  df-ex 1782  df-sb 2070  df-clab 2777  df-cleq 2791  df-clel 2870  df-v 3443  df-in 3888  df-bnj17 32067
This theorem is referenced by:  bnj1190  32390
  Copyright terms: Public domain W3C validator