Theorem pi1cof 25040

Description: Functionality of the loop transfer function on the equivalence class of a path. (Contributed by Mario Carneiro, 23-Dec-2016.)

Hypotheses

Ref	Expression
pi1co.p	⊢ 𝑃 = (𝐽 π1 𝐴)
pi1co.q	⊢ 𝑄 = (𝐾 π1 𝐵)
pi1co.v	⊢ 𝑉 = (Base‘𝑃)
pi1co.g	⊢ 𝐺 = ran (𝑔 ∈ ∪ 𝑉 ↦ ⟨[𝑔]( ≃ph‘𝐽), [(𝐹 ∘ 𝑔)]( ≃ph‘𝐾)⟩)
pi1co.j	⊢ (𝜑 → 𝐽 ∈ (TopOn‘𝑋))
pi1co.f	⊢ (𝜑 → 𝐹 ∈ (𝐽 Cn 𝐾))
pi1co.a	⊢ (𝜑 → 𝐴 ∈ 𝑋)
pi1co.b	⊢ (𝜑 → (𝐹‘𝐴) = 𝐵)

Assertion

Ref	Expression
pi1cof	⊢ (𝜑 → 𝐺:𝑉⟶(Base‘𝑄))

Distinct variable groups:   𝐴,𝑔   𝑔,𝐹   𝑔,𝐽   𝜑,𝑔   𝑔,𝐾   𝑃,𝑔   𝑄,𝑔   𝑔,𝑉

Allowed substitution hints:   𝐵(𝑔)   𝐺(𝑔)   𝑋(𝑔)

Proof of Theorem pi1cof

Dummy variables 𝑠 ℎ are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		pi1co.g	. . . 4 ⊢ 𝐺 = ran (𝑔 ∈ ∪ 𝑉 ↦ ⟨[𝑔]( ≃ph‘𝐽), [(𝐹 ∘ 𝑔)]( ≃ph‘𝐾)⟩)
2		fvex 6849	. . . . 5 ⊢ ( ≃ph‘𝐽) ∈ V
3		ecexg 8642	. . . . 5 ⊢ (( ≃ph‘𝐽) ∈ V → [𝑔]( ≃ph‘𝐽) ∈ V)
4	2, 3	mp1i 13	. . . 4 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → [𝑔]( ≃ph‘𝐽) ∈ V)
5		pi1co.q	. . . . 5 ⊢ 𝑄 = (𝐾 π1 𝐵)
6		eqid 2737	. . . . 5 ⊢ (Base‘𝑄) = (Base‘𝑄)
7		pi1co.f	. . . . . . . 8 ⊢ (𝜑 → 𝐹 ∈ (𝐽 Cn 𝐾))
8		cntop2 23220	. . . . . . . 8 ⊢ (𝐹 ∈ (𝐽 Cn 𝐾) → 𝐾 ∈ Top)
9	7, 8	syl 17	. . . . . . 7 ⊢ (𝜑 → 𝐾 ∈ Top)
10		toptopon2 22897	. . . . . . 7 ⊢ (𝐾 ∈ Top ↔ 𝐾 ∈ (TopOn‘∪ 𝐾))
11	9, 10	sylib 218	. . . . . 6 ⊢ (𝜑 → 𝐾 ∈ (TopOn‘∪ 𝐾))
12	11	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → 𝐾 ∈ (TopOn‘∪ 𝐾))
13		pi1co.b	. . . . . . 7 ⊢ (𝜑 → (𝐹‘𝐴) = 𝐵)
14		pi1co.j	. . . . . . . . 9 ⊢ (𝜑 → 𝐽 ∈ (TopOn‘𝑋))
15		cnf2 23228	. . . . . . . . 9 ⊢ ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝐾 ∈ (TopOn‘∪ 𝐾) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) → 𝐹:𝑋⟶∪ 𝐾)
16	14, 11, 7, 15	syl3anc 1374	. . . . . . . 8 ⊢ (𝜑 → 𝐹:𝑋⟶∪ 𝐾)
17		pi1co.a	. . . . . . . 8 ⊢ (𝜑 → 𝐴 ∈ 𝑋)
18	16, 17	ffvelcdmd 7033	. . . . . . 7 ⊢ (𝜑 → (𝐹‘𝐴) ∈ ∪ 𝐾)
19	13, 18	eqeltrrd 2838	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ ∪ 𝐾)
20	19	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → 𝐵 ∈ ∪ 𝐾)
21		pi1co.p	. . . . . . . . 9 ⊢ 𝑃 = (𝐽 π1 𝐴)
22		pi1co.v	. . . . . . . . . 10 ⊢ 𝑉 = (Base‘𝑃)
23	22	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 𝑉 = (Base‘𝑃))
24	21, 14, 17, 23	pi1eluni 25023	. . . . . . . 8 ⊢ (𝜑 → (𝑔 ∈ ∪ 𝑉 ↔ (𝑔 ∈ (II Cn 𝐽) ∧ (𝑔‘0) = 𝐴 ∧ (𝑔‘1) = 𝐴)))
25	24	biimpa 476	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → (𝑔 ∈ (II Cn 𝐽) ∧ (𝑔‘0) = 𝐴 ∧ (𝑔‘1) = 𝐴))
26	25	simp1d 1143	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → 𝑔 ∈ (II Cn 𝐽))
27	7	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → 𝐹 ∈ (𝐽 Cn 𝐾))
28		cnco 23245	. . . . . 6 ⊢ ((𝑔 ∈ (II Cn 𝐽) ∧ 𝐹 ∈ (𝐽 Cn 𝐾)) → (𝐹 ∘ 𝑔) ∈ (II Cn 𝐾))
29	26, 27, 28	syl2anc 585	. . . . 5 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → (𝐹 ∘ 𝑔) ∈ (II Cn 𝐾))
30		iitopon 24860	. . . . . . . 8 ⊢ II ∈ (TopOn‘(0[,]1))
31		cnf2 23228	. . . . . . . 8 ⊢ ((II ∈ (TopOn‘(0[,]1)) ∧ 𝐽 ∈ (TopOn‘𝑋) ∧ 𝑔 ∈ (II Cn 𝐽)) → 𝑔:(0[,]1)⟶𝑋)
32	30, 14, 26, 31	mp3an2ani 1471	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → 𝑔:(0[,]1)⟶𝑋)
33		0elunit 13417	. . . . . . 7 ⊢ 0 ∈ (0[,]1)
34		fvco3 6935	. . . . . . 7 ⊢ ((𝑔:(0[,]1)⟶𝑋 ∧ 0 ∈ (0[,]1)) → ((𝐹 ∘ 𝑔)‘0) = (𝐹‘(𝑔‘0)))
35	32, 33, 34	sylancl 587	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → ((𝐹 ∘ 𝑔)‘0) = (𝐹‘(𝑔‘0)))
36	25	simp2d 1144	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → (𝑔‘0) = 𝐴)
37	36	fveq2d 6840	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → (𝐹‘(𝑔‘0)) = (𝐹‘𝐴))
38	13	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → (𝐹‘𝐴) = 𝐵)
39	35, 37, 38	3eqtrd 2776	. . . . 5 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → ((𝐹 ∘ 𝑔)‘0) = 𝐵)
40		1elunit 13418	. . . . . . 7 ⊢ 1 ∈ (0[,]1)
41		fvco3 6935	. . . . . . 7 ⊢ ((𝑔:(0[,]1)⟶𝑋 ∧ 1 ∈ (0[,]1)) → ((𝐹 ∘ 𝑔)‘1) = (𝐹‘(𝑔‘1)))
42	32, 40, 41	sylancl 587	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → ((𝐹 ∘ 𝑔)‘1) = (𝐹‘(𝑔‘1)))
43	25	simp3d 1145	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → (𝑔‘1) = 𝐴)
44	43	fveq2d 6840	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → (𝐹‘(𝑔‘1)) = (𝐹‘𝐴))
45	42, 44, 38	3eqtrd 2776	. . . . 5 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → ((𝐹 ∘ 𝑔)‘1) = 𝐵)
46	5, 6, 12, 20, 29, 39, 45	elpi1i 25027	. . . 4 ⊢ ((𝜑 ∧ 𝑔 ∈ ∪ 𝑉) → [(𝐹 ∘ 𝑔)]( ≃ph‘𝐾) ∈ (Base‘𝑄))
47		eceq1 8678	. . . 4 ⊢ (𝑔 = ℎ → [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))
48		coeq2 5809	. . . . 5 ⊢ (𝑔 = ℎ → (𝐹 ∘ 𝑔) = (𝐹 ∘ ℎ))
49	48	eceq1d 8679	. . . 4 ⊢ (𝑔 = ℎ → [(𝐹 ∘ 𝑔)]( ≃ph‘𝐾) = [(𝐹 ∘ ℎ)]( ≃ph‘𝐾))
50		phtpcer 24976	. . . . . 6 ⊢ ( ≃ph‘𝐾) Er (II Cn 𝐾)
51	50	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ (𝑔 ∈ ∪ 𝑉 ∧ ℎ ∈ ∪ 𝑉 ∧ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))) → ( ≃ph‘𝐾) Er (II Cn 𝐾))
52		simpr3 1198	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔 ∈ ∪ 𝑉 ∧ ℎ ∈ ∪ 𝑉 ∧ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))) → [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))
53		phtpcer 24976	. . . . . . . . 9 ⊢ ( ≃ph‘𝐽) Er (II Cn 𝐽)
54	53	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑔 ∈ ∪ 𝑉 ∧ ℎ ∈ ∪ 𝑉 ∧ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))) → ( ≃ph‘𝐽) Er (II Cn 𝐽))
55		simpr1 1196	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑔 ∈ ∪ 𝑉 ∧ ℎ ∈ ∪ 𝑉 ∧ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))) → 𝑔 ∈ ∪ 𝑉)
56	24	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑔 ∈ ∪ 𝑉 ∧ ℎ ∈ ∪ 𝑉 ∧ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))) → (𝑔 ∈ ∪ 𝑉 ↔ (𝑔 ∈ (II Cn 𝐽) ∧ (𝑔‘0) = 𝐴 ∧ (𝑔‘1) = 𝐴)))
57	55, 56	mpbid 232	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑔 ∈ ∪ 𝑉 ∧ ℎ ∈ ∪ 𝑉 ∧ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))) → (𝑔 ∈ (II Cn 𝐽) ∧ (𝑔‘0) = 𝐴 ∧ (𝑔‘1) = 𝐴))
58	57	simp1d 1143	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑔 ∈ ∪ 𝑉 ∧ ℎ ∈ ∪ 𝑉 ∧ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))) → 𝑔 ∈ (II Cn 𝐽))
59	54, 58	erth 8693	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑔 ∈ ∪ 𝑉 ∧ ℎ ∈ ∪ 𝑉 ∧ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))) → (𝑔( ≃ph‘𝐽)ℎ ↔ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽)))
60	52, 59	mpbird 257	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔 ∈ ∪ 𝑉 ∧ ℎ ∈ ∪ 𝑉 ∧ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))) → 𝑔( ≃ph‘𝐽)ℎ)
61	7	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ (𝑔 ∈ ∪ 𝑉 ∧ ℎ ∈ ∪ 𝑉 ∧ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))) → 𝐹 ∈ (𝐽 Cn 𝐾))
62	60, 61	phtpcco2 24980	. . . . 5 ⊢ ((𝜑 ∧ (𝑔 ∈ ∪ 𝑉 ∧ ℎ ∈ ∪ 𝑉 ∧ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))) → (𝐹 ∘ 𝑔)( ≃ph‘𝐾)(𝐹 ∘ ℎ))
63	51, 62	erthi 8695	. . . 4 ⊢ ((𝜑 ∧ (𝑔 ∈ ∪ 𝑉 ∧ ℎ ∈ ∪ 𝑉 ∧ [𝑔]( ≃ph‘𝐽) = [ℎ]( ≃ph‘𝐽))) → [(𝐹 ∘ 𝑔)]( ≃ph‘𝐾) = [(𝐹 ∘ ℎ)]( ≃ph‘𝐾))
64	1, 4, 46, 47, 49, 63	fliftfund 7263	. . 3 ⊢ (𝜑 → Fun 𝐺)
65	1, 4, 46	fliftf 7265	. . 3 ⊢ (𝜑 → (Fun 𝐺 ↔ 𝐺:ran (𝑔 ∈ ∪ 𝑉 ↦ [𝑔]( ≃ph‘𝐽))⟶(Base‘𝑄)))
66	64, 65	mpbid 232	. 2 ⊢ (𝜑 → 𝐺:ran (𝑔 ∈ ∪ 𝑉 ↦ [𝑔]( ≃ph‘𝐽))⟶(Base‘𝑄))
67	21, 14, 17, 23	pi1bas2 25022	. . . 4 ⊢ (𝜑 → 𝑉 = (∪ 𝑉 / ( ≃ph‘𝐽)))
68		df-qs 8644	. . . . 5 ⊢ (∪ 𝑉 / ( ≃ph‘𝐽)) = {𝑠 ∣ ∃𝑔 ∈ ∪ 𝑉𝑠 = [𝑔]( ≃ph‘𝐽)}
69		eqid 2737	. . . . . 6 ⊢ (𝑔 ∈ ∪ 𝑉 ↦ [𝑔]( ≃ph‘𝐽)) = (𝑔 ∈ ∪ 𝑉 ↦ [𝑔]( ≃ph‘𝐽))
70	69	rnmpt 5908	. . . . 5 ⊢ ran (𝑔 ∈ ∪ 𝑉 ↦ [𝑔]( ≃ph‘𝐽)) = {𝑠 ∣ ∃𝑔 ∈ ∪ 𝑉𝑠 = [𝑔]( ≃ph‘𝐽)}
71	68, 70	eqtr4i 2763	. . . 4 ⊢ (∪ 𝑉 / ( ≃ph‘𝐽)) = ran (𝑔 ∈ ∪ 𝑉 ↦ [𝑔]( ≃ph‘𝐽))
72	67, 71	eqtrdi 2788	. . 3 ⊢ (𝜑 → 𝑉 = ran (𝑔 ∈ ∪ 𝑉 ↦ [𝑔]( ≃ph‘𝐽)))
73	72	feq2d 6648	. 2 ⊢ (𝜑 → (𝐺:𝑉⟶(Base‘𝑄) ↔ 𝐺:ran (𝑔 ∈ ∪ 𝑉 ↦ [𝑔]( ≃ph‘𝐽))⟶(Base‘𝑄)))
74	66, 73	mpbird 257	1 ⊢ (𝜑 → 𝐺:𝑉⟶(Base‘𝑄))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1087   = wceq 1542   ∈ wcel 2114  {cab 2715  ∃wrex 3062  Vcvv 3430  ⟨cop 4574  ∪ cuni 4851   class class class wbr 5086   ↦ cmpt 5167  ran crn 5627   ∘ ccom 5630  Fun wfun 6488  ⟶wf 6490  ‘cfv 6494  (class class class)co 7362   Er wer 8635  [cec 8636   / cqs 8637  0cc0 11033  1c1 11034  [,]cicc 13296  Basecbs 17174  Topctop 22872  TopOnctopon 22889   Cn ccn 23203  IIcii 24856   ≃_phcphtpc 24950   π₁ cpi1 24984

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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5213  ax-sep 5232  ax-nul 5242  ax-pow 5304  ax-pr 5372  ax-un 7684  ax-cnex 11089  ax-resscn 11090  ax-1cn 11091  ax-icn 11092  ax-addcl 11093  ax-addrcl 11094  ax-mulcl 11095  ax-mulrcl 11096  ax-mulcom 11097  ax-addass 11098  ax-mulass 11099  ax-distr 11100  ax-i2m1 11101  ax-1ne0 11102  ax-1rid 11103  ax-rnegex 11104  ax-rrecex 11105  ax-cnre 11106  ax-pre-lttri 11107  ax-pre-lttrn 11108  ax-pre-ltadd 11109  ax-pre-mulgt0 11110  ax-pre-sup 11111

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-tp 4573  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-iin 4937  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5521  df-eprel 5526  df-po 5534  df-so 5535  df-fr 5579  df-se 5580  df-we 5581  df-xp 5632  df-rel 5633  df-cnv 5634  df-co 5635  df-dm 5636  df-rn 5637  df-res 5638  df-ima 5639  df-pred 6261  df-ord 6322  df-on 6323  df-lim 6324  df-suc 6325  df-iota 6450  df-fun 6496  df-fn 6497  df-f 6498  df-f1 6499  df-fo 6500  df-f1o 6501  df-fv 6502  df-isom 6503  df-riota 7319  df-ov 7365  df-oprab 7366  df-mpo 7367  df-of 7626  df-om 7813  df-1st 7937  df-2nd 7938  df-supp 8106  df-frecs 8226  df-wrecs 8257  df-recs 8306  df-rdg 8344  df-1o 8400  df-2o 8401  df-er 8638  df-ec 8640  df-qs 8644  df-map 8770  df-ixp 8841  df-en 8889  df-dom 8890  df-sdom 8891  df-fin 8892  df-fsupp 9270  df-fi 9319  df-sup 9350  df-inf 9351  df-oi 9420  df-card 9858  df-pnf 11176  df-mnf 11177  df-xr 11178  df-ltxr 11179  df-le 11180  df-sub 11374  df-neg 11375  df-div 11803  df-nn 12170  df-2 12239  df-3 12240  df-4 12241  df-5 12242  df-6 12243  df-7 12244  df-8 12245  df-9 12246  df-n0 12433  df-z 12520  df-dec 12640  df-uz 12784  df-q 12894  df-rp 12938  df-xneg 13058  df-xadd 13059  df-xmul 13060  df-ioo 13297  df-icc 13300  df-fz 13457  df-fzo 13604  df-seq 13959  df-exp 14019  df-hash 14288  df-cj 15056  df-re 15057  df-im 15058  df-sqrt 15192  df-abs 15193  df-struct 17112  df-sets 17129  df-slot 17147  df-ndx 17159  df-base 17175  df-ress 17196  df-plusg 17228  df-mulr 17229  df-starv 17230  df-sca 17231  df-vsca 17232  df-ip 17233  df-tset 17234  df-ple 17235  df-ds 17237  df-unif 17238  df-hom 17239  df-cco 17240  df-rest 17380  df-topn 17381  df-0g 17399  df-gsum 17400  df-topgen 17401  df-pt 17402  df-prds 17405  df-xrs 17461  df-qtop 17466  df-imas 17467  df-qus 17468  df-xps 17469  df-mre 17543  df-mrc 17544  df-acs 17546  df-mgm 18603  df-sgrp 18682  df-mnd 18698  df-submnd 18747  df-mulg 19039  df-cntz 19287  df-cmn 19752  df-psmet 21340  df-xmet 21341  df-met 21342  df-bl 21343  df-mopn 21344  df-cnfld 21349  df-top 22873  df-topon 22890  df-topsp 22912  df-bases 22925  df-cld 22998  df-cn 23206  df-cnp 23207  df-tx 23541  df-hmeo 23734  df-xms 24299  df-ms 24300  df-tms 24301  df-ii 24858  df-htpy 24951  df-phtpy 24952  df-phtpc 24973  df-om1 24987  df-pi1 24989

This theorem is referenced by:  pi1coval  25041  pi1coghm  25042