Theorem f1cof1blem 45770

Description: Lemma for f1cof1b 45771 and focofob 45774. (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 2738	. . . . . 6 ⊢ (𝜑 → 𝐶 = ran 𝐹)
4	3	imaeq2d 6057	. . . . 5 ⊢ (𝜑 → (◡𝐹 “ 𝐶) = (◡𝐹 “ ran 𝐹))
5	1, 4	eqtrid 2784	. . . 4 ⊢ (𝜑 → 𝑃 = (◡𝐹 “ ran 𝐹))
6		cnvimarndm 6078	. . . . 5 ⊢ (◡𝐹 “ ran 𝐹) = dom 𝐹
7		fcores.f	. . . . . 6 ⊢ (𝜑 → 𝐹:𝐴⟶𝐵)
8	7	fdmd 6725	. . . . 5 ⊢ (𝜑 → dom 𝐹 = 𝐴)
9	6, 8	eqtrid 2784	. . . 4 ⊢ (𝜑 → (◡𝐹 “ ran 𝐹) = 𝐴)
10	5, 9	eqtrd 2772	. . 3 ⊢ (𝜑 → 𝑃 = 𝐴)
11		fcores.e	. . . 4 ⊢ 𝐸 = (ran 𝐹 ∩ 𝐶)
12		simpr 485	. . . . . . 7 ⊢ ((𝜑 ∧ ran 𝐹 = 𝐶) → ran 𝐹 = 𝐶)
13	12	ineq1d 4210	. . . . . 6 ⊢ ((𝜑 ∧ ran 𝐹 = 𝐶) → (ran 𝐹 ∩ 𝐶) = (𝐶 ∩ 𝐶))
14		inidm 4217	. . . . . 6 ⊢ (𝐶 ∩ 𝐶) = 𝐶
15	13, 14	eqtrdi 2788	. . . . 5 ⊢ ((𝜑 ∧ ran 𝐹 = 𝐶) → (ran 𝐹 ∩ 𝐶) = 𝐶)
16	2, 15	mpdan 685	. . . 4 ⊢ (𝜑 → (ran 𝐹 ∩ 𝐶) = 𝐶)
17	11, 16	eqtrid 2784	. . 3 ⊢ (𝜑 → 𝐸 = 𝐶)
18	10, 17	jca 512	. 2 ⊢ (𝜑 → (𝑃 = 𝐴 ∧ 𝐸 = 𝐶))
19		fcores.x	. . . 4 ⊢ 𝑋 = (𝐹 ↾ 𝑃)
20	5, 6	eqtrdi 2788	. . . . 5 ⊢ (𝜑 → 𝑃 = dom 𝐹)
21	20	reseq2d 5979	. . . 4 ⊢ (𝜑 → (𝐹 ↾ 𝑃) = (𝐹 ↾ dom 𝐹))
22	19, 21	eqtrid 2784	. . 3 ⊢ (𝜑 → 𝑋 = (𝐹 ↾ dom 𝐹))
23	7	freld 6720	. . . 4 ⊢ (𝜑 → Rel 𝐹)
24		resdm 6024	. . . 4 ⊢ (Rel 𝐹 → (𝐹 ↾ dom 𝐹) = 𝐹)
25	23, 24	syl 17	. . 3 ⊢ (𝜑 → (𝐹 ↾ dom 𝐹) = 𝐹)
26	22, 25	eqtrd 2772	. 2 ⊢ (𝜑 → 𝑋 = 𝐹)
27		fcores.y	. . . 4 ⊢ 𝑌 = (𝐺 ↾ 𝐸)
28		fcores.g	. . . . . . 7 ⊢ (𝜑 → 𝐺:𝐶⟶𝐷)
29	28	fdmd 6725	. . . . . 6 ⊢ (𝜑 → dom 𝐺 = 𝐶)
30	17, 29	eqtr4d 2775	. . . . 5 ⊢ (𝜑 → 𝐸 = dom 𝐺)
31	30	reseq2d 5979	. . . 4 ⊢ (𝜑 → (𝐺 ↾ 𝐸) = (𝐺 ↾ dom 𝐺))
32	27, 31	eqtrid 2784	. . 3 ⊢ (𝜑 → 𝑌 = (𝐺 ↾ dom 𝐺))
33	28	freld 6720	. . . 4 ⊢ (𝜑 → Rel 𝐺)
34		resdm 6024	. . . 4 ⊢ (Rel 𝐺 → (𝐺 ↾ dom 𝐺) = 𝐺)
35	33, 34	syl 17	. . 3 ⊢ (𝜑 → (𝐺 ↾ dom 𝐺) = 𝐺)
36	32, 35	eqtrd 2772	. 2 ⊢ (𝜑 → 𝑌 = 𝐺)
37	18, 26, 36	jca32 516	1 ⊢ (𝜑 → ((𝑃 = 𝐴 ∧ 𝐸 = 𝐶) ∧ (𝑋 = 𝐹 ∧ 𝑌 = 𝐺)))

Syntax hints:   → wi 4   ∧ wa 396   = wceq 1541   ∩ cin 3946  ^◡ccnv 5674  dom cdm 5675  ran crn 5676   ↾ cres 5677   “ cima 5678  Rel wrel 5680  ⟶wf 6536

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-ext 2703  ax-sep 5298  ax-nul 5305  ax-pr 5426

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-sb 2068  df-clab 2710  df-cleq 2724  df-clel 2810  df-ral 3062  df-rex 3071  df-rab 3433  df-v 3476  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-nul 4322  df-if 4528  df-sn 4628  df-pr 4630  df-op 4634  df-br 5148  df-opab 5210  df-xp 5681  df-rel 5682  df-cnv 5683  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-fun 6542  df-fn 6543  df-f 6544

This theorem is referenced by:  f1cof1b  45771