MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  disjprgw Structured version   Visualization version   GIF version

Theorem disjprgw 5026
Description: Version of disjprg 5027 with a disjoint variable condition, which does not require ax-13 2373. (Contributed by Gino Giotto, 26-Jan-2024.)
Hypotheses
Ref Expression
disjprgw.1 (𝑥 = 𝐴𝐶 = 𝐷)
disjprgw.2 (𝑥 = 𝐵𝐶 = 𝐸)
Assertion
Ref Expression
disjprgw ((𝐴𝑉𝐵𝑉𝐴𝐵) → (Disj 𝑥 ∈ {𝐴, 𝐵}𝐶 ↔ (𝐷𝐸) = ∅))
Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝑥,𝐷   𝑥,𝐸
Allowed substitution hints:   𝐶(𝑥)   𝑉(𝑥)

Proof of Theorem disjprgw
Dummy variables 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqeq1 2743 . . . . . . 7 (𝑦 = 𝐴 → (𝑦 = 𝑧𝐴 = 𝑧))
2 nfcv 2900 . . . . . . . . . 10 𝑥𝐴
3 nfcv 2900 . . . . . . . . . 10 𝑥𝐷
4 disjprgw.1 . . . . . . . . . 10 (𝑥 = 𝐴𝐶 = 𝐷)
52, 3, 4csbhypf 3819 . . . . . . . . 9 (𝑦 = 𝐴𝑦 / 𝑥𝐶 = 𝐷)
65ineq1d 4103 . . . . . . . 8 (𝑦 = 𝐴 → (𝑦 / 𝑥𝐶𝑧 / 𝑥𝐶) = (𝐷𝑧 / 𝑥𝐶))
76eqeq1d 2741 . . . . . . 7 (𝑦 = 𝐴 → ((𝑦 / 𝑥𝐶𝑧 / 𝑥𝐶) = ∅ ↔ (𝐷𝑧 / 𝑥𝐶) = ∅))
81, 7orbi12d 918 . . . . . 6 (𝑦 = 𝐴 → ((𝑦 = 𝑧 ∨ (𝑦 / 𝑥𝐶𝑧 / 𝑥𝐶) = ∅) ↔ (𝐴 = 𝑧 ∨ (𝐷𝑧 / 𝑥𝐶) = ∅)))
98ralbidv 3110 . . . . 5 (𝑦 = 𝐴 → (∀𝑧 ∈ {𝐴, 𝐵} (𝑦 = 𝑧 ∨ (𝑦 / 𝑥𝐶𝑧 / 𝑥𝐶) = ∅) ↔ ∀𝑧 ∈ {𝐴, 𝐵} (𝐴 = 𝑧 ∨ (𝐷𝑧 / 𝑥𝐶) = ∅)))
10 eqeq1 2743 . . . . . . 7 (𝑦 = 𝐵 → (𝑦 = 𝑧𝐵 = 𝑧))
11 nfcv 2900 . . . . . . . . . 10 𝑥𝐵
12 nfcv 2900 . . . . . . . . . 10 𝑥𝐸
13 disjprgw.2 . . . . . . . . . 10 (𝑥 = 𝐵𝐶 = 𝐸)
1411, 12, 13csbhypf 3819 . . . . . . . . 9 (𝑦 = 𝐵𝑦 / 𝑥𝐶 = 𝐸)
1514ineq1d 4103 . . . . . . . 8 (𝑦 = 𝐵 → (𝑦 / 𝑥𝐶𝑧 / 𝑥𝐶) = (𝐸𝑧 / 𝑥𝐶))
1615eqeq1d 2741 . . . . . . 7 (𝑦 = 𝐵 → ((𝑦 / 𝑥𝐶𝑧 / 𝑥𝐶) = ∅ ↔ (𝐸𝑧 / 𝑥𝐶) = ∅))
1710, 16orbi12d 918 . . . . . 6 (𝑦 = 𝐵 → ((𝑦 = 𝑧 ∨ (𝑦 / 𝑥𝐶𝑧 / 𝑥𝐶) = ∅) ↔ (𝐵 = 𝑧 ∨ (𝐸𝑧 / 𝑥𝐶) = ∅)))
1817ralbidv 3110 . . . . 5 (𝑦 = 𝐵 → (∀𝑧 ∈ {𝐴, 𝐵} (𝑦 = 𝑧 ∨ (𝑦 / 𝑥𝐶𝑧 / 𝑥𝐶) = ∅) ↔ ∀𝑧 ∈ {𝐴, 𝐵} (𝐵 = 𝑧 ∨ (𝐸𝑧 / 𝑥𝐶) = ∅)))
199, 18ralprg 4586 . . . 4 ((𝐴𝑉𝐵𝑉) → (∀𝑦 ∈ {𝐴, 𝐵}∀𝑧 ∈ {𝐴, 𝐵} (𝑦 = 𝑧 ∨ (𝑦 / 𝑥𝐶𝑧 / 𝑥𝐶) = ∅) ↔ (∀𝑧 ∈ {𝐴, 𝐵} (𝐴 = 𝑧 ∨ (𝐷𝑧 / 𝑥𝐶) = ∅) ∧ ∀𝑧 ∈ {𝐴, 𝐵} (𝐵 = 𝑧 ∨ (𝐸𝑧 / 𝑥𝐶) = ∅))))
20193adant3 1133 . . 3 ((𝐴𝑉𝐵𝑉𝐴𝐵) → (∀𝑦 ∈ {𝐴, 𝐵}∀𝑧 ∈ {𝐴, 𝐵} (𝑦 = 𝑧 ∨ (𝑦 / 𝑥𝐶𝑧 / 𝑥𝐶) = ∅) ↔ (∀𝑧 ∈ {𝐴, 𝐵} (𝐴 = 𝑧 ∨ (𝐷𝑧 / 𝑥𝐶) = ∅) ∧ ∀𝑧 ∈ {𝐴, 𝐵} (𝐵 = 𝑧 ∨ (𝐸𝑧 / 𝑥𝐶) = ∅))))
21 id 22 . . . . . . . . . 10 (𝑧 = 𝐴𝑧 = 𝐴)
2221eqcomd 2745 . . . . . . . . 9 (𝑧 = 𝐴𝐴 = 𝑧)
2322orcd 872 . . . . . . . 8 (𝑧 = 𝐴 → (𝐴 = 𝑧 ∨ (𝐷𝑧 / 𝑥𝐶) = ∅))
24 trud 1552 . . . . . . . 8 (𝑧 = 𝐴 → ⊤)
2523, 242thd 268 . . . . . . 7 (𝑧 = 𝐴 → ((𝐴 = 𝑧 ∨ (𝐷𝑧 / 𝑥𝐶) = ∅) ↔ ⊤))
26 eqeq2 2751 . . . . . . . 8 (𝑧 = 𝐵 → (𝐴 = 𝑧𝐴 = 𝐵))
2711, 12, 13csbhypf 3819 . . . . . . . . . 10 (𝑧 = 𝐵𝑧 / 𝑥𝐶 = 𝐸)
2827ineq2d 4104 . . . . . . . . 9 (𝑧 = 𝐵 → (𝐷𝑧 / 𝑥𝐶) = (𝐷𝐸))
2928eqeq1d 2741 . . . . . . . 8 (𝑧 = 𝐵 → ((𝐷𝑧 / 𝑥𝐶) = ∅ ↔ (𝐷𝐸) = ∅))
3026, 29orbi12d 918 . . . . . . 7 (𝑧 = 𝐵 → ((𝐴 = 𝑧 ∨ (𝐷𝑧 / 𝑥𝐶) = ∅) ↔ (𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅)))
3125, 30ralprg 4586 . . . . . 6 ((𝐴𝑉𝐵𝑉) → (∀𝑧 ∈ {𝐴, 𝐵} (𝐴 = 𝑧 ∨ (𝐷𝑧 / 𝑥𝐶) = ∅) ↔ (⊤ ∧ (𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅))))
32313adant3 1133 . . . . 5 ((𝐴𝑉𝐵𝑉𝐴𝐵) → (∀𝑧 ∈ {𝐴, 𝐵} (𝐴 = 𝑧 ∨ (𝐷𝑧 / 𝑥𝐶) = ∅) ↔ (⊤ ∧ (𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅))))
33 simp3 1139 . . . . . . 7 ((𝐴𝑉𝐵𝑉𝐴𝐵) → 𝐴𝐵)
34 neneq 2941 . . . . . . 7 (𝐴𝐵 → ¬ 𝐴 = 𝐵)
35 biorf 936 . . . . . . 7 𝐴 = 𝐵 → ((𝐷𝐸) = ∅ ↔ (𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅)))
3633, 34, 353syl 18 . . . . . 6 ((𝐴𝑉𝐵𝑉𝐴𝐵) → ((𝐷𝐸) = ∅ ↔ (𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅)))
37 tru 1546 . . . . . . 7
3837biantrur 534 . . . . . 6 ((𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅) ↔ (⊤ ∧ (𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅)))
3936, 38bitrdi 290 . . . . 5 ((𝐴𝑉𝐵𝑉𝐴𝐵) → ((𝐷𝐸) = ∅ ↔ (⊤ ∧ (𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅))))
4032, 39bitr4d 285 . . . 4 ((𝐴𝑉𝐵𝑉𝐴𝐵) → (∀𝑧 ∈ {𝐴, 𝐵} (𝐴 = 𝑧 ∨ (𝐷𝑧 / 𝑥𝐶) = ∅) ↔ (𝐷𝐸) = ∅))
41 eqeq2 2751 . . . . . . . . 9 (𝑧 = 𝐴 → (𝐵 = 𝑧𝐵 = 𝐴))
42 eqcom 2746 . . . . . . . . 9 (𝐵 = 𝐴𝐴 = 𝐵)
4341, 42bitrdi 290 . . . . . . . 8 (𝑧 = 𝐴 → (𝐵 = 𝑧𝐴 = 𝐵))
442, 3, 4csbhypf 3819 . . . . . . . . . . 11 (𝑧 = 𝐴𝑧 / 𝑥𝐶 = 𝐷)
4544ineq2d 4104 . . . . . . . . . 10 (𝑧 = 𝐴 → (𝐸𝑧 / 𝑥𝐶) = (𝐸𝐷))
46 incom 4092 . . . . . . . . . 10 (𝐸𝐷) = (𝐷𝐸)
4745, 46eqtrdi 2790 . . . . . . . . 9 (𝑧 = 𝐴 → (𝐸𝑧 / 𝑥𝐶) = (𝐷𝐸))
4847eqeq1d 2741 . . . . . . . 8 (𝑧 = 𝐴 → ((𝐸𝑧 / 𝑥𝐶) = ∅ ↔ (𝐷𝐸) = ∅))
4943, 48orbi12d 918 . . . . . . 7 (𝑧 = 𝐴 → ((𝐵 = 𝑧 ∨ (𝐸𝑧 / 𝑥𝐶) = ∅) ↔ (𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅)))
50 id 22 . . . . . . . . . 10 (𝑧 = 𝐵𝑧 = 𝐵)
5150eqcomd 2745 . . . . . . . . 9 (𝑧 = 𝐵𝐵 = 𝑧)
5251orcd 872 . . . . . . . 8 (𝑧 = 𝐵 → (𝐵 = 𝑧 ∨ (𝐸𝑧 / 𝑥𝐶) = ∅))
53 trud 1552 . . . . . . . 8 (𝑧 = 𝐵 → ⊤)
5452, 532thd 268 . . . . . . 7 (𝑧 = 𝐵 → ((𝐵 = 𝑧 ∨ (𝐸𝑧 / 𝑥𝐶) = ∅) ↔ ⊤))
5549, 54ralprg 4586 . . . . . 6 ((𝐴𝑉𝐵𝑉) → (∀𝑧 ∈ {𝐴, 𝐵} (𝐵 = 𝑧 ∨ (𝐸𝑧 / 𝑥𝐶) = ∅) ↔ ((𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅) ∧ ⊤)))
56553adant3 1133 . . . . 5 ((𝐴𝑉𝐵𝑉𝐴𝐵) → (∀𝑧 ∈ {𝐴, 𝐵} (𝐵 = 𝑧 ∨ (𝐸𝑧 / 𝑥𝐶) = ∅) ↔ ((𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅) ∧ ⊤)))
5737biantru 533 . . . . . 6 ((𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅) ↔ ((𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅) ∧ ⊤))
5836, 57bitrdi 290 . . . . 5 ((𝐴𝑉𝐵𝑉𝐴𝐵) → ((𝐷𝐸) = ∅ ↔ ((𝐴 = 𝐵 ∨ (𝐷𝐸) = ∅) ∧ ⊤)))
5956, 58bitr4d 285 . . . 4 ((𝐴𝑉𝐵𝑉𝐴𝐵) → (∀𝑧 ∈ {𝐴, 𝐵} (𝐵 = 𝑧 ∨ (𝐸𝑧 / 𝑥𝐶) = ∅) ↔ (𝐷𝐸) = ∅))
6040, 59anbi12d 634 . . 3 ((𝐴𝑉𝐵𝑉𝐴𝐵) → ((∀𝑧 ∈ {𝐴, 𝐵} (𝐴 = 𝑧 ∨ (𝐷𝑧 / 𝑥𝐶) = ∅) ∧ ∀𝑧 ∈ {𝐴, 𝐵} (𝐵 = 𝑧 ∨ (𝐸𝑧 / 𝑥𝐶) = ∅)) ↔ ((𝐷𝐸) = ∅ ∧ (𝐷𝐸) = ∅)))
6120, 60bitrd 282 . 2 ((𝐴𝑉𝐵𝑉𝐴𝐵) → (∀𝑦 ∈ {𝐴, 𝐵}∀𝑧 ∈ {𝐴, 𝐵} (𝑦 = 𝑧 ∨ (𝑦 / 𝑥𝐶𝑧 / 𝑥𝐶) = ∅) ↔ ((𝐷𝐸) = ∅ ∧ (𝐷𝐸) = ∅)))
62 disjors 5012 . 2 (Disj 𝑥 ∈ {𝐴, 𝐵}𝐶 ↔ ∀𝑦 ∈ {𝐴, 𝐵}∀𝑧 ∈ {𝐴, 𝐵} (𝑦 = 𝑧 ∨ (𝑦 / 𝑥𝐶𝑧 / 𝑥𝐶) = ∅))
63 pm4.24 567 . 2 ((𝐷𝐸) = ∅ ↔ ((𝐷𝐸) = ∅ ∧ (𝐷𝐸) = ∅))
6461, 62, 633bitr4g 317 1 ((𝐴𝑉𝐵𝑉𝐴𝐵) → (Disj 𝑥 ∈ {𝐴, 𝐵}𝐶 ↔ (𝐷𝐸) = ∅))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399  wo 846  w3a 1088   = wceq 1542  wtru 1543  wcel 2114  wne 2935  wral 3054  csb 3791  cin 3843  c0 4212  {cpr 4519  Disj wdisj 4996
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1975  ax-7 2020  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2162  ax-12 2179  ax-ext 2711
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1787  df-nf 1791  df-sb 2075  df-mo 2541  df-clab 2718  df-cleq 2731  df-clel 2812  df-nfc 2882  df-ne 2936  df-ral 3059  df-rmo 3062  df-rab 3063  df-v 3401  df-sbc 3682  df-csb 3792  df-dif 3847  df-un 3849  df-in 3851  df-nul 4213  df-sn 4518  df-pr 4520  df-disj 4997
This theorem is referenced by:  unelldsys  31699
  Copyright terms: Public domain W3C validator