Theorem ercnv 6555

Description: The converse of an equivalence relation is itself. (Contributed by Mario Carneiro, 12-Aug-2015.)

Assertion

Ref	Expression
ercnv	⊢ (𝑅 Er 𝐴 → ◡𝑅 = 𝑅)

Proof of Theorem ercnv

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		errel 6543	. 2 ⊢ (𝑅 Er 𝐴 → Rel 𝑅)
2		relcnv 5006	. . 3 ⊢ Rel ◡𝑅
3		id 19	. . . . . 6 ⊢ (𝑅 Er 𝐴 → 𝑅 Er 𝐴)
4	3	ersymb 6548	. . . . 5 ⊢ (𝑅 Er 𝐴 → (𝑦𝑅𝑥 ↔ 𝑥𝑅𝑦))
5		vex 2740	. . . . . . 7 ⊢ 𝑥 ∈ V
6		vex 2740	. . . . . . 7 ⊢ 𝑦 ∈ V
7	5, 6	brcnv 4810	. . . . . 6 ⊢ (𝑥◡𝑅𝑦 ↔ 𝑦𝑅𝑥)
8		df-br 4004	. . . . . 6 ⊢ (𝑥◡𝑅𝑦 ↔ ⟨𝑥, 𝑦⟩ ∈ ◡𝑅)
9	7, 8	bitr3i 186	. . . . 5 ⊢ (𝑦𝑅𝑥 ↔ ⟨𝑥, 𝑦⟩ ∈ ◡𝑅)
10		df-br 4004	. . . . 5 ⊢ (𝑥𝑅𝑦 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝑅)
11	4, 9, 10	3bitr3g 222	. . . 4 ⊢ (𝑅 Er 𝐴 → (⟨𝑥, 𝑦⟩ ∈ ◡𝑅 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝑅))
12	11	eqrelrdv2 4725	. . 3 ⊢ (((Rel ◡𝑅 ∧ Rel 𝑅) ∧ 𝑅 Er 𝐴) → ◡𝑅 = 𝑅)
13	2, 12	mpanl1 434	. 2 ⊢ ((Rel 𝑅 ∧ 𝑅 Er 𝐴) → ◡𝑅 = 𝑅)
14	1, 13	mpancom 422	1 ⊢ (𝑅 Er 𝐴 → ◡𝑅 = 𝑅)

Syntax hints:   → wi 4   = wceq 1353   ∈ wcel 2148  ⟨cop 3595   class class class wbr 4003  ^◡ccnv 4625  Rel wrel 4631   Er wer 6531

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-14 2151  ax-ext 2159  ax-sep 4121  ax-pow 4174  ax-pr 4209

This theorem depends on definitions:  df-bi 117  df-3an 980  df-tru 1356  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ral 2460  df-rex 2461  df-v 2739  df-un 3133  df-in 3135  df-ss 3142  df-pw 3577  df-sn 3598  df-pr 3599  df-op 3601  df-br 4004  df-opab 4065  df-xp 4632  df-rel 4633  df-cnv 4634  df-er 6534

This theorem is referenced by:  errn  6556