Theorem f1cof1blem 47044

Description: Lemma for f1cof1b 47047 and focofob 47050. (Contributed by AV, 18-Sep-2024.)

Hypotheses

Ref	Expression
fcores.f	⊢ (𝜑 → 𝐹:𝐴⟶𝐵)
fcores.e	⊢ 𝐸 = (ran 𝐹 ∩ 𝐶)
fcores.p	⊢ 𝑃 = (◡𝐹 “ 𝐶)
fcores.x	⊢ 𝑋 = (𝐹 ↾ 𝑃)
fcores.g	⊢ (𝜑 → 𝐺:𝐶⟶𝐷)
fcores.y	⊢ 𝑌 = (𝐺 ↾ 𝐸)
f1cof1blem.s	⊢ (𝜑 → ran 𝐹 = 𝐶)

Assertion

Ref	Expression
f1cof1blem	⊢ (𝜑 → ((𝑃 = 𝐴 ∧ 𝐸 = 𝐶) ∧ (𝑋 = 𝐹 ∧ 𝑌 = 𝐺)))

Proof of Theorem f1cof1blem

Step	Hyp	Ref	Expression
1		fcores.p	. . . . 5 ⊢ 𝑃 = (◡𝐹 “ 𝐶)
2		f1cof1blem.s	. . . . . . 7 ⊢ (𝜑 → ran 𝐹 = 𝐶)
3	2	eqcomd 2740	. . . . . 6 ⊢ (𝜑 → 𝐶 = ran 𝐹)
4	3	imaeq2d 6058	. . . . 5 ⊢ (𝜑 → (◡𝐹 “ 𝐶) = (◡𝐹 “ ran 𝐹))
5	1, 4	eqtrid 2781	. . . 4 ⊢ (𝜑 → 𝑃 = (◡𝐹 “ ran 𝐹))
6		cnvimarndm 6081	. . . . 5 ⊢ (◡𝐹 “ ran 𝐹) = dom 𝐹
7		fcores.f	. . . . . 6 ⊢ (𝜑 → 𝐹:𝐴⟶𝐵)
8	7	fdmd 6726	. . . . 5 ⊢ (𝜑 → dom 𝐹 = 𝐴)
9	6, 8	eqtrid 2781	. . . 4 ⊢ (𝜑 → (◡𝐹 “ ran 𝐹) = 𝐴)
10	5, 9	eqtrd 2769	. . 3 ⊢ (𝜑 → 𝑃 = 𝐴)
11		fcores.e	. . . 4 ⊢ 𝐸 = (ran 𝐹 ∩ 𝐶)
12		simpr 484	. . . . . . 7 ⊢ ((𝜑 ∧ ran 𝐹 = 𝐶) → ran 𝐹 = 𝐶)
13	12	ineq1d 4199	. . . . . 6 ⊢ ((𝜑 ∧ ran 𝐹 = 𝐶) → (ran 𝐹 ∩ 𝐶) = (𝐶 ∩ 𝐶))
14		inidm 4207	. . . . . 6 ⊢ (𝐶 ∩ 𝐶) = 𝐶
15	13, 14	eqtrdi 2785	. . . . 5 ⊢ ((𝜑 ∧ ran 𝐹 = 𝐶) → (ran 𝐹 ∩ 𝐶) = 𝐶)
16	2, 15	mpdan 687	. . . 4 ⊢ (𝜑 → (ran 𝐹 ∩ 𝐶) = 𝐶)
17	11, 16	eqtrid 2781	. . 3 ⊢ (𝜑 → 𝐸 = 𝐶)
18	10, 17	jca 511	. 2 ⊢ (𝜑 → (𝑃 = 𝐴 ∧ 𝐸 = 𝐶))
19		fcores.x	. . . 4 ⊢ 𝑋 = (𝐹 ↾ 𝑃)
20	5, 6	eqtrdi 2785	. . . . 5 ⊢ (𝜑 → 𝑃 = dom 𝐹)
21	20	reseq2d 5977	. . . 4 ⊢ (𝜑 → (𝐹 ↾ 𝑃) = (𝐹 ↾ dom 𝐹))
22	19, 21	eqtrid 2781	. . 3 ⊢ (𝜑 → 𝑋 = (𝐹 ↾ dom 𝐹))
23	7	freld 6722	. . . 4 ⊢ (𝜑 → Rel 𝐹)
24		resdm 6024	. . . 4 ⊢ (Rel 𝐹 → (𝐹 ↾ dom 𝐹) = 𝐹)
25	23, 24	syl 17	. . 3 ⊢ (𝜑 → (𝐹 ↾ dom 𝐹) = 𝐹)
26	22, 25	eqtrd 2769	. 2 ⊢ (𝜑 → 𝑋 = 𝐹)
27		fcores.y	. . . 4 ⊢ 𝑌 = (𝐺 ↾ 𝐸)
28		fcores.g	. . . . . . 7 ⊢ (𝜑 → 𝐺:𝐶⟶𝐷)
29	28	fdmd 6726	. . . . . 6 ⊢ (𝜑 → dom 𝐺 = 𝐶)
30	17, 29	eqtr4d 2772	. . . . 5 ⊢ (𝜑 → 𝐸 = dom 𝐺)
31	30	reseq2d 5977	. . . 4 ⊢ (𝜑 → (𝐺 ↾ 𝐸) = (𝐺 ↾ dom 𝐺))
32	27, 31	eqtrid 2781	. . 3 ⊢ (𝜑 → 𝑌 = (𝐺 ↾ dom 𝐺))
33	28	freld 6722	. . . 4 ⊢ (𝜑 → Rel 𝐺)
34		resdm 6024	. . . 4 ⊢ (Rel 𝐺 → (𝐺 ↾ dom 𝐺) = 𝐺)
35	33, 34	syl 17	. . 3 ⊢ (𝜑 → (𝐺 ↾ dom 𝐺) = 𝐺)
36	32, 35	eqtrd 2769	. 2 ⊢ (𝜑 → 𝑌 = 𝐺)
37	18, 26, 36	jca32 515	1 ⊢ (𝜑 → ((𝑃 = 𝐴 ∧ 𝐸 = 𝐶) ∧ (𝑋 = 𝐹 ∧ 𝑌 = 𝐺)))

Syntax hints:   → wi 4   ∧ wa 395   = wceq 1539   ∩ cin 3930  ^◡ccnv 5664  dom cdm 5665  ran crn 5666   ↾ cres 5667   “ cima 5668  Rel wrel 5670  ⟶wf 6537

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1794  ax-4 1808  ax-5 1909  ax-6 1966  ax-7 2006  ax-8 2109  ax-9 2117  ax-ext 2706  ax-sep 5276  ax-nul 5286  ax-pr 5412

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1779  df-sb 2064  df-clab 2713  df-cleq 2726  df-clel 2808  df-ral 3051  df-rex 3060  df-rab 3420  df-v 3465  df-dif 3934  df-un 3936  df-in 3938  df-ss 3948  df-nul 4314  df-if 4506  df-sn 4607  df-pr 4609  df-op 4613  df-br 5124  df-opab 5186  df-xp 5671  df-rel 5672  df-cnv 5673  df-dm 5675  df-rn 5676  df-res 5677  df-ima 5678  df-fun 6543  df-fn 6544  df-f 6545

This theorem is referenced by:  f1cof1b  47047