Theorem caoftrn 6267

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

Hypotheses

Ref	Expression
caofref.1	⊢ (𝜑 → 𝐴 ∈ 𝑉)
caofref.2	⊢ (𝜑 → 𝐹:𝐴⟶𝑆)
caofcom.3	⊢ (𝜑 → 𝐺:𝐴⟶𝑆)
caofass.4	⊢ (𝜑 → 𝐻:𝐴⟶𝑆)
caoftrn.5	⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆)) → ((𝑥𝑅𝑦 ∧ 𝑦𝑇𝑧) → 𝑥𝑈𝑧))

Assertion

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

Distinct variable groups:   𝑥,𝑦,𝑧,𝐹   𝑥,𝐺,𝑦,𝑧   𝑥,𝐻,𝑦,𝑧   𝜑,𝑥,𝑦,𝑧   𝑥,𝑅,𝑦,𝑧   𝑥,𝑆,𝑦,𝑧   𝑥,𝑇,𝑦,𝑧   𝑥,𝑈,𝑦,𝑧

Allowed substitution hints:   𝐴(𝑥,𝑦,𝑧)   𝑉(𝑥,𝑦,𝑧)

Proof of Theorem caoftrn

Dummy variable 𝑤 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		caoftrn.5	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆)) → ((𝑥𝑅𝑦 ∧ 𝑦𝑇𝑧) → 𝑥𝑈𝑧))
2	1	ralrimivvva 2615	. . . . 5 ⊢ (𝜑 → ∀𝑥 ∈ 𝑆 ∀𝑦 ∈ 𝑆 ∀𝑧 ∈ 𝑆 ((𝑥𝑅𝑦 ∧ 𝑦𝑇𝑧) → 𝑥𝑈𝑧))
3	2	adantr 276	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → ∀𝑥 ∈ 𝑆 ∀𝑦 ∈ 𝑆 ∀𝑧 ∈ 𝑆 ((𝑥𝑅𝑦 ∧ 𝑦𝑇𝑧) → 𝑥𝑈𝑧))
4		caofref.2	. . . . . 6 ⊢ (𝜑 → 𝐹:𝐴⟶𝑆)
5	4	ffvelcdmda 5782	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (𝐹‘𝑤) ∈ 𝑆)
6		caofcom.3	. . . . . 6 ⊢ (𝜑 → 𝐺:𝐴⟶𝑆)
7	6	ffvelcdmda 5782	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (𝐺‘𝑤) ∈ 𝑆)
8		caofass.4	. . . . . 6 ⊢ (𝜑 → 𝐻:𝐴⟶𝑆)
9	8	ffvelcdmda 5782	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (𝐻‘𝑤) ∈ 𝑆)
10		breq1 4091	. . . . . . . 8 ⊢ (𝑥 = (𝐹‘𝑤) → (𝑥𝑅𝑦 ↔ (𝐹‘𝑤)𝑅𝑦))
11	10	anbi1d 465	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑤) → ((𝑥𝑅𝑦 ∧ 𝑦𝑇𝑧) ↔ ((𝐹‘𝑤)𝑅𝑦 ∧ 𝑦𝑇𝑧)))
12		breq1 4091	. . . . . . 7 ⊢ (𝑥 = (𝐹‘𝑤) → (𝑥𝑈𝑧 ↔ (𝐹‘𝑤)𝑈𝑧))
13	11, 12	imbi12d 234	. . . . . 6 ⊢ (𝑥 = (𝐹‘𝑤) → (((𝑥𝑅𝑦 ∧ 𝑦𝑇𝑧) → 𝑥𝑈𝑧) ↔ (((𝐹‘𝑤)𝑅𝑦 ∧ 𝑦𝑇𝑧) → (𝐹‘𝑤)𝑈𝑧)))
14		breq2 4092	. . . . . . . 8 ⊢ (𝑦 = (𝐺‘𝑤) → ((𝐹‘𝑤)𝑅𝑦 ↔ (𝐹‘𝑤)𝑅(𝐺‘𝑤)))
15		breq1 4091	. . . . . . . 8 ⊢ (𝑦 = (𝐺‘𝑤) → (𝑦𝑇𝑧 ↔ (𝐺‘𝑤)𝑇𝑧))
16	14, 15	anbi12d 473	. . . . . . 7 ⊢ (𝑦 = (𝐺‘𝑤) → (((𝐹‘𝑤)𝑅𝑦 ∧ 𝑦𝑇𝑧) ↔ ((𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ (𝐺‘𝑤)𝑇𝑧)))
17	16	imbi1d 231	. . . . . 6 ⊢ (𝑦 = (𝐺‘𝑤) → ((((𝐹‘𝑤)𝑅𝑦 ∧ 𝑦𝑇𝑧) → (𝐹‘𝑤)𝑈𝑧) ↔ (((𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ (𝐺‘𝑤)𝑇𝑧) → (𝐹‘𝑤)𝑈𝑧)))
18		breq2 4092	. . . . . . . 8 ⊢ (𝑧 = (𝐻‘𝑤) → ((𝐺‘𝑤)𝑇𝑧 ↔ (𝐺‘𝑤)𝑇(𝐻‘𝑤)))
19	18	anbi2d 464	. . . . . . 7 ⊢ (𝑧 = (𝐻‘𝑤) → (((𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ (𝐺‘𝑤)𝑇𝑧) ↔ ((𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ (𝐺‘𝑤)𝑇(𝐻‘𝑤))))
20		breq2 4092	. . . . . . 7 ⊢ (𝑧 = (𝐻‘𝑤) → ((𝐹‘𝑤)𝑈𝑧 ↔ (𝐹‘𝑤)𝑈(𝐻‘𝑤)))
21	19, 20	imbi12d 234	. . . . . 6 ⊢ (𝑧 = (𝐻‘𝑤) → ((((𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ (𝐺‘𝑤)𝑇𝑧) → (𝐹‘𝑤)𝑈𝑧) ↔ (((𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ (𝐺‘𝑤)𝑇(𝐻‘𝑤)) → (𝐹‘𝑤)𝑈(𝐻‘𝑤))))
22	13, 17, 21	rspc3v 2926	. . . . 5 ⊢ (((𝐹‘𝑤) ∈ 𝑆 ∧ (𝐺‘𝑤) ∈ 𝑆 ∧ (𝐻‘𝑤) ∈ 𝑆) → (∀𝑥 ∈ 𝑆 ∀𝑦 ∈ 𝑆 ∀𝑧 ∈ 𝑆 ((𝑥𝑅𝑦 ∧ 𝑦𝑇𝑧) → 𝑥𝑈𝑧) → (((𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ (𝐺‘𝑤)𝑇(𝐻‘𝑤)) → (𝐹‘𝑤)𝑈(𝐻‘𝑤))))
23	5, 7, 9, 22	syl3anc 1273	. . . 4 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (∀𝑥 ∈ 𝑆 ∀𝑦 ∈ 𝑆 ∀𝑧 ∈ 𝑆 ((𝑥𝑅𝑦 ∧ 𝑦𝑇𝑧) → 𝑥𝑈𝑧) → (((𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ (𝐺‘𝑤)𝑇(𝐻‘𝑤)) → (𝐹‘𝑤)𝑈(𝐻‘𝑤))))
24	3, 23	mpd 13	. . 3 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (((𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ (𝐺‘𝑤)𝑇(𝐻‘𝑤)) → (𝐹‘𝑤)𝑈(𝐻‘𝑤)))
25	24	ralimdva 2599	. 2 ⊢ (𝜑 → (∀𝑤 ∈ 𝐴 ((𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ (𝐺‘𝑤)𝑇(𝐻‘𝑤)) → ∀𝑤 ∈ 𝐴 (𝐹‘𝑤)𝑈(𝐻‘𝑤)))
26		ffn 5482	. . . . . 6 ⊢ (𝐹:𝐴⟶𝑆 → 𝐹 Fn 𝐴)
27	4, 26	syl 14	. . . . 5 ⊢ (𝜑 → 𝐹 Fn 𝐴)
28		ffn 5482	. . . . . 6 ⊢ (𝐺:𝐴⟶𝑆 → 𝐺 Fn 𝐴)
29	6, 28	syl 14	. . . . 5 ⊢ (𝜑 → 𝐺 Fn 𝐴)
30		caofref.1	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ 𝑉)
31		inidm 3416	. . . . 5 ⊢ (𝐴 ∩ 𝐴) = 𝐴
32		eqidd 2232	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (𝐹‘𝑤) = (𝐹‘𝑤))
33		eqidd 2232	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (𝐺‘𝑤) = (𝐺‘𝑤))
34	27, 29, 30, 30, 31, 32, 33	ofrfval 6243	. . . 4 ⊢ (𝜑 → (𝐹 ∘𝑟 𝑅𝐺 ↔ ∀𝑤 ∈ 𝐴 (𝐹‘𝑤)𝑅(𝐺‘𝑤)))
35		ffn 5482	. . . . . 6 ⊢ (𝐻:𝐴⟶𝑆 → 𝐻 Fn 𝐴)
36	8, 35	syl 14	. . . . 5 ⊢ (𝜑 → 𝐻 Fn 𝐴)
37		eqidd 2232	. . . . 5 ⊢ ((𝜑 ∧ 𝑤 ∈ 𝐴) → (𝐻‘𝑤) = (𝐻‘𝑤))
38	29, 36, 30, 30, 31, 33, 37	ofrfval 6243	. . . 4 ⊢ (𝜑 → (𝐺 ∘𝑟 𝑇𝐻 ↔ ∀𝑤 ∈ 𝐴 (𝐺‘𝑤)𝑇(𝐻‘𝑤)))
39	34, 38	anbi12d 473	. . 3 ⊢ (𝜑 → ((𝐹 ∘𝑟 𝑅𝐺 ∧ 𝐺 ∘𝑟 𝑇𝐻) ↔ (∀𝑤 ∈ 𝐴 (𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ ∀𝑤 ∈ 𝐴 (𝐺‘𝑤)𝑇(𝐻‘𝑤))))
40		r19.26 2659	. . 3 ⊢ (∀𝑤 ∈ 𝐴 ((𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ (𝐺‘𝑤)𝑇(𝐻‘𝑤)) ↔ (∀𝑤 ∈ 𝐴 (𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ ∀𝑤 ∈ 𝐴 (𝐺‘𝑤)𝑇(𝐻‘𝑤)))
41	39, 40	bitr4di 198	. 2 ⊢ (𝜑 → ((𝐹 ∘𝑟 𝑅𝐺 ∧ 𝐺 ∘𝑟 𝑇𝐻) ↔ ∀𝑤 ∈ 𝐴 ((𝐹‘𝑤)𝑅(𝐺‘𝑤) ∧ (𝐺‘𝑤)𝑇(𝐻‘𝑤))))
42	27, 36, 30, 30, 31, 32, 37	ofrfval 6243	. 2 ⊢ (𝜑 → (𝐹 ∘𝑟 𝑈𝐻 ↔ ∀𝑤 ∈ 𝐴 (𝐹‘𝑤)𝑈(𝐻‘𝑤)))
43	25, 41, 42	3imtr4d 203	1 ⊢ (𝜑 → ((𝐹 ∘𝑟 𝑅𝐺 ∧ 𝐺 ∘𝑟 𝑇𝐻) → 𝐹 ∘𝑟 𝑈𝐻))

Syntax hints:   → wi 4   ∧ wa 104   ∧ w3a 1004   = wceq 1397   ∈ wcel 2202  ∀wral 2510   class class class wbr 4088   Fn wfn 5321  ⟶wf 5322  ‘cfv 5326   ∘_𝑟 cofr 6233

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 716  ax-5 1495  ax-7 1496  ax-gen 1497  ax-ie1 1541  ax-ie2 1542  ax-8 1552  ax-10 1553  ax-11 1554  ax-i12 1555  ax-bndl 1557  ax-4 1558  ax-17 1574  ax-i9 1578  ax-ial 1582  ax-i5r 1583  ax-14 2205  ax-ext 2213  ax-coll 4204  ax-sep 4207  ax-pow 4264  ax-pr 4299

This theorem depends on definitions:  df-bi 117  df-3an 1006  df-tru 1400  df-nf 1509  df-sb 1811  df-eu 2082  df-mo 2083  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2363  df-ral 2515  df-rex 2516  df-reu 2517  df-rab 2519  df-v 2804  df-sbc 3032  df-csb 3128  df-un 3204  df-in 3206  df-ss 3213  df-pw 3654  df-sn 3675  df-pr 3676  df-op 3678  df-uni 3894  df-iun 3972  df-br 4089  df-opab 4151  df-mpt 4152  df-id 4390  df-xp 4731  df-rel 4732  df-cnv 4733  df-co 4734  df-dm 4735  df-rn 4736  df-res 4737  df-ima 4738  df-iota 5286  df-fun 5328  df-fn 5329  df-f 5330  df-f1 5331  df-fo 5332  df-f1o 5333  df-fv 5334  df-ofr 6235

This theorem is referenced by: (None)