![]() |
Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
|
Mirrors > Home > MPE Home > Th. List > iserd | Structured version Visualization version GIF version |
Description: A reflexive, symmetric, transitive relation is an equivalence relation on its domain. (Contributed by Mario Carneiro, 9-Jul-2014.) (Revised by Mario Carneiro, 12-Aug-2015.) |
Ref | Expression |
---|---|
iserd.1 | ⊢ (𝜑 → Rel 𝑅) |
iserd.2 | ⊢ ((𝜑 ∧ 𝑥𝑅𝑦) → 𝑦𝑅𝑥) |
iserd.3 | ⊢ ((𝜑 ∧ (𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧)) → 𝑥𝑅𝑧) |
iserd.4 | ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↔ 𝑥𝑅𝑥)) |
Ref | Expression |
---|---|
iserd | ⊢ (𝜑 → 𝑅 Er 𝐴) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | iserd.1 | . . 3 ⊢ (𝜑 → Rel 𝑅) | |
2 | eqidd 2736 | . . 3 ⊢ (𝜑 → dom 𝑅 = dom 𝑅) | |
3 | iserd.2 | . . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥𝑅𝑦) → 𝑦𝑅𝑥) | |
4 | 3 | ex 412 | . . . . . . 7 ⊢ (𝜑 → (𝑥𝑅𝑦 → 𝑦𝑅𝑥)) |
5 | iserd.3 | . . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧)) → 𝑥𝑅𝑧) | |
6 | 5 | ex 412 | . . . . . . 7 ⊢ (𝜑 → ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) |
7 | 4, 6 | jca 511 | . . . . . 6 ⊢ (𝜑 → ((𝑥𝑅𝑦 → 𝑦𝑅𝑥) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧))) |
8 | 7 | alrimiv 1925 | . . . . 5 ⊢ (𝜑 → ∀𝑧((𝑥𝑅𝑦 → 𝑦𝑅𝑥) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧))) |
9 | 8 | alrimiv 1925 | . . . 4 ⊢ (𝜑 → ∀𝑦∀𝑧((𝑥𝑅𝑦 → 𝑦𝑅𝑥) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧))) |
10 | 9 | alrimiv 1925 | . . 3 ⊢ (𝜑 → ∀𝑥∀𝑦∀𝑧((𝑥𝑅𝑦 → 𝑦𝑅𝑥) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧))) |
11 | dfer2 8745 | . . 3 ⊢ (𝑅 Er dom 𝑅 ↔ (Rel 𝑅 ∧ dom 𝑅 = dom 𝑅 ∧ ∀𝑥∀𝑦∀𝑧((𝑥𝑅𝑦 → 𝑦𝑅𝑥) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)))) | |
12 | 1, 2, 10, 11 | syl3anbrc 1342 | . 2 ⊢ (𝜑 → 𝑅 Er dom 𝑅) |
13 | 12 | adantr 480 | . . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ dom 𝑅) → 𝑅 Er dom 𝑅) |
14 | simpr 484 | . . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ dom 𝑅) → 𝑥 ∈ dom 𝑅) | |
15 | 13, 14 | erref 8764 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ dom 𝑅) → 𝑥𝑅𝑥) |
16 | 15 | ex 412 | . . . . . 6 ⊢ (𝜑 → (𝑥 ∈ dom 𝑅 → 𝑥𝑅𝑥)) |
17 | vex 3482 | . . . . . . 7 ⊢ 𝑥 ∈ V | |
18 | 17, 17 | breldm 5922 | . . . . . 6 ⊢ (𝑥𝑅𝑥 → 𝑥 ∈ dom 𝑅) |
19 | 16, 18 | impbid1 225 | . . . . 5 ⊢ (𝜑 → (𝑥 ∈ dom 𝑅 ↔ 𝑥𝑅𝑥)) |
20 | iserd.4 | . . . . 5 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↔ 𝑥𝑅𝑥)) | |
21 | 19, 20 | bitr4d 282 | . . . 4 ⊢ (𝜑 → (𝑥 ∈ dom 𝑅 ↔ 𝑥 ∈ 𝐴)) |
22 | 21 | eqrdv 2733 | . . 3 ⊢ (𝜑 → dom 𝑅 = 𝐴) |
23 | ereq2 8752 | . . 3 ⊢ (dom 𝑅 = 𝐴 → (𝑅 Er dom 𝑅 ↔ 𝑅 Er 𝐴)) | |
24 | 22, 23 | syl 17 | . 2 ⊢ (𝜑 → (𝑅 Er dom 𝑅 ↔ 𝑅 Er 𝐴)) |
25 | 12, 24 | mpbid 232 | 1 ⊢ (𝜑 → 𝑅 Er 𝐴) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∀wal 1535 = wceq 1537 ∈ wcel 2106 class class class wbr 5148 dom cdm 5689 Rel wrel 5694 Er wer 8741 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1792 ax-4 1806 ax-5 1908 ax-6 1965 ax-7 2005 ax-8 2108 ax-9 2116 ax-ext 2706 ax-sep 5302 ax-nul 5312 ax-pr 5438 |
This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3an 1088 df-tru 1540 df-fal 1550 df-ex 1777 df-sb 2063 df-clab 2713 df-cleq 2727 df-clel 2814 df-ral 3060 df-rex 3069 df-rab 3434 df-v 3480 df-dif 3966 df-un 3968 df-ss 3980 df-nul 4340 df-if 4532 df-sn 4632 df-pr 4634 df-op 4638 df-br 5149 df-opab 5211 df-xp 5695 df-rel 5696 df-cnv 5697 df-co 5698 df-dm 5699 df-er 8744 |
This theorem is referenced by: iseri 8771 iseriALT 8772 swoer 8775 iiner 8828 erinxp 8830 cicer 17854 eqger 19209 gaorber 19339 efgrelexlemb 19783 efgcpbllemb 19788 xmeter 24459 ercgrg 28540 erler 33252 metider 33855 prjsper 42595 |
Copyright terms: Public domain | W3C validator |