Theorem fveqf1o 6457

Description: Given a bijection 𝐹, produce another bijection 𝐺 which additionally maps two specified points. (Contributed by Mario Carneiro, 30-May-2015.)

Hypothesis

Ref	Expression
fveqf1o.1	⊢ 𝐺 = (𝐹 ∘ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}))

Assertion

Ref	Expression
fveqf1o	⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (𝐺:𝐴–1-1-onto→𝐵 ∧ (𝐺‘𝐶) = 𝐷))

Proof of Theorem fveqf1o

Step	Hyp	Ref	Expression
1		simp1 1054	. . . 4 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → 𝐹:𝐴–1-1-onto→𝐵)
2		f1oi 6086	. . . . . . . 8 ⊢ ( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})):(𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})–1-1-onto→(𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})
3	2	a1i 11	. . . . . . 7 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → ( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})):(𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})–1-1-onto→(𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}))
4		simp2 1055	. . . . . . . 8 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → 𝐶 ∈ 𝐴)
5		f1ocnv 6062	. . . . . . . . . 10 ⊢ (𝐹:𝐴–1-1-onto→𝐵 → ◡𝐹:𝐵–1-1-onto→𝐴)
6		f1of 6050	. . . . . . . . . 10 ⊢ (◡𝐹:𝐵–1-1-onto→𝐴 → ◡𝐹:𝐵⟶𝐴)
7	1, 5, 6	3syl 18	. . . . . . . . 9 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → ◡𝐹:𝐵⟶𝐴)
8		simp3 1056	. . . . . . . . 9 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → 𝐷 ∈ 𝐵)
9	7, 8	ffvelrnd 6268	. . . . . . . 8 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (◡𝐹‘𝐷) ∈ 𝐴)
10		f1oprswap 6092	. . . . . . . 8 ⊢ ((𝐶 ∈ 𝐴 ∧ (◡𝐹‘𝐷) ∈ 𝐴) → {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}:{𝐶, (◡𝐹‘𝐷)}–1-1-onto→{𝐶, (◡𝐹‘𝐷)})
11	4, 9, 10	syl2anc 691	. . . . . . 7 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}:{𝐶, (◡𝐹‘𝐷)}–1-1-onto→{𝐶, (◡𝐹‘𝐷)})
12		incom 3767	. . . . . . . . 9 ⊢ ((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∩ {𝐶, (◡𝐹‘𝐷)}) = ({𝐶, (◡𝐹‘𝐷)} ∩ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}))
13		disjdif 3992	. . . . . . . . 9 ⊢ ({𝐶, (◡𝐹‘𝐷)} ∩ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) = ∅
14	12, 13	eqtri 2632	. . . . . . . 8 ⊢ ((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∩ {𝐶, (◡𝐹‘𝐷)}) = ∅
15	14	a1i 11	. . . . . . 7 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → ((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∩ {𝐶, (◡𝐹‘𝐷)}) = ∅)
16		f1oun 6069	. . . . . . 7 ⊢ (((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})):(𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})–1-1-onto→(𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∧ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}:{𝐶, (◡𝐹‘𝐷)}–1-1-onto→{𝐶, (◡𝐹‘𝐷)}) ∧ (((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∩ {𝐶, (◡𝐹‘𝐷)}) = ∅ ∧ ((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∩ {𝐶, (◡𝐹‘𝐷)}) = ∅)) → (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)})–1-1-onto→((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)}))
17	3, 11, 15, 15, 16	syl22anc 1319	. . . . . 6 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)})–1-1-onto→((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)}))
18		uncom 3719	. . . . . . . 8 ⊢ ((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)}) = ({𝐶, (◡𝐹‘𝐷)} ∪ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}))
19		prssi 4293	. . . . . . . . . 10 ⊢ ((𝐶 ∈ 𝐴 ∧ (◡𝐹‘𝐷) ∈ 𝐴) → {𝐶, (◡𝐹‘𝐷)} ⊆ 𝐴)
20	4, 9, 19	syl2anc 691	. . . . . . . . 9 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → {𝐶, (◡𝐹‘𝐷)} ⊆ 𝐴)
21		undif 4001	. . . . . . . . 9 ⊢ ({𝐶, (◡𝐹‘𝐷)} ⊆ 𝐴 ↔ ({𝐶, (◡𝐹‘𝐷)} ∪ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) = 𝐴)
22	20, 21	sylib 207	. . . . . . . 8 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → ({𝐶, (◡𝐹‘𝐷)} ∪ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) = 𝐴)
23	18, 22	syl5eq 2656	. . . . . . 7 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → ((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)}) = 𝐴)
24		f1oeq2 6041	. . . . . . 7 ⊢ (((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)}) = 𝐴 → ((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)})–1-1-onto→((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)}) ↔ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴–1-1-onto→((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)})))
25	23, 24	syl 17	. . . . . 6 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → ((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)})–1-1-onto→((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)}) ↔ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴–1-1-onto→((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)})))
26	17, 25	mpbid 221	. . . . 5 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴–1-1-onto→((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)}))
27		f1oeq3 6042	. . . . . 6 ⊢ (((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)}) = 𝐴 → ((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴–1-1-onto→((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)}) ↔ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴–1-1-onto→𝐴))
28	23, 27	syl 17	. . . . 5 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → ((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴–1-1-onto→((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∪ {𝐶, (◡𝐹‘𝐷)}) ↔ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴–1-1-onto→𝐴))
29	26, 28	mpbid 221	. . . 4 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴–1-1-onto→𝐴)
30		f1oco 6072	. . . 4 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴–1-1-onto→𝐴) → (𝐹 ∘ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})):𝐴–1-1-onto→𝐵)
31	1, 29, 30	syl2anc 691	. . 3 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (𝐹 ∘ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})):𝐴–1-1-onto→𝐵)
32		fveqf1o.1	. . . 4 ⊢ 𝐺 = (𝐹 ∘ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}))
33		f1oeq1 6040	. . . 4 ⊢ (𝐺 = (𝐹 ∘ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})) → (𝐺:𝐴–1-1-onto→𝐵 ↔ (𝐹 ∘ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})):𝐴–1-1-onto→𝐵))
34	32, 33	ax-mp 5	. . 3 ⊢ (𝐺:𝐴–1-1-onto→𝐵 ↔ (𝐹 ∘ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})):𝐴–1-1-onto→𝐵)
35	31, 34	sylibr 223	. 2 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → 𝐺:𝐴–1-1-onto→𝐵)
36	32	fveq1i 6104	. . . 4 ⊢ (𝐺‘𝐶) = ((𝐹 ∘ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}))‘𝐶)
37		f1of 6050	. . . . . 6 ⊢ ((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴–1-1-onto→𝐴 → (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴⟶𝐴)
38	29, 37	syl 17	. . . . 5 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴⟶𝐴)
39		fvco3 6185	. . . . 5 ⊢ (((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}):𝐴⟶𝐴 ∧ 𝐶 ∈ 𝐴) → ((𝐹 ∘ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}))‘𝐶) = (𝐹‘((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})‘𝐶)))
40	38, 4, 39	syl2anc 691	. . . 4 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → ((𝐹 ∘ (( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}))‘𝐶) = (𝐹‘((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})‘𝐶)))
41	36, 40	syl5eq 2656	. . 3 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (𝐺‘𝐶) = (𝐹‘((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})‘𝐶)))
42		fnresi 5922	. . . . . . . 8 ⊢ ( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) Fn (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})
43	42	a1i 11	. . . . . . 7 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → ( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) Fn (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}))
44		f1ofn 6051	. . . . . . . 8 ⊢ ({⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}:{𝐶, (◡𝐹‘𝐷)}–1-1-onto→{𝐶, (◡𝐹‘𝐷)} → {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩} Fn {𝐶, (◡𝐹‘𝐷)})
45	11, 44	syl 17	. . . . . . 7 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩} Fn {𝐶, (◡𝐹‘𝐷)})
46		prid1g 4239	. . . . . . . 8 ⊢ (𝐶 ∈ 𝐴 → 𝐶 ∈ {𝐶, (◡𝐹‘𝐷)})
47	4, 46	syl 17	. . . . . . 7 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → 𝐶 ∈ {𝐶, (◡𝐹‘𝐷)})
48		fvun2 6180	. . . . . . 7 ⊢ ((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) Fn (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∧ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩} Fn {𝐶, (◡𝐹‘𝐷)} ∧ (((𝐴 ∖ {𝐶, (◡𝐹‘𝐷)}) ∩ {𝐶, (◡𝐹‘𝐷)}) = ∅ ∧ 𝐶 ∈ {𝐶, (◡𝐹‘𝐷)})) → ((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})‘𝐶) = ({⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}‘𝐶))
49	43, 45, 15, 47, 48	syl112anc 1322	. . . . . 6 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → ((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})‘𝐶) = ({⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}‘𝐶))
50		f1ofun 6052	. . . . . . . 8 ⊢ ({⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}:{𝐶, (◡𝐹‘𝐷)}–1-1-onto→{𝐶, (◡𝐹‘𝐷)} → Fun {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})
51	11, 50	syl 17	. . . . . . 7 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → Fun {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})
52		opex 4859	. . . . . . . 8 ⊢ ⟨𝐶, (◡𝐹‘𝐷)⟩ ∈ V
53	52	prid1 4241	. . . . . . 7 ⊢ ⟨𝐶, (◡𝐹‘𝐷)⟩ ∈ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}
54		funopfv 6145	. . . . . . 7 ⊢ (Fun {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩} → (⟨𝐶, (◡𝐹‘𝐷)⟩ ∈ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩} → ({⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}‘𝐶) = (◡𝐹‘𝐷)))
55	51, 53, 54	mpisyl 21	. . . . . 6 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → ({⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩}‘𝐶) = (◡𝐹‘𝐷))
56	49, 55	eqtrd 2644	. . . . 5 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → ((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})‘𝐶) = (◡𝐹‘𝐷))
57	56	fveq2d 6107	. . . 4 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (𝐹‘((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})‘𝐶)) = (𝐹‘(◡𝐹‘𝐷)))
58		f1ocnvfv2 6433	. . . . 5 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐷 ∈ 𝐵) → (𝐹‘(◡𝐹‘𝐷)) = 𝐷)
59	1, 8, 58	syl2anc 691	. . . 4 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (𝐹‘(◡𝐹‘𝐷)) = 𝐷)
60	57, 59	eqtrd 2644	. . 3 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (𝐹‘((( I ↾ (𝐴 ∖ {𝐶, (◡𝐹‘𝐷)})) ∪ {⟨𝐶, (◡𝐹‘𝐷)⟩, ⟨(◡𝐹‘𝐷), 𝐶⟩})‘𝐶)) = 𝐷)
61	41, 60	eqtrd 2644	. 2 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (𝐺‘𝐶) = 𝐷)
62	35, 61	jca 553	1 ⊢ ((𝐹:𝐴–1-1-onto→𝐵 ∧ 𝐶 ∈ 𝐴 ∧ 𝐷 ∈ 𝐵) → (𝐺:𝐴–1-1-onto→𝐵 ∧ (𝐺‘𝐶) = 𝐷))

Syntax hints:   → wi 4   ↔ wb 195   ∧ wa 383   ∧ w3a 1031   = wceq 1475   ∈ wcel 1977   ∖ cdif 3537   ∪ cun 3538   ∩ cin 3539   ⊆ wss 3540  ∅c0 3874  {cpr 4127  ⟨cop 4131   I cid 4948  ^◡ccnv 5037   ↾ cres 5040   ∘ ccom 5042  Fun wfun 5798   Fn wfn 5799  ⟶wf 5800  –1-1-onto→wf1o 5803  ‘cfv 5804

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-ral 2901  df-rex 2902  df-rab 2905  df-v 3175  df-sbc 3403  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-nul 3875  df-if 4037  df-sn 4126  df-pr 4128  df-op 4132  df-uni 4373  df-br 4584  df-opab 4644  df-id 4953  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812

This theorem is referenced by:  infxpenc2  8728