Theorem ghomco 39017

Description: Obsolete theorem, use ghmco 19479 instead. The composition of two group homomorphisms is a group homomorphism. (Contributed by Jeff Madsen, 1-Dec-2009.) (Revised by Mario Carneiro, 27-Dec-2014.) (New usage is discouraged.) (Proof modification is discouraged.)

Assertion

Ref	Expression
ghomco	⊢ (((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) ∧ (𝑆 ∈ (𝐺 GrpOpHom 𝐻) ∧ 𝑇 ∈ (𝐻 GrpOpHom 𝐾))) → (𝑇 ∘ 𝑆) ∈ (𝐺 GrpOpHom 𝐾))

Proof of Theorem ghomco

Dummy variables 𝑢 𝑣 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fco 6756	. . . . . . 7 ⊢ ((𝑇:ran 𝐻⟶ran 𝐾 ∧ 𝑆:ran 𝐺⟶ran 𝐻) → (𝑇 ∘ 𝑆):ran 𝐺⟶ran 𝐾)
2	1	ancoms 464	. . . . . 6 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) → (𝑇 ∘ 𝑆):ran 𝐺⟶ran 𝐾)
3	2	ad2ant2r 760	. . . . 5 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) → (𝑇 ∘ 𝑆):ran 𝐺⟶ran 𝐾)
4	3	a1i 11	. . . 4 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → (((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) → (𝑇 ∘ 𝑆):ran 𝐺⟶ran 𝐾))
5		ffvelcdm 7105	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑥 ∈ ran 𝐺) → (𝑆‘𝑥) ∈ ran 𝐻)
6		ffvelcdm 7105	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑦 ∈ ran 𝐺) → (𝑆‘𝑦) ∈ ran 𝐻)
7	5, 6	anim12dan 631	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑆‘𝑥) ∈ ran 𝐻 ∧ (𝑆‘𝑦) ∈ ran 𝐻))
8		fveq2 6908	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑢 = (𝑆‘𝑥) → (𝑇‘𝑢) = (𝑇‘(𝑆‘𝑥)))
9	8	oveq1d 7458	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑢 = (𝑆‘𝑥) → ((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘𝑣)))
10		fvoveq1 7466	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑢 = (𝑆‘𝑥) → (𝑇‘(𝑢𝐻𝑣)) = (𝑇‘((𝑆‘𝑥)𝐻𝑣)))
11	9, 10	eqeq12d 2779	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑢 = (𝑆‘𝑥) → (((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)) ↔ ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘𝑣)) = (𝑇‘((𝑆‘𝑥)𝐻𝑣))))
12		fveq2 6908	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑣 = (𝑆‘𝑦) → (𝑇‘𝑣) = (𝑇‘(𝑆‘𝑦)))
13	12	oveq2d 7459	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑣 = (𝑆‘𝑦) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘𝑣)) = ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))))
14		oveq2 7451	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑣 = (𝑆‘𝑦) → ((𝑆‘𝑥)𝐻𝑣) = ((𝑆‘𝑥)𝐻(𝑆‘𝑦)))
15	14	fveq2d 6912	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑣 = (𝑆‘𝑦) → (𝑇‘((𝑆‘𝑥)𝐻𝑣)) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))))
16	13, 15	eqeq12d 2779	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑣 = (𝑆‘𝑦) → (((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘𝑣)) = (𝑇‘((𝑆‘𝑥)𝐻𝑣)) ↔ ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦)))))
17	11, 16	rspc2va 3591	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑆‘𝑥) ∈ ran 𝐻 ∧ (𝑆‘𝑦) ∈ ran 𝐻) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))))
18	7, 17	sylan 592	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))))
19	18	an32s 665	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))))
20	19	adantllr 732	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))))
21	20	adantllr 732	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))))
22		fveq2 6908	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
23	21, 22	sylan9eq 2818	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) ∧ ((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
24	23	anasss 472	. . . . . . . . . . . . . . 15 ⊢ (((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ ((𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺) ∧ ((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)))) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
25		fvco3 7008	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑥 ∈ ran 𝐺) → ((𝑇 ∘ 𝑆)‘𝑥) = (𝑇‘(𝑆‘𝑥)))
26	25	ad2ant2r 760	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑇 ∘ 𝑆)‘𝑥) = (𝑇‘(𝑆‘𝑥)))
27		fvco3 7008	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑦 ∈ ran 𝐺) → ((𝑇 ∘ 𝑆)‘𝑦) = (𝑇‘(𝑆‘𝑦)))
28	27	ad2ant2rl 762	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑇 ∘ 𝑆)‘𝑦) = (𝑇‘(𝑆‘𝑦)))
29	26, 28	oveq12d 7461	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → (((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))))
30	29	adantlr 728	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → (((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))))
31	30	ad2ant2r 760	. . . . . . . . . . . . . . 15 ⊢ (((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ ((𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺) ∧ ((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)))) → (((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))))
32		eqid 2763	. . . . . . . . . . . . . . . . . . . 20 ⊢ ran 𝐺 = ran 𝐺
33	32	grpocl 31132	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐺 ∈ GrpOp ∧ 𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺) → (𝑥𝐺𝑦) ∈ ran 𝐺)
34	33	3expb 1138	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐺 ∈ GrpOp ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → (𝑥𝐺𝑦) ∈ ran 𝐺)
35		fvco3 7008	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ (𝑥𝐺𝑦) ∈ ran 𝐺) → ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
36	35	adantlr 728	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ (𝑥𝐺𝑦) ∈ ran 𝐺) → ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
37	34, 36	sylan2 605	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ (𝐺 ∈ GrpOp ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺))) → ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
38	37	anassrs 473	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
39	38	ad2ant2r 760	. . . . . . . . . . . . . . 15 ⊢ (((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ ((𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺) ∧ ((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)))) → ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
40	24, 31, 39	3eqtr4d 2808	. . . . . . . . . . . . . 14 ⊢ (((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ ((𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺) ∧ ((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)))) → (((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))
41	40	expr 462	. . . . . . . . . . . . 13 ⊢ (((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → (((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → (((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
42	41	ralimdvva 3213	. . . . . . . . . . . 12 ⊢ ((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) → (∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
43	42	an32s 665	. . . . . . . . . . 11 ⊢ ((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ 𝐺 ∈ GrpOp) → (∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
44	43	ex 418	. . . . . . . . . 10 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) → (𝐺 ∈ GrpOp → (∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))))
45	44	com23 87	. . . . . . . . 9 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) → (∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → (𝐺 ∈ GrpOp → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))))
46	45	anasss 472	. . . . . . . 8 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) → (∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → (𝐺 ∈ GrpOp → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))))
47	46	imp 412	. . . . . . 7 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) → (𝐺 ∈ GrpOp → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
48	47	an32s 665	. . . . . 6 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) → (𝐺 ∈ GrpOp → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
49	48	com12 33	. . . . 5 ⊢ (𝐺 ∈ GrpOp → (((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
50	49	3ad2ant1 1151	. . . 4 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → (((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
51	4, 50	jcad 522	. . 3 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → (((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) → ((𝑇 ∘ 𝑆):ran 𝐺⟶ran 𝐾 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))))
52		eqid 2763	. . . . . 6 ⊢ ran 𝐻 = ran 𝐻
53	32, 52	elghomOLD 39013	. . . . 5 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp) → (𝑆 ∈ (𝐺 GrpOpHom 𝐻) ↔ (𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)))))
54	53	3adant3 1150	. . . 4 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → (𝑆 ∈ (𝐺 GrpOpHom 𝐻) ↔ (𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)))))
55		eqid 2763	. . . . . 6 ⊢ ran 𝐾 = ran 𝐾
56	52, 55	elghomOLD 39013	. . . . 5 ⊢ ((𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → (𝑇 ∈ (𝐻 GrpOpHom 𝐾) ↔ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))))
57	56	3adant1 1148	. . . 4 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → (𝑇 ∈ (𝐻 GrpOpHom 𝐾) ↔ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))))
58	54, 57	anbi12d 644	. . 3 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → ((𝑆 ∈ (𝐺 GrpOpHom 𝐻) ∧ 𝑇 ∈ (𝐻 GrpOpHom 𝐾)) ↔ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))))))
59	32, 55	elghomOLD 39013	. . . 4 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → ((𝑇 ∘ 𝑆) ∈ (𝐺 GrpOpHom 𝐾) ↔ ((𝑇 ∘ 𝑆):ran 𝐺⟶ran 𝐾 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))))
60	59	3adant2 1149	. . 3 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → ((𝑇 ∘ 𝑆) ∈ (𝐺 GrpOpHom 𝐾) ↔ ((𝑇 ∘ 𝑆):ran 𝐺⟶ran 𝐾 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))))
61	51, 58, 60	3imtr4d 297	. 2 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → ((𝑆 ∈ (𝐺 GrpOpHom 𝐻) ∧ 𝑇 ∈ (𝐻 GrpOpHom 𝐾)) → (𝑇 ∘ 𝑆) ∈ (𝐺 GrpOpHom 𝐾)))
62	61	imp 412	1 ⊢ (((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) ∧ (𝑆 ∈ (𝐺 GrpOpHom 𝐻) ∧ 𝑇 ∈ (𝐻 GrpOpHom 𝐾))) → (𝑇 ∘ 𝑆) ∈ (𝐺 GrpOpHom 𝐾))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2147  ∀wral 3080  ran crn 5656   ∘ ccom 5659  ⟶wf 6554  ‘cfv 6558  (class class class)co 7443  GrpOpcgr 31121   GrpOpHom cghomOLD 39009

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5235  ax-sep 5252  ax-nul 5263  ax-pow 5331  ax-pr 5395  ax-un 7775

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-ral 3081  df-rex 3091  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4839  df-uni 4871  df-iun 4956  df-br 5107  df-opab 5171  df-mpt 5190  df-id 5550  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-iota 6512  df-fun 6560  df-fn 6561  df-f 6562  df-f1 6563  df-fo 6564  df-f1o 6565  df-fv 6566  df-ov 7446  df-oprab 7447  df-mpo 7448  df-grpo 31125  df-ghomOLD 39010

This theorem is used by: (None)