Theorem ghomco 36105

Description: The composition of two group homomorphisms is a group homomorphism. (Contributed by Jeff Madsen, 1-Dec-2009.) (Revised by Mario Carneiro, 27-Dec-2014.)

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 6661	. . . . . . 7 ⊢ ((𝑇:ran 𝐻⟶ran 𝐾 ∧ 𝑆:ran 𝐺⟶ran 𝐻) → (𝑇 ∘ 𝑆):ran 𝐺⟶ran 𝐾)
2	1	ancoms 459	. . . . . 6 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) → (𝑇 ∘ 𝑆):ran 𝐺⟶ran 𝐾)
3	2	ad2ant2r 744	. . . . 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 6998	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑥 ∈ ran 𝐺) → (𝑆‘𝑥) ∈ ran 𝐻)
6		ffvelcdm 6998	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑦 ∈ ran 𝐺) → (𝑆‘𝑦) ∈ ran 𝐻)
7	5, 6	anim12dan 619	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑆‘𝑥) ∈ ran 𝐻 ∧ (𝑆‘𝑦) ∈ ran 𝐻))
8		fveq2 6811	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑢 = (𝑆‘𝑥) → (𝑇‘𝑢) = (𝑇‘(𝑆‘𝑥)))
9	8	oveq1d 7330	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑢 = (𝑆‘𝑥) → ((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘𝑣)))
10		fvoveq1 7338	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑢 = (𝑆‘𝑥) → (𝑇‘(𝑢𝐻𝑣)) = (𝑇‘((𝑆‘𝑥)𝐻𝑣)))
11	9, 10	eqeq12d 2753	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑢 = (𝑆‘𝑥) → (((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)) ↔ ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘𝑣)) = (𝑇‘((𝑆‘𝑥)𝐻𝑣))))
12		fveq2 6811	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑣 = (𝑆‘𝑦) → (𝑇‘𝑣) = (𝑇‘(𝑆‘𝑦)))
13	12	oveq2d 7331	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑣 = (𝑆‘𝑦) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘𝑣)) = ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))))
14		oveq2 7323	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑣 = (𝑆‘𝑦) → ((𝑆‘𝑥)𝐻𝑣) = ((𝑆‘𝑥)𝐻(𝑆‘𝑦)))
15	14	fveq2d 6815	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑣 = (𝑆‘𝑦) → (𝑇‘((𝑆‘𝑥)𝐻𝑣)) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))))
16	13, 15	eqeq12d 2753	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑣 = (𝑆‘𝑦) → (((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘𝑣)) = (𝑇‘((𝑆‘𝑥)𝐻𝑣)) ↔ ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦)))))
17	11, 16	rspc2va 3580	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝑆‘𝑥) ∈ ran 𝐻 ∧ (𝑆‘𝑦) ∈ ran 𝐻) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))))
18	7, 17	sylan 580	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))))
19	18	an32s 649	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))))
20	19	adantllr 716	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))))
21	20	adantllr 716	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))))
22		fveq2 6811	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → (𝑇‘((𝑆‘𝑥)𝐻(𝑆‘𝑦))) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
23	21, 22	sylan9eq 2797	. . . . . . . . . . . . . . . 16 ⊢ ((((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) ∧ ((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
24	23	anasss 467	. . . . . . . . . . . . . . 15 ⊢ (((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ ((𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺) ∧ ((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)))) → ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
25		fvco3 6906	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑥 ∈ ran 𝐺) → ((𝑇 ∘ 𝑆)‘𝑥) = (𝑇‘(𝑆‘𝑥)))
26	25	ad2ant2r 744	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑇 ∘ 𝑆)‘𝑥) = (𝑇‘(𝑆‘𝑥)))
27		fvco3 6906	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑦 ∈ ran 𝐺) → ((𝑇 ∘ 𝑆)‘𝑦) = (𝑇‘(𝑆‘𝑦)))
28	27	ad2ant2rl 746	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑇 ∘ 𝑆)‘𝑦) = (𝑇‘(𝑆‘𝑦)))
29	26, 28	oveq12d 7333	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → (((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))))
30	29	adantlr 712	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → (((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))))
31	30	ad2ant2r 744	. . . . . . . . . . . . . . 15 ⊢ (((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ ((𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺) ∧ ((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)))) → (((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇‘(𝑆‘𝑥))𝐾(𝑇‘(𝑆‘𝑦))))
32		eqid 2737	. . . . . . . . . . . . . . . . . . . 20 ⊢ ran 𝐺 = ran 𝐺
33	32	grpocl 28971	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐺 ∈ GrpOp ∧ 𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺) → (𝑥𝐺𝑦) ∈ ran 𝐺)
34	33	3expb 1119	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐺 ∈ GrpOp ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → (𝑥𝐺𝑦) ∈ ran 𝐺)
35		fvco3 6906	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ (𝑥𝐺𝑦) ∈ ran 𝐺) → ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
36	35	adantlr 712	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ (𝑥𝐺𝑦) ∈ ran 𝐺) → ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
37	34, 36	sylan2 593	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ (𝐺 ∈ GrpOp ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺))) → ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
38	37	anassrs 468	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
39	38	ad2ant2r 744	. . . . . . . . . . . . . . 15 ⊢ (((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ ((𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺) ∧ ((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)))) → ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)) = (𝑇‘(𝑆‘(𝑥𝐺𝑦))))
40	24, 31, 39	3eqtr4d 2787	. . . . . . . . . . . . . 14 ⊢ (((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ ((𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺) ∧ ((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)))) → (((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))
41	40	expr 457	. . . . . . . . . . . . 13 ⊢ (((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ (𝑥 ∈ ran 𝐺 ∧ 𝑦 ∈ ran 𝐺)) → (((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → (((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
42	41	ralimdvva 3198	. . . . . . . . . . . 12 ⊢ ((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ 𝐺 ∈ GrpOp) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) → (∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
43	42	an32s 649	. . . . . . . . . . 11 ⊢ ((((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) ∧ 𝐺 ∈ GrpOp) → (∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
44	43	ex 413	. . . . . . . . . 10 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) → (𝐺 ∈ GrpOp → (∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))))
45	44	com23 86	. . . . . . . . 9 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ 𝑇:ran 𝐻⟶ran 𝐾) ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))) → (∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → (𝐺 ∈ GrpOp → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))))
46	45	anasss 467	. . . . . . . 8 ⊢ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) → (∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)) → (𝐺 ∈ GrpOp → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))))
47	46	imp 407	. . . . . . 7 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) → (𝐺 ∈ GrpOp → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
48	47	an32s 649	. . . . . 6 ⊢ (((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) → (𝐺 ∈ GrpOp → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
49	48	com12 32	. . . . 5 ⊢ (𝐺 ∈ GrpOp → (((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
50	49	3ad2ant1 1132	. . . 4 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → (((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) → ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦))))
51	4, 50	jcad 513	. . 3 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → (((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))) → ((𝑇 ∘ 𝑆):ran 𝐺⟶ran 𝐾 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))))
52		eqid 2737	. . . . . 6 ⊢ ran 𝐻 = ran 𝐻
53	32, 52	elghomOLD 36101	. . . . 5 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp) → (𝑆 ∈ (𝐺 GrpOpHom 𝐻) ↔ (𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)))))
54	53	3adant3 1131	. . . 4 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → (𝑆 ∈ (𝐺 GrpOpHom 𝐻) ↔ (𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦)))))
55		eqid 2737	. . . . . 6 ⊢ ran 𝐾 = ran 𝐾
56	52, 55	elghomOLD 36101	. . . . 5 ⊢ ((𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → (𝑇 ∈ (𝐻 GrpOpHom 𝐾) ↔ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))))
57	56	3adant1 1129	. . . 4 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → (𝑇 ∈ (𝐻 GrpOpHom 𝐾) ↔ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣)))))
58	54, 57	anbi12d 631	. . 3 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → ((𝑆 ∈ (𝐺 GrpOpHom 𝐻) ∧ 𝑇 ∈ (𝐻 GrpOpHom 𝐾)) ↔ ((𝑆:ran 𝐺⟶ran 𝐻 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺((𝑆‘𝑥)𝐻(𝑆‘𝑦)) = (𝑆‘(𝑥𝐺𝑦))) ∧ (𝑇:ran 𝐻⟶ran 𝐾 ∧ ∀𝑢 ∈ ran 𝐻∀𝑣 ∈ ran 𝐻((𝑇‘𝑢)𝐾(𝑇‘𝑣)) = (𝑇‘(𝑢𝐻𝑣))))))
59	32, 55	elghomOLD 36101	. . . 4 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → ((𝑇 ∘ 𝑆) ∈ (𝐺 GrpOpHom 𝐾) ↔ ((𝑇 ∘ 𝑆):ran 𝐺⟶ran 𝐾 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))))
60	59	3adant2 1130	. . 3 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → ((𝑇 ∘ 𝑆) ∈ (𝐺 GrpOpHom 𝐾) ↔ ((𝑇 ∘ 𝑆):ran 𝐺⟶ran 𝐾 ∧ ∀𝑥 ∈ ran 𝐺∀𝑦 ∈ ran 𝐺(((𝑇 ∘ 𝑆)‘𝑥)𝐾((𝑇 ∘ 𝑆)‘𝑦)) = ((𝑇 ∘ 𝑆)‘(𝑥𝐺𝑦)))))
61	51, 58, 60	3imtr4d 293	. 2 ⊢ ((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) → ((𝑆 ∈ (𝐺 GrpOpHom 𝐻) ∧ 𝑇 ∈ (𝐻 GrpOpHom 𝐾)) → (𝑇 ∘ 𝑆) ∈ (𝐺 GrpOpHom 𝐾)))
62	61	imp 407	1 ⊢ (((𝐺 ∈ GrpOp ∧ 𝐻 ∈ GrpOp ∧ 𝐾 ∈ GrpOp) ∧ (𝑆 ∈ (𝐺 GrpOpHom 𝐻) ∧ 𝑇 ∈ (𝐻 GrpOpHom 𝐾))) → (𝑇 ∘ 𝑆) ∈ (𝐺 GrpOpHom 𝐾))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 396   ∧ w3a 1086   = wceq 1540   ∈ wcel 2105  ∀wral 3062  ran crn 5608   ∘ ccom 5611  ⟶wf 6461  ‘cfv 6465  (class class class)co 7315  GrpOpcgr 28960   GrpOpHom cghomOLD 36097

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2708  ax-rep 5224  ax-sep 5238  ax-nul 5245  ax-pow 5303  ax-pr 5367  ax-un 7628

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2887  df-ne 2942  df-ral 3063  df-rex 3072  df-reu 3351  df-rab 3405  df-v 3443  df-sbc 3727  df-csb 3843  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-nul 4268  df-if 4472  df-pw 4547  df-sn 4572  df-pr 4574  df-op 4578  df-uni 4851  df-iun 4939  df-br 5088  df-opab 5150  df-mpt 5171  df-id 5507  df-xp 5613  df-rel 5614  df-cnv 5615  df-co 5616  df-dm 5617  df-rn 5618  df-res 5619  df-ima 5620  df-iota 6417  df-fun 6467  df-fn 6468  df-f 6469  df-f1 6470  df-fo 6471  df-f1o 6472  df-fv 6473  df-ov 7318  df-oprab 7319  df-mpo 7320  df-grpo 28964  df-ghomOLD 36098

This theorem is referenced by: (None)