![]() |
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 2725 | . . 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 1922 | . . . . 5 ⊢ (𝜑 → ∀𝑧((𝑥𝑅𝑦 → 𝑦𝑅𝑥) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧))) |
9 | 8 | alrimiv 1922 | . . . 4 ⊢ (𝜑 → ∀𝑦∀𝑧((𝑥𝑅𝑦 → 𝑦𝑅𝑥) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧))) |
10 | 9 | alrimiv 1922 | . . 3 ⊢ (𝜑 → ∀𝑥∀𝑦∀𝑧((𝑥𝑅𝑦 → 𝑦𝑅𝑥) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧))) |
11 | dfer2 8701 | . . 3 ⊢ (𝑅 Er dom 𝑅 ↔ (Rel 𝑅 ∧ dom 𝑅 = dom 𝑅 ∧ ∀𝑥∀𝑦∀𝑧((𝑥𝑅𝑦 → 𝑦𝑅𝑥) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)))) | |
12 | 1, 2, 10, 11 | syl3anbrc 1340 | . 2 ⊢ (𝜑 → 𝑅 Er dom 𝑅) |
13 | 12 | adantr 480 | . . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ dom 𝑅) → 𝑅 Er dom 𝑅) |
14 | simpr 484 | . . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ dom 𝑅) → 𝑥 ∈ dom 𝑅) | |
15 | 13, 14 | erref 8720 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ dom 𝑅) → 𝑥𝑅𝑥) |
16 | 15 | ex 412 | . . . . . 6 ⊢ (𝜑 → (𝑥 ∈ dom 𝑅 → 𝑥𝑅𝑥)) |
17 | vex 3470 | . . . . . . 7 ⊢ 𝑥 ∈ V | |
18 | 17, 17 | breldm 5899 | . . . . . 6 ⊢ (𝑥𝑅𝑥 → 𝑥 ∈ dom 𝑅) |
19 | 16, 18 | impbid1 224 | . . . . 5 ⊢ (𝜑 → (𝑥 ∈ dom 𝑅 ↔ 𝑥𝑅𝑥)) |
20 | iserd.4 | . . . . 5 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↔ 𝑥𝑅𝑥)) | |
21 | 19, 20 | bitr4d 282 | . . . 4 ⊢ (𝜑 → (𝑥 ∈ dom 𝑅 ↔ 𝑥 ∈ 𝐴)) |
22 | 21 | eqrdv 2722 | . . 3 ⊢ (𝜑 → dom 𝑅 = 𝐴) |
23 | ereq2 8708 | . . 3 ⊢ (dom 𝑅 = 𝐴 → (𝑅 Er dom 𝑅 ↔ 𝑅 Er 𝐴)) | |
24 | 22, 23 | syl 17 | . 2 ⊢ (𝜑 → (𝑅 Er dom 𝑅 ↔ 𝑅 Er 𝐴)) |
25 | 12, 24 | mpbid 231 | 1 ⊢ (𝜑 → 𝑅 Er 𝐴) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ↔ wb 205 ∧ wa 395 ∀wal 1531 = wceq 1533 ∈ wcel 2098 class class class wbr 5139 dom cdm 5667 Rel wrel 5672 Er wer 8697 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1789 ax-4 1803 ax-5 1905 ax-6 1963 ax-7 2003 ax-8 2100 ax-9 2108 ax-ext 2695 ax-sep 5290 ax-nul 5297 ax-pr 5418 |
This theorem depends on definitions: df-bi 206 df-an 396 df-or 845 df-3an 1086 df-tru 1536 df-fal 1546 df-ex 1774 df-sb 2060 df-clab 2702 df-cleq 2716 df-clel 2802 df-ral 3054 df-rex 3063 df-rab 3425 df-v 3468 df-dif 3944 df-un 3946 df-in 3948 df-ss 3958 df-nul 4316 df-if 4522 df-sn 4622 df-pr 4624 df-op 4628 df-br 5140 df-opab 5202 df-xp 5673 df-rel 5674 df-cnv 5675 df-co 5676 df-dm 5677 df-er 8700 |
This theorem is referenced by: iseri 8727 iseriALT 8728 swoer 8730 iiner 8780 erinxp 8782 cicer 17758 eqger 19101 gaorber 19220 efgrelexlemb 19666 efgcpbllemb 19671 xmeter 24283 ercgrg 28262 metider 33394 prjsper 41902 |
Copyright terms: Public domain | W3C validator |