Theorem caoftrn 5655

Description: Transfer a transitivity law to the function relation. (Contributed by Mario Carneiro, 28-Jul-2014.)

Hypotheses

Ref	Expression
caofref.1	⊢ (φ → A ∈ 𝑉)
caofref.2	⊢ (φ → 𝐹:A⟶𝑆)
caofcom.3	⊢ (φ → 𝐺:A⟶𝑆)
caofass.4	⊢ (φ → 𝐻:A⟶𝑆)
caoftrn.5	⊢ ((φ ∧ (x ∈ 𝑆 ∧ y ∈ 𝑆 ∧ z ∈ 𝑆)) → ((x𝑅y ∧ y𝑇z) → x𝑈z))

Assertion

Ref	Expression
caoftrn	⊢ (φ → ((𝐹 ∘𝑟 𝑅𝐺 ∧ 𝐺 ∘𝑟 𝑇𝐻) → 𝐹 ∘𝑟 𝑈𝐻))

Distinct variable groups:   x,y,z,𝐹   x,𝐺,y,z   x,𝐻,y,z   φ,x,y,z   x,𝑅,y,z   x,𝑆,y,z   x,𝑇,y,z   x,𝑈,y,z

Allowed substitution hints:   A(x,y,z)   𝑉(x,y,z)

Proof of Theorem caoftrn

Dummy variable w is distinct from all other variables.

Step	Hyp	Ref	Expression
1		caoftrn.5	. . . . . 6 ⊢ ((φ ∧ (x ∈ 𝑆 ∧ y ∈ 𝑆 ∧ z ∈ 𝑆)) → ((x𝑅y ∧ y𝑇z) → x𝑈z))
2	1	ralrimivvva 2376	. . . . 5 ⊢ (φ → ∀x ∈ 𝑆 ∀y ∈ 𝑆 ∀z ∈ 𝑆 ((x𝑅y ∧ y𝑇z) → x𝑈z))
3	2	adantr 261	. . . 4 ⊢ ((φ ∧ w ∈ A) → ∀x ∈ 𝑆 ∀y ∈ 𝑆 ∀z ∈ 𝑆 ((x𝑅y ∧ y𝑇z) → x𝑈z))
4		caofref.2	. . . . . 6 ⊢ (φ → 𝐹:A⟶𝑆)
5	4	ffvelrnda 5223	. . . . 5 ⊢ ((φ ∧ w ∈ A) → (𝐹‘w) ∈ 𝑆)
6		caofcom.3	. . . . . 6 ⊢ (φ → 𝐺:A⟶𝑆)
7	6	ffvelrnda 5223	. . . . 5 ⊢ ((φ ∧ w ∈ A) → (𝐺‘w) ∈ 𝑆)
8		caofass.4	. . . . . 6 ⊢ (φ → 𝐻:A⟶𝑆)
9	8	ffvelrnda 5223	. . . . 5 ⊢ ((φ ∧ w ∈ A) → (𝐻‘w) ∈ 𝑆)
10		breq1 3737	. . . . . . . 8 ⊢ (x = (𝐹‘w) → (x𝑅y ↔ (𝐹‘w)𝑅y))
11	10	anbi1d 441	. . . . . . 7 ⊢ (x = (𝐹‘w) → ((x𝑅y ∧ y𝑇z) ↔ ((𝐹‘w)𝑅y ∧ y𝑇z)))
12		breq1 3737	. . . . . . 7 ⊢ (x = (𝐹‘w) → (x𝑈z ↔ (𝐹‘w)𝑈z))
13	11, 12	imbi12d 223	. . . . . 6 ⊢ (x = (𝐹‘w) → (((x𝑅y ∧ y𝑇z) → x𝑈z) ↔ (((𝐹‘w)𝑅y ∧ y𝑇z) → (𝐹‘w)𝑈z)))
14		breq2 3738	. . . . . . . 8 ⊢ (y = (𝐺‘w) → ((𝐹‘w)𝑅y ↔ (𝐹‘w)𝑅(𝐺‘w)))
15		breq1 3737	. . . . . . . 8 ⊢ (y = (𝐺‘w) → (y𝑇z ↔ (𝐺‘w)𝑇z))
16	14, 15	anbi12d 445	. . . . . . 7 ⊢ (y = (𝐺‘w) → (((𝐹‘w)𝑅y ∧ y𝑇z) ↔ ((𝐹‘w)𝑅(𝐺‘w) ∧ (𝐺‘w)𝑇z)))
17	16	imbi1d 220	. . . . . 6 ⊢ (y = (𝐺‘w) → ((((𝐹‘w)𝑅y ∧ y𝑇z) → (𝐹‘w)𝑈z) ↔ (((𝐹‘w)𝑅(𝐺‘w) ∧ (𝐺‘w)𝑇z) → (𝐹‘w)𝑈z)))
18		breq2 3738	. . . . . . . 8 ⊢ (z = (𝐻‘w) → ((𝐺‘w)𝑇z ↔ (𝐺‘w)𝑇(𝐻‘w)))
19	18	anbi2d 440	. . . . . . 7 ⊢ (z = (𝐻‘w) → (((𝐹‘w)𝑅(𝐺‘w) ∧ (𝐺‘w)𝑇z) ↔ ((𝐹‘w)𝑅(𝐺‘w) ∧ (𝐺‘w)𝑇(𝐻‘w))))
20		breq2 3738	. . . . . . 7 ⊢ (z = (𝐻‘w) → ((𝐹‘w)𝑈z ↔ (𝐹‘w)𝑈(𝐻‘w)))
21	19, 20	imbi12d 223	. . . . . 6 ⊢ (z = (𝐻‘w) → ((((𝐹‘w)𝑅(𝐺‘w) ∧ (𝐺‘w)𝑇z) → (𝐹‘w)𝑈z) ↔ (((𝐹‘w)𝑅(𝐺‘w) ∧ (𝐺‘w)𝑇(𝐻‘w)) → (𝐹‘w)𝑈(𝐻‘w))))
22	13, 17, 21	rspc3v 2638	. . . . 5 ⊢ (((𝐹‘w) ∈ 𝑆 ∧ (𝐺‘w) ∈ 𝑆 ∧ (𝐻‘w) ∈ 𝑆) → (∀x ∈ 𝑆 ∀y ∈ 𝑆 ∀z ∈ 𝑆 ((x𝑅y ∧ y𝑇z) → x𝑈z) → (((𝐹‘w)𝑅(𝐺‘w) ∧ (𝐺‘w)𝑇(𝐻‘w)) → (𝐹‘w)𝑈(𝐻‘w))))
23	5, 7, 9, 22	syl3anc 1119	. . . 4 ⊢ ((φ ∧ w ∈ A) → (∀x ∈ 𝑆 ∀y ∈ 𝑆 ∀z ∈ 𝑆 ((x𝑅y ∧ y𝑇z) → x𝑈z) → (((𝐹‘w)𝑅(𝐺‘w) ∧ (𝐺‘w)𝑇(𝐻‘w)) → (𝐹‘w)𝑈(𝐻‘w))))
24	3, 23	mpd 13	. . 3 ⊢ ((φ ∧ w ∈ A) → (((𝐹‘w)𝑅(𝐺‘w) ∧ (𝐺‘w)𝑇(𝐻‘w)) → (𝐹‘w)𝑈(𝐻‘w)))
25	24	ralimdva 2361	. 2 ⊢ (φ → (∀w ∈ A ((𝐹‘w)𝑅(𝐺‘w) ∧ (𝐺‘w)𝑇(𝐻‘w)) → ∀w ∈ A (𝐹‘w)𝑈(𝐻‘w)))
26		ffn 4968	. . . . . 6 ⊢ (𝐹:A⟶𝑆 → 𝐹 Fn A)
27	4, 26	syl 14	. . . . 5 ⊢ (φ → 𝐹 Fn A)
28		ffn 4968	. . . . . 6 ⊢ (𝐺:A⟶𝑆 → 𝐺 Fn A)
29	6, 28	syl 14	. . . . 5 ⊢ (φ → 𝐺 Fn A)
30		caofref.1	. . . . 5 ⊢ (φ → A ∈ 𝑉)
31		inidm 3119	. . . . 5 ⊢ (A ∩ A) = A
32		eqidd 2019	. . . . 5 ⊢ ((φ ∧ w ∈ A) → (𝐹‘w) = (𝐹‘w))
33		eqidd 2019	. . . . 5 ⊢ ((φ ∧ w ∈ A) → (𝐺‘w) = (𝐺‘w))
34	27, 29, 30, 30, 31, 32, 33	ofrfval 5639	. . . 4 ⊢ (φ → (𝐹 ∘𝑟 𝑅𝐺 ↔ ∀w ∈ A (𝐹‘w)𝑅(𝐺‘w)))
35		ffn 4968	. . . . . 6 ⊢ (𝐻:A⟶𝑆 → 𝐻 Fn A)
36	8, 35	syl 14	. . . . 5 ⊢ (φ → 𝐻 Fn A)
37		eqidd 2019	. . . . 5 ⊢ ((φ ∧ w ∈ A) → (𝐻‘w) = (𝐻‘w))
38	29, 36, 30, 30, 31, 33, 37	ofrfval 5639	. . . 4 ⊢ (φ → (𝐺 ∘𝑟 𝑇𝐻 ↔ ∀w ∈ A (𝐺‘w)𝑇(𝐻‘w)))
39	34, 38	anbi12d 445	. . 3 ⊢ (φ → ((𝐹 ∘𝑟 𝑅𝐺 ∧ 𝐺 ∘𝑟 𝑇𝐻) ↔ (∀w ∈ A (𝐹‘w)𝑅(𝐺‘w) ∧ ∀w ∈ A (𝐺‘w)𝑇(𝐻‘w))))
40		r19.26 2415	. . 3 ⊢ (∀w ∈ A ((𝐹‘w)𝑅(𝐺‘w) ∧ (𝐺‘w)𝑇(𝐻‘w)) ↔ (∀w ∈ A (𝐹‘w)𝑅(𝐺‘w) ∧ ∀w ∈ A (𝐺‘w)𝑇(𝐻‘w)))
41	39, 40	syl6bbr 187	. 2 ⊢ (φ → ((𝐹 ∘𝑟 𝑅𝐺 ∧ 𝐺 ∘𝑟 𝑇𝐻) ↔ ∀w ∈ A ((𝐹‘w)𝑅(𝐺‘w) ∧ (𝐺‘w)𝑇(𝐻‘w))))
42	27, 36, 30, 30, 31, 32, 37	ofrfval 5639	. 2 ⊢ (φ → (𝐹 ∘𝑟 𝑈𝐻 ↔ ∀w ∈ A (𝐹‘w)𝑈(𝐻‘w)))
43	25, 41, 42	3imtr4d 192	1 ⊢ (φ → ((𝐹 ∘𝑟 𝑅𝐺 ∧ 𝐺 ∘𝑟 𝑇𝐻) → 𝐹 ∘𝑟 𝑈𝐻))

Syntax hints:   → wi 4   ∧ wa 97   ∧ w3a 871   = wceq 1226   ∈ wcel 1370  ∀wral 2280   class class class wbr 3734   Fn wfn 4820  ⟶wf 4821  ‘cfv 4825   ∘_𝑟 cofr 5630

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 99  ax-ia2 100  ax-ia3 101  ax-io 617  ax-5 1312  ax-7 1313  ax-gen 1314  ax-ie1 1359  ax-ie2 1360  ax-8 1372  ax-10 1373  ax-11 1374  ax-i12 1375  ax-bnd 1376  ax-4 1377  ax-14 1382  ax-17 1396  ax-i9 1400  ax-ial 1405  ax-i5r 1406  ax-ext 2000  ax-coll 3842  ax-sep 3845  ax-pow 3897  ax-pr 3914

This theorem depends on definitions:  df-bi 110  df-3an 873  df-tru 1229  df-nf 1326  df-sb 1624  df-eu 1881  df-mo 1882  df-clab 2005  df-cleq 2011  df-clel 2014  df-nfc 2145  df-ral 2285  df-rex 2286  df-reu 2287  df-rab 2289  df-v 2533  df-sbc 2738  df-csb 2826  df-un 2895  df-in 2897  df-ss 2904  df-pw 3332  df-sn 3352  df-pr 3353  df-op 3355  df-uni 3551  df-iun 3629  df-br 3735  df-opab 3789  df-mpt 3790  df-id 4000  df-xp 4274  df-rel 4275  df-cnv 4276  df-co 4277  df-dm 4278  df-rn 4279  df-res 4280  df-ima 4281  df-iota 4790  df-fun 4827  df-fn 4828  df-f 4829  df-f1 4830  df-fo 4831  df-f1o 4832  df-fv 4833  df-ofr 5632

This theorem is referenced by: (None)