Theorem f1cof1blem 47024

Description: Lemma for f1cof1b 47027 and focofob 47030. (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 2741	. . . . . 6 ⊢ (𝜑 → 𝐶 = ran 𝐹)
4	3	imaeq2d 6080	. . . . 5 ⊢ (𝜑 → (◡𝐹 “ 𝐶) = (◡𝐹 “ ran 𝐹))
5	1, 4	eqtrid 2787	. . . 4 ⊢ (𝜑 → 𝑃 = (◡𝐹 “ ran 𝐹))
6		cnvimarndm 6103	. . . . 5 ⊢ (◡𝐹 “ ran 𝐹) = dom 𝐹
7		fcores.f	. . . . . 6 ⊢ (𝜑 → 𝐹:𝐴⟶𝐵)
8	7	fdmd 6747	. . . . 5 ⊢ (𝜑 → dom 𝐹 = 𝐴)
9	6, 8	eqtrid 2787	. . . 4 ⊢ (𝜑 → (◡𝐹 “ ran 𝐹) = 𝐴)
10	5, 9	eqtrd 2775	. . 3 ⊢ (𝜑 → 𝑃 = 𝐴)
11		fcores.e	. . . 4 ⊢ 𝐸 = (ran 𝐹 ∩ 𝐶)
12		simpr 484	. . . . . . 7 ⊢ ((𝜑 ∧ ran 𝐹 = 𝐶) → ran 𝐹 = 𝐶)
13	12	ineq1d 4227	. . . . . 6 ⊢ ((𝜑 ∧ ran 𝐹 = 𝐶) → (ran 𝐹 ∩ 𝐶) = (𝐶 ∩ 𝐶))
14		inidm 4235	. . . . . 6 ⊢ (𝐶 ∩ 𝐶) = 𝐶
15	13, 14	eqtrdi 2791	. . . . 5 ⊢ ((𝜑 ∧ ran 𝐹 = 𝐶) → (ran 𝐹 ∩ 𝐶) = 𝐶)
16	2, 15	mpdan 687	. . . 4 ⊢ (𝜑 → (ran 𝐹 ∩ 𝐶) = 𝐶)
17	11, 16	eqtrid 2787	. . 3 ⊢ (𝜑 → 𝐸 = 𝐶)
18	10, 17	jca 511	. 2 ⊢ (𝜑 → (𝑃 = 𝐴 ∧ 𝐸 = 𝐶))
19		fcores.x	. . . 4 ⊢ 𝑋 = (𝐹 ↾ 𝑃)
20	5, 6	eqtrdi 2791	. . . . 5 ⊢ (𝜑 → 𝑃 = dom 𝐹)
21	20	reseq2d 6000	. . . 4 ⊢ (𝜑 → (𝐹 ↾ 𝑃) = (𝐹 ↾ dom 𝐹))
22	19, 21	eqtrid 2787	. . 3 ⊢ (𝜑 → 𝑋 = (𝐹 ↾ dom 𝐹))
23	7	freld 6743	. . . 4 ⊢ (𝜑 → Rel 𝐹)
24		resdm 6046	. . . 4 ⊢ (Rel 𝐹 → (𝐹 ↾ dom 𝐹) = 𝐹)
25	23, 24	syl 17	. . 3 ⊢ (𝜑 → (𝐹 ↾ dom 𝐹) = 𝐹)
26	22, 25	eqtrd 2775	. 2 ⊢ (𝜑 → 𝑋 = 𝐹)
27		fcores.y	. . . 4 ⊢ 𝑌 = (𝐺 ↾ 𝐸)
28		fcores.g	. . . . . . 7 ⊢ (𝜑 → 𝐺:𝐶⟶𝐷)
29	28	fdmd 6747	. . . . . 6 ⊢ (𝜑 → dom 𝐺 = 𝐶)
30	17, 29	eqtr4d 2778	. . . . 5 ⊢ (𝜑 → 𝐸 = dom 𝐺)
31	30	reseq2d 6000	. . . 4 ⊢ (𝜑 → (𝐺 ↾ 𝐸) = (𝐺 ↾ dom 𝐺))
32	27, 31	eqtrid 2787	. . 3 ⊢ (𝜑 → 𝑌 = (𝐺 ↾ dom 𝐺))
33	28	freld 6743	. . . 4 ⊢ (𝜑 → Rel 𝐺)
34		resdm 6046	. . . 4 ⊢ (Rel 𝐺 → (𝐺 ↾ dom 𝐺) = 𝐺)
35	33, 34	syl 17	. . 3 ⊢ (𝜑 → (𝐺 ↾ dom 𝐺) = 𝐺)
36	32, 35	eqtrd 2775	. 2 ⊢ (𝜑 → 𝑌 = 𝐺)
37	18, 26, 36	jca32 515	1 ⊢ (𝜑 → ((𝑃 = 𝐴 ∧ 𝐸 = 𝐶) ∧ (𝑋 = 𝐹 ∧ 𝑌 = 𝐺)))

Syntax hints:   → wi 4   ∧ wa 395   = wceq 1537   ∩ cin 3962  ^◡ccnv 5688  dom cdm 5689  ran crn 5690   ↾ cres 5691   “ cima 5692  Rel wrel 5694  ⟶wf 6559

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1908  ax-6 1965  ax-7 2005  ax-8 2108  ax-9 2116  ax-ext 2706  ax-sep 5302  ax-nul 5312  ax-pr 5438

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1540  df-fal 1550  df-ex 1777  df-sb 2063  df-clab 2713  df-cleq 2727  df-clel 2814  df-ral 3060  df-rex 3069  df-rab 3434  df-v 3480  df-dif 3966  df-un 3968  df-in 3970  df-ss 3980  df-nul 4340  df-if 4532  df-sn 4632  df-pr 4634  df-op 4638  df-br 5149  df-opab 5211  df-xp 5695  df-rel 5696  df-cnv 5697  df-dm 5699  df-rn 5700  df-res 5701  df-ima 5702  df-fun 6565  df-fn 6566  df-f 6567

This theorem is referenced by:  f1cof1b  47027