cnvf1olem - Metamath Proof Explorer

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

Theorem cnvf1olem 8145

Description: Lemma for cnvf1o 8146. (Contributed by Mario Carneiro, 27-Apr-2014.)

**Assertion**
Ref	Expression
cnvf1olem	⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → (𝐶 ∈ ^◡𝐴 ∧ 𝐵 = ∪ ^◡{𝐶}))

**Proof of Theorem cnvf1olem**
Step	Hyp	Ref	Expression
1		simprr 785	. . . . 5 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → 𝐶 = ∪ ^◡{𝐵})
2		1st2nd 8071	. . . . . . . . 9 ⊢ ((Rel 𝐴 ∧ 𝐵 ∈ 𝐴) → 𝐵 = ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩)
3	2	adantrr 730	. . . . . . . 8 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → 𝐵 = ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩)
4	3	sneqd 4596	. . . . . . 7 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → {𝐵} = {⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩})
5	4	cnveqd 5859	. . . . . 6 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → ^◡{𝐵} = ^◡{⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩})
6	5	unieqd 4883	. . . . 5 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → ∪ ^◡{𝐵} = ∪ ^◡{⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩})
7	1, 6	eqtrd 2798	. . . 4 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → 𝐶 = ∪ ^◡{⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩})
8		opswap 6242	. . . 4 ⊢ ∪ ^◡{⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩} = ⟨(2^nd ‘𝐵), (1^st ‘𝐵)⟩
9	7, 8	eqtrdi 2814	. . 3 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → 𝐶 = ⟨(2^nd ‘𝐵), (1^st ‘𝐵)⟩)
10		simprl 783	. . . . 5 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → 𝐵 ∈ 𝐴)
11	3, 10	eqeltrrd 2865	. . . 4 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩ ∈ 𝐴)
12		fvex 6918	. . . . 5 ⊢ (2^nd ‘𝐵) ∈ V
13		fvex 6918	. . . . 5 ⊢ (1^st ‘𝐵) ∈ V
14	12, 13	opelcnv 5865	. . . 4 ⊢ (⟨(2^nd ‘𝐵), (1^st ‘𝐵)⟩ ∈ ^◡𝐴 ↔ ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩ ∈ 𝐴)
15	11, 14	sylibr 237	. . 3 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → ⟨(2^nd ‘𝐵), (1^st ‘𝐵)⟩ ∈ ^◡𝐴)
16	9, 15	eqeltrd 2864	. 2 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → 𝐶 ∈ ^◡𝐴)
17		opswap 6242	. . . 4 ⊢ ∪ ^◡{⟨(2^nd ‘𝐵), (1^st ‘𝐵)⟩} = ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩
18	17	eqcomi 2772	. . 3 ⊢ ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩ = ∪ ^◡{⟨(2^nd ‘𝐵), (1^st ‘𝐵)⟩}
19	9	sneqd 4596	. . . . 5 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → {𝐶} = {⟨(2^nd ‘𝐵), (1^st ‘𝐵)⟩})
20	19	cnveqd 5859	. . . 4 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → ^◡{𝐶} = ^◡{⟨(2^nd ‘𝐵), (1^st ‘𝐵)⟩})
21	20	unieqd 4883	. . 3 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → ∪ ^◡{𝐶} = ∪ ^◡{⟨(2^nd ‘𝐵), (1^st ‘𝐵)⟩})
22	18, 3, 21	3eqtr4a 2824	. 2 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → 𝐵 = ∪ ^◡{𝐶})
23	16, 22	jca 521	1 ⊢ ((Rel 𝐴 ∧ (𝐵 ∈ 𝐴 ∧ 𝐶 = ∪ ^◡{𝐵})) → (𝐶 ∈ ^◡𝐴 ∧ 𝐵 = ∪ ^◡{𝐶}))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ∧ wa 401 = wceq 1570 ∈ wcel 2147 {csn 4588 ⟨cop 4838 ∪ cuni 4870 ^◡ccnv 5654 Rel wrel 5660 ‘cfv 6555 1^st c1st 8020 2^nd c2nd 8021

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1945 ax-6 2002 ax-7 2043 ax-8 2149 ax-9 2157 ax-10 2180 ax-11 2197 ax-12 2216 ax-ext 2735 ax-sep 5252 ax-nul 5263 ax-pr 5395 ax-un 7772

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2102 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2839 df-nfc 2913 df-ne 2960 df-ral 3081 df-rex 3091 df-rab 3417 df-v 3456 df-ss 3901 df-dif 4050 df-in 4094 df-un 4154 df-nul 4282 df-if 4486 df-sn 4589 df-pr 4591 df-op 4839 df-uni 4871 df-br 5107 df-opab 5171 df-mpt 5190 df-id 5550 df-xp 5661 df-rel 5662 df-cnv 5663 df-co 5664 df-dm 5665 df-rn 5666 df-iota 6509 df-fun 6557 df-fv 6563 df-1st 8022 df-2nd 8023

This theorem is used by: cnvf1o 8146 fcnvgreu 33335 gsumhashmul 33695

W3C validator