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 35300
Description: Technical lemma for bnj69 35307. 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 2856 . . . . . . . . . . . . . . 15 (𝑤𝐶𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵))
54notbii 322 . . . . . . . . . . . . . 14 𝑤𝐶 ↔ ¬ 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵))
6 ianor 995 . . . . . . . . . . . . . . . . 17 (¬ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ 𝑤𝐵) ↔ (¬ 𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∨ ¬ 𝑤𝐵))
7 elin 3922 . . . . . . . . . . . . . . . . . 18 (𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) ↔ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ 𝑤𝐵))
87notbii 322 . . . . . . . . . . . . . . . . 17 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) ↔ ¬ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ 𝑤𝐵))
9 pm4.62 867 . . . . . . . . . . . . . . . . 17 ((𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → ¬ 𝑤𝐵) ↔ (¬ 𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∨ ¬ 𝑤𝐵))
106, 8, 93bitr4i 305 . . . . . . . . . . . . . . . 16 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) ↔ (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → ¬ 𝑤𝐵))
1110biimpi 218 . . . . . . . . . . . . . . 15 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵) → (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → ¬ 𝑤𝐵))
1211impcom 411 . . . . . . . . . . . . . 14 ((𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ ¬ 𝑤 ∈ ( trCl(𝑋, 𝐴, 𝑅) ∩ 𝐵)) → ¬ 𝑤𝐵)
135, 12sylan2b 603 . . . . . . . . . . . . 13 ((𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) ∧ ¬ 𝑤𝐶) → ¬ 𝑤𝐵)
1413ex 416 . . . . . . . . . . . 12 (𝑤 ∈ trCl(𝑋, 𝐴, 𝑅) → (¬ 𝑤𝐶 → ¬ 𝑤𝐵))
152, 14syl6 35 . . . . . . . . . . 11 (𝜃 → (𝑤𝑅𝑧 → (¬ 𝑤𝐶 → ¬ 𝑤𝐵)))
1615a2d 29 . . . . . . . . . 10 (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))
1716biantru 537 . . . . . . . . 9 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ↔ ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
18 df-3an 1101 . . . . . . . . 9 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
19 3anass 1107 . . . . . . . . 9 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
2017, 18, 193bitr2i 301 . . . . . . . 8 ((𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶))) ↔ (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
2120imbi2i 338 . . . . . . 7 (((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)))) ↔ ((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))))
2221albii 1841 . . . . . 6 (∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)))) ↔ ∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))))
2322exbii 1870 . . . . 5 (∃𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)))) ↔ ∃𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))))
241, 23mpbi 232 . . . 4 𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
25 imdi 392 . . . . . . . 8 ((𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))) ↔ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
26 pm3.35 812 . . . . . . . 8 (((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))
2725, 26sylan2b 603 . . . . . . 7 (((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))
2827anim2i 626 . . . . . 6 ((𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
2928imim2i 16 . . . . 5 (((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))) → ((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3029alimi 1833 . . . 4 (∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ ((𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐶)) ∧ (𝜃 → ((𝑤𝑅𝑧 → ¬ 𝑤𝐶) → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))) → ∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3124, 30bnj101 35021 . . 3 𝑧𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
32 ancl 552 . . . . 5 (((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → ((𝜑𝜓) → ((𝜑𝜓) ∧ (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))))
33 bnj256 35004 . . . . 5 ((𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))) ↔ ((𝜑𝜓) ∧ (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3432, 33imbitrrdi 254 . . . 4 (((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → ((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3534alimi 1833 . . 3 (∀𝑤((𝜑𝜓) → (𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) → ∀𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3631, 35bnj101 35021 . 2 𝑧𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
37 df-bnj17 34985 . . . . 5 ((𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))) ↔ ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
3837imbi2i 338 . . . 4 (((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
3938albii 1841 . . 3 (∀𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ∀𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
4039exbii 1870 . 2 (∃𝑧𝑤((𝜑𝜓) → (𝜑𝜓𝑧𝐶 ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))) ↔ ∃𝑧𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵)))))
4136, 40mpbi 232 1 𝑧𝑤((𝜑𝜓) → ((𝜑𝜓𝑧𝐶) ∧ (𝜃 → (𝑤𝑅𝑧 → ¬ 𝑤𝐵))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 399  wo 858  w3a 1099  wal 1560   = wceq 1562  wex 1801  wcel 2144  cin 3905   class class class wbr 5102  w-bnj17 34984   trClc-bnj18 34992
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1817  ax-4 1831  ax-5 1932  ax-6 1989  ax-7 2030  ax-8 2146  ax-9 2154  ax-ext 2736
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1101  df-tru 1565  df-ex 1802  df-sb 2093  df-clab 2743  df-cleq 2756  df-clel 2839  df-v 3458  df-in 3913  df-bnj17 34985
This theorem is referenced by:  bnj1190  35305
  Copyright terms: Public domain W3C validator