ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  iinerm GIF version

Theorem iinerm 6508
Description: The intersection of a nonempty family of equivalence relations is an equivalence relation. (Contributed by Mario Carneiro, 27-Sep-2015.)
Assertion
Ref Expression
iinerm ((∃𝑦 𝑦𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → 𝑥𝐴 𝑅 Er 𝐵)
Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝑦,𝐴
Allowed substitution hints:   𝐵(𝑦)   𝑅(𝑥,𝑦)

Proof of Theorem iinerm
Dummy variables 𝑢 𝑎 𝑣 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eleq1w 2201 . . . 4 (𝑥 = 𝑎 → (𝑥𝐴𝑎𝐴))
21cbvexv 1891 . . 3 (∃𝑥 𝑥𝐴 ↔ ∃𝑎 𝑎𝐴)
3 eleq1w 2201 . . . 4 (𝑎 = 𝑦 → (𝑎𝐴𝑦𝐴))
43cbvexv 1891 . . 3 (∃𝑎 𝑎𝐴 ↔ ∃𝑦 𝑦𝐴)
52, 4bitri 183 . 2 (∃𝑥 𝑥𝐴 ↔ ∃𝑦 𝑦𝐴)
6 r19.2m 3453 . . . . 5 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → ∃𝑥𝐴 𝑅 Er 𝐵)
7 errel 6445 . . . . . . 7 (𝑅 Er 𝐵 → Rel 𝑅)
8 df-rel 4553 . . . . . . 7 (Rel 𝑅𝑅 ⊆ (V × V))
97, 8sylib 121 . . . . . 6 (𝑅 Er 𝐵𝑅 ⊆ (V × V))
109reximi 2532 . . . . 5 (∃𝑥𝐴 𝑅 Er 𝐵 → ∃𝑥𝐴 𝑅 ⊆ (V × V))
11 iinss 3871 . . . . 5 (∃𝑥𝐴 𝑅 ⊆ (V × V) → 𝑥𝐴 𝑅 ⊆ (V × V))
126, 10, 113syl 17 . . . 4 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → 𝑥𝐴 𝑅 ⊆ (V × V))
13 df-rel 4553 . . . 4 (Rel 𝑥𝐴 𝑅 𝑥𝐴 𝑅 ⊆ (V × V))
1412, 13sylibr 133 . . 3 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → Rel 𝑥𝐴 𝑅)
15 id 19 . . . . . . . . . 10 (𝑅 Er 𝐵𝑅 Er 𝐵)
1615ersymb 6450 . . . . . . . . 9 (𝑅 Er 𝐵 → (𝑢𝑅𝑣𝑣𝑅𝑢))
1716biimpd 143 . . . . . . . 8 (𝑅 Er 𝐵 → (𝑢𝑅𝑣𝑣𝑅𝑢))
18 df-br 3937 . . . . . . . 8 (𝑢𝑅𝑣 ↔ ⟨𝑢, 𝑣⟩ ∈ 𝑅)
19 df-br 3937 . . . . . . . 8 (𝑣𝑅𝑢 ↔ ⟨𝑣, 𝑢⟩ ∈ 𝑅)
2017, 18, 193imtr3g 203 . . . . . . 7 (𝑅 Er 𝐵 → (⟨𝑢, 𝑣⟩ ∈ 𝑅 → ⟨𝑣, 𝑢⟩ ∈ 𝑅))
2120ral2imi 2500 . . . . . 6 (∀𝑥𝐴 𝑅 Er 𝐵 → (∀𝑥𝐴𝑢, 𝑣⟩ ∈ 𝑅 → ∀𝑥𝐴𝑣, 𝑢⟩ ∈ 𝑅))
2221adantl 275 . . . . 5 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → (∀𝑥𝐴𝑢, 𝑣⟩ ∈ 𝑅 → ∀𝑥𝐴𝑣, 𝑢⟩ ∈ 𝑅))
23 df-br 3937 . . . . . 6 (𝑢 𝑥𝐴 𝑅𝑣 ↔ ⟨𝑢, 𝑣⟩ ∈ 𝑥𝐴 𝑅)
24 vex 2692 . . . . . . . 8 𝑢 ∈ V
25 vex 2692 . . . . . . . 8 𝑣 ∈ V
2624, 25opex 4158 . . . . . . 7 𝑢, 𝑣⟩ ∈ V
27 eliin 3825 . . . . . . 7 (⟨𝑢, 𝑣⟩ ∈ V → (⟨𝑢, 𝑣⟩ ∈ 𝑥𝐴 𝑅 ↔ ∀𝑥𝐴𝑢, 𝑣⟩ ∈ 𝑅))
2826, 27ax-mp 5 . . . . . 6 (⟨𝑢, 𝑣⟩ ∈ 𝑥𝐴 𝑅 ↔ ∀𝑥𝐴𝑢, 𝑣⟩ ∈ 𝑅)
2923, 28bitri 183 . . . . 5 (𝑢 𝑥𝐴 𝑅𝑣 ↔ ∀𝑥𝐴𝑢, 𝑣⟩ ∈ 𝑅)
30 df-br 3937 . . . . . 6 (𝑣 𝑥𝐴 𝑅𝑢 ↔ ⟨𝑣, 𝑢⟩ ∈ 𝑥𝐴 𝑅)
3125, 24opex 4158 . . . . . . 7 𝑣, 𝑢⟩ ∈ V
32 eliin 3825 . . . . . . 7 (⟨𝑣, 𝑢⟩ ∈ V → (⟨𝑣, 𝑢⟩ ∈ 𝑥𝐴 𝑅 ↔ ∀𝑥𝐴𝑣, 𝑢⟩ ∈ 𝑅))
3331, 32ax-mp 5 . . . . . 6 (⟨𝑣, 𝑢⟩ ∈ 𝑥𝐴 𝑅 ↔ ∀𝑥𝐴𝑣, 𝑢⟩ ∈ 𝑅)
3430, 33bitri 183 . . . . 5 (𝑣 𝑥𝐴 𝑅𝑢 ↔ ∀𝑥𝐴𝑣, 𝑢⟩ ∈ 𝑅)
3522, 29, 343imtr4g 204 . . . 4 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → (𝑢 𝑥𝐴 𝑅𝑣𝑣 𝑥𝐴 𝑅𝑢))
3635imp 123 . . 3 (((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) ∧ 𝑢 𝑥𝐴 𝑅𝑣) → 𝑣 𝑥𝐴 𝑅𝑢)
37 r19.26 2561 . . . . . 6 (∀𝑥𝐴 (⟨𝑢, 𝑣⟩ ∈ 𝑅 ∧ ⟨𝑣, 𝑤⟩ ∈ 𝑅) ↔ (∀𝑥𝐴𝑢, 𝑣⟩ ∈ 𝑅 ∧ ∀𝑥𝐴𝑣, 𝑤⟩ ∈ 𝑅))
3815ertr 6451 . . . . . . . . 9 (𝑅 Er 𝐵 → ((𝑢𝑅𝑣𝑣𝑅𝑤) → 𝑢𝑅𝑤))
39 df-br 3937 . . . . . . . . . 10 (𝑣𝑅𝑤 ↔ ⟨𝑣, 𝑤⟩ ∈ 𝑅)
4018, 39anbi12i 456 . . . . . . . . 9 ((𝑢𝑅𝑣𝑣𝑅𝑤) ↔ (⟨𝑢, 𝑣⟩ ∈ 𝑅 ∧ ⟨𝑣, 𝑤⟩ ∈ 𝑅))
41 df-br 3937 . . . . . . . . 9 (𝑢𝑅𝑤 ↔ ⟨𝑢, 𝑤⟩ ∈ 𝑅)
4238, 40, 413imtr3g 203 . . . . . . . 8 (𝑅 Er 𝐵 → ((⟨𝑢, 𝑣⟩ ∈ 𝑅 ∧ ⟨𝑣, 𝑤⟩ ∈ 𝑅) → ⟨𝑢, 𝑤⟩ ∈ 𝑅))
4342ral2imi 2500 . . . . . . 7 (∀𝑥𝐴 𝑅 Er 𝐵 → (∀𝑥𝐴 (⟨𝑢, 𝑣⟩ ∈ 𝑅 ∧ ⟨𝑣, 𝑤⟩ ∈ 𝑅) → ∀𝑥𝐴𝑢, 𝑤⟩ ∈ 𝑅))
4443adantl 275 . . . . . 6 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → (∀𝑥𝐴 (⟨𝑢, 𝑣⟩ ∈ 𝑅 ∧ ⟨𝑣, 𝑤⟩ ∈ 𝑅) → ∀𝑥𝐴𝑢, 𝑤⟩ ∈ 𝑅))
4537, 44syl5bir 152 . . . . 5 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → ((∀𝑥𝐴𝑢, 𝑣⟩ ∈ 𝑅 ∧ ∀𝑥𝐴𝑣, 𝑤⟩ ∈ 𝑅) → ∀𝑥𝐴𝑢, 𝑤⟩ ∈ 𝑅))
46 df-br 3937 . . . . . . 7 (𝑣 𝑥𝐴 𝑅𝑤 ↔ ⟨𝑣, 𝑤⟩ ∈ 𝑥𝐴 𝑅)
47 vex 2692 . . . . . . . . 9 𝑤 ∈ V
4825, 47opex 4158 . . . . . . . 8 𝑣, 𝑤⟩ ∈ V
49 eliin 3825 . . . . . . . 8 (⟨𝑣, 𝑤⟩ ∈ V → (⟨𝑣, 𝑤⟩ ∈ 𝑥𝐴 𝑅 ↔ ∀𝑥𝐴𝑣, 𝑤⟩ ∈ 𝑅))
5048, 49ax-mp 5 . . . . . . 7 (⟨𝑣, 𝑤⟩ ∈ 𝑥𝐴 𝑅 ↔ ∀𝑥𝐴𝑣, 𝑤⟩ ∈ 𝑅)
5146, 50bitri 183 . . . . . 6 (𝑣 𝑥𝐴 𝑅𝑤 ↔ ∀𝑥𝐴𝑣, 𝑤⟩ ∈ 𝑅)
5229, 51anbi12i 456 . . . . 5 ((𝑢 𝑥𝐴 𝑅𝑣𝑣 𝑥𝐴 𝑅𝑤) ↔ (∀𝑥𝐴𝑢, 𝑣⟩ ∈ 𝑅 ∧ ∀𝑥𝐴𝑣, 𝑤⟩ ∈ 𝑅))
53 df-br 3937 . . . . . 6 (𝑢 𝑥𝐴 𝑅𝑤 ↔ ⟨𝑢, 𝑤⟩ ∈ 𝑥𝐴 𝑅)
5424, 47opex 4158 . . . . . . 7 𝑢, 𝑤⟩ ∈ V
55 eliin 3825 . . . . . . 7 (⟨𝑢, 𝑤⟩ ∈ V → (⟨𝑢, 𝑤⟩ ∈ 𝑥𝐴 𝑅 ↔ ∀𝑥𝐴𝑢, 𝑤⟩ ∈ 𝑅))
5654, 55ax-mp 5 . . . . . 6 (⟨𝑢, 𝑤⟩ ∈ 𝑥𝐴 𝑅 ↔ ∀𝑥𝐴𝑢, 𝑤⟩ ∈ 𝑅)
5753, 56bitri 183 . . . . 5 (𝑢 𝑥𝐴 𝑅𝑤 ↔ ∀𝑥𝐴𝑢, 𝑤⟩ ∈ 𝑅)
5845, 52, 573imtr4g 204 . . . 4 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → ((𝑢 𝑥𝐴 𝑅𝑣𝑣 𝑥𝐴 𝑅𝑤) → 𝑢 𝑥𝐴 𝑅𝑤))
5958imp 123 . . 3 (((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) ∧ (𝑢 𝑥𝐴 𝑅𝑣𝑣 𝑥𝐴 𝑅𝑤)) → 𝑢 𝑥𝐴 𝑅𝑤)
60 simpl 108 . . . . . . . . . . 11 ((𝑅 Er 𝐵𝑢𝐵) → 𝑅 Er 𝐵)
61 simpr 109 . . . . . . . . . . 11 ((𝑅 Er 𝐵𝑢𝐵) → 𝑢𝐵)
6260, 61erref 6456 . . . . . . . . . 10 ((𝑅 Er 𝐵𝑢𝐵) → 𝑢𝑅𝑢)
63 df-br 3937 . . . . . . . . . 10 (𝑢𝑅𝑢 ↔ ⟨𝑢, 𝑢⟩ ∈ 𝑅)
6462, 63sylib 121 . . . . . . . . 9 ((𝑅 Er 𝐵𝑢𝐵) → ⟨𝑢, 𝑢⟩ ∈ 𝑅)
6564expcom 115 . . . . . . . 8 (𝑢𝐵 → (𝑅 Er 𝐵 → ⟨𝑢, 𝑢⟩ ∈ 𝑅))
6665ralimdv 2503 . . . . . . 7 (𝑢𝐵 → (∀𝑥𝐴 𝑅 Er 𝐵 → ∀𝑥𝐴𝑢, 𝑢⟩ ∈ 𝑅))
6766com12 30 . . . . . 6 (∀𝑥𝐴 𝑅 Er 𝐵 → (𝑢𝐵 → ∀𝑥𝐴𝑢, 𝑢⟩ ∈ 𝑅))
6867adantl 275 . . . . 5 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → (𝑢𝐵 → ∀𝑥𝐴𝑢, 𝑢⟩ ∈ 𝑅))
69 r19.26 2561 . . . . . . 7 (∀𝑥𝐴 (𝑅 Er 𝐵 ∧ ⟨𝑢, 𝑢⟩ ∈ 𝑅) ↔ (∀𝑥𝐴 𝑅 Er 𝐵 ∧ ∀𝑥𝐴𝑢, 𝑢⟩ ∈ 𝑅))
70 r19.2m 3453 . . . . . . . . 9 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 (𝑅 Er 𝐵 ∧ ⟨𝑢, 𝑢⟩ ∈ 𝑅)) → ∃𝑥𝐴 (𝑅 Er 𝐵 ∧ ⟨𝑢, 𝑢⟩ ∈ 𝑅))
7124, 24opeldm 4749 . . . . . . . . . . 11 (⟨𝑢, 𝑢⟩ ∈ 𝑅𝑢 ∈ dom 𝑅)
72 erdm 6446 . . . . . . . . . . . . 13 (𝑅 Er 𝐵 → dom 𝑅 = 𝐵)
7372eleq2d 2210 . . . . . . . . . . . 12 (𝑅 Er 𝐵 → (𝑢 ∈ dom 𝑅𝑢𝐵))
7473biimpa 294 . . . . . . . . . . 11 ((𝑅 Er 𝐵𝑢 ∈ dom 𝑅) → 𝑢𝐵)
7571, 74sylan2 284 . . . . . . . . . 10 ((𝑅 Er 𝐵 ∧ ⟨𝑢, 𝑢⟩ ∈ 𝑅) → 𝑢𝐵)
7675rexlimivw 2548 . . . . . . . . 9 (∃𝑥𝐴 (𝑅 Er 𝐵 ∧ ⟨𝑢, 𝑢⟩ ∈ 𝑅) → 𝑢𝐵)
7770, 76syl 14 . . . . . . . 8 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 (𝑅 Er 𝐵 ∧ ⟨𝑢, 𝑢⟩ ∈ 𝑅)) → 𝑢𝐵)
7877ex 114 . . . . . . 7 (∃𝑥 𝑥𝐴 → (∀𝑥𝐴 (𝑅 Er 𝐵 ∧ ⟨𝑢, 𝑢⟩ ∈ 𝑅) → 𝑢𝐵))
7969, 78syl5bir 152 . . . . . 6 (∃𝑥 𝑥𝐴 → ((∀𝑥𝐴 𝑅 Er 𝐵 ∧ ∀𝑥𝐴𝑢, 𝑢⟩ ∈ 𝑅) → 𝑢𝐵))
8079expdimp 257 . . . . 5 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → (∀𝑥𝐴𝑢, 𝑢⟩ ∈ 𝑅𝑢𝐵))
8168, 80impbid 128 . . . 4 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → (𝑢𝐵 ↔ ∀𝑥𝐴𝑢, 𝑢⟩ ∈ 𝑅))
82 df-br 3937 . . . . 5 (𝑢 𝑥𝐴 𝑅𝑢 ↔ ⟨𝑢, 𝑢⟩ ∈ 𝑥𝐴 𝑅)
8324, 24opex 4158 . . . . . 6 𝑢, 𝑢⟩ ∈ V
84 eliin 3825 . . . . . 6 (⟨𝑢, 𝑢⟩ ∈ V → (⟨𝑢, 𝑢⟩ ∈ 𝑥𝐴 𝑅 ↔ ∀𝑥𝐴𝑢, 𝑢⟩ ∈ 𝑅))
8583, 84ax-mp 5 . . . . 5 (⟨𝑢, 𝑢⟩ ∈ 𝑥𝐴 𝑅 ↔ ∀𝑥𝐴𝑢, 𝑢⟩ ∈ 𝑅)
8682, 85bitri 183 . . . 4 (𝑢 𝑥𝐴 𝑅𝑢 ↔ ∀𝑥𝐴𝑢, 𝑢⟩ ∈ 𝑅)
8781, 86syl6bbr 197 . . 3 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → (𝑢𝐵𝑢 𝑥𝐴 𝑅𝑢))
8814, 36, 59, 87iserd 6462 . 2 ((∃𝑥 𝑥𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → 𝑥𝐴 𝑅 Er 𝐵)
895, 88sylanbr 283 1 ((∃𝑦 𝑦𝐴 ∧ ∀𝑥𝐴 𝑅 Er 𝐵) → 𝑥𝐴 𝑅 Er 𝐵)
Colors of variables: wff set class
Syntax hints:  wi 4  wa 103  wb 104  wex 1469  wcel 1481  wral 2417  wrex 2418  Vcvv 2689  wss 3075  cop 3534   ciin 3821   class class class wbr 3936   × cxp 4544  dom cdm 4546  Rel wrel 4551   Er wer 6433
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 699  ax-5 1424  ax-7 1425  ax-gen 1426  ax-ie1 1470  ax-ie2 1471  ax-8 1483  ax-10 1484  ax-11 1485  ax-i12 1486  ax-bndl 1487  ax-4 1488  ax-14 1493  ax-17 1507  ax-i9 1511  ax-ial 1515  ax-i5r 1516  ax-ext 2122  ax-sep 4053  ax-pow 4105  ax-pr 4138
This theorem depends on definitions:  df-bi 116  df-3an 965  df-tru 1335  df-nf 1438  df-sb 1737  df-eu 2003  df-mo 2004  df-clab 2127  df-cleq 2133  df-clel 2136  df-nfc 2271  df-ral 2422  df-rex 2423  df-v 2691  df-un 3079  df-in 3081  df-ss 3088  df-pw 3516  df-sn 3537  df-pr 3538  df-op 3540  df-iin 3823  df-br 3937  df-opab 3997  df-xp 4552  df-rel 4553  df-cnv 4554  df-co 4555  df-dm 4556  df-er 6436
This theorem is referenced by:  riinerm  6509
  Copyright terms: Public domain W3C validator