Theorem trin2 5002

Description: The intersection of two transitive classes is transitive. (Contributed by FL, 31-Jul-2009.)

Assertion

Ref	Expression
trin2	⊢ (((𝑅 ∘ 𝑅) ⊆ 𝑅 ∧ (𝑆 ∘ 𝑆) ⊆ 𝑆) → ((𝑅 ∩ 𝑆) ∘ (𝑅 ∩ 𝑆)) ⊆ (𝑅 ∩ 𝑆))

Proof of Theorem trin2

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

Step	Hyp	Ref	Expression
1		cotr 4992	. . . 4 ⊢ ((𝑅 ∘ 𝑅) ⊆ 𝑅 ↔ ∀𝑥∀𝑦∀𝑧((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧))
2		cotr 4992	. . . . . 6 ⊢ ((𝑆 ∘ 𝑆) ⊆ 𝑆 ↔ ∀𝑥∀𝑦∀𝑧((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧))
3		brin 4041	. . . . . . . . . . . . 13 ⊢ (𝑥(𝑅 ∩ 𝑆)𝑦 ↔ (𝑥𝑅𝑦 ∧ 𝑥𝑆𝑦))
4		brin 4041	. . . . . . . . . . . . 13 ⊢ (𝑦(𝑅 ∩ 𝑆)𝑧 ↔ (𝑦𝑅𝑧 ∧ 𝑦𝑆𝑧))
5		simpr 109	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧))
6		simpl 108	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧))
7	5, 6	anim12d 333	. . . . . . . . . . . . . . 15 ⊢ ((((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → (((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) ∧ (𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧)) → (𝑥𝑅𝑧 ∧ 𝑥𝑆𝑧)))
8	7	com12 30	. . . . . . . . . . . . . 14 ⊢ (((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) ∧ (𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧)) → ((((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → (𝑥𝑅𝑧 ∧ 𝑥𝑆𝑧)))
9	8	an4s 583	. . . . . . . . . . . . 13 ⊢ (((𝑥𝑅𝑦 ∧ 𝑥𝑆𝑦) ∧ (𝑦𝑅𝑧 ∧ 𝑦𝑆𝑧)) → ((((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → (𝑥𝑅𝑧 ∧ 𝑥𝑆𝑧)))
10	3, 4, 9	syl2anb 289	. . . . . . . . . . . 12 ⊢ ((𝑥(𝑅 ∩ 𝑆)𝑦 ∧ 𝑦(𝑅 ∩ 𝑆)𝑧) → ((((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → (𝑥𝑅𝑧 ∧ 𝑥𝑆𝑧)))
11	10	com12 30	. . . . . . . . . . 11 ⊢ ((((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ((𝑥(𝑅 ∩ 𝑆)𝑦 ∧ 𝑦(𝑅 ∩ 𝑆)𝑧) → (𝑥𝑅𝑧 ∧ 𝑥𝑆𝑧)))
12		brin 4041	. . . . . . . . . . 11 ⊢ (𝑥(𝑅 ∩ 𝑆)𝑧 ↔ (𝑥𝑅𝑧 ∧ 𝑥𝑆𝑧))
13	11, 12	syl6ibr 161	. . . . . . . . . 10 ⊢ ((((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ((𝑥(𝑅 ∩ 𝑆)𝑦 ∧ 𝑦(𝑅 ∩ 𝑆)𝑧) → 𝑥(𝑅 ∩ 𝑆)𝑧))
14	13	alanimi 1452	. . . . . . . . 9 ⊢ ((∀𝑧((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ∀𝑧((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ∀𝑧((𝑥(𝑅 ∩ 𝑆)𝑦 ∧ 𝑦(𝑅 ∩ 𝑆)𝑧) → 𝑥(𝑅 ∩ 𝑆)𝑧))
15	14	alanimi 1452	. . . . . . . 8 ⊢ ((∀𝑦∀𝑧((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ∀𝑦∀𝑧((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ∀𝑦∀𝑧((𝑥(𝑅 ∩ 𝑆)𝑦 ∧ 𝑦(𝑅 ∩ 𝑆)𝑧) → 𝑥(𝑅 ∩ 𝑆)𝑧))
16	15	alanimi 1452	. . . . . . 7 ⊢ ((∀𝑥∀𝑦∀𝑧((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ∀𝑥∀𝑦∀𝑧((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ∀𝑥∀𝑦∀𝑧((𝑥(𝑅 ∩ 𝑆)𝑦 ∧ 𝑦(𝑅 ∩ 𝑆)𝑧) → 𝑥(𝑅 ∩ 𝑆)𝑧))
17	16	ex 114	. . . . . 6 ⊢ (∀𝑥∀𝑦∀𝑧((𝑥𝑆𝑦 ∧ 𝑦𝑆𝑧) → 𝑥𝑆𝑧) → (∀𝑥∀𝑦∀𝑧((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧) → ∀𝑥∀𝑦∀𝑧((𝑥(𝑅 ∩ 𝑆)𝑦 ∧ 𝑦(𝑅 ∩ 𝑆)𝑧) → 𝑥(𝑅 ∩ 𝑆)𝑧)))
18	2, 17	sylbi 120	. . . . 5 ⊢ ((𝑆 ∘ 𝑆) ⊆ 𝑆 → (∀𝑥∀𝑦∀𝑧((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧) → ∀𝑥∀𝑦∀𝑧((𝑥(𝑅 ∩ 𝑆)𝑦 ∧ 𝑦(𝑅 ∩ 𝑆)𝑧) → 𝑥(𝑅 ∩ 𝑆)𝑧)))
19	18	com12 30	. . . 4 ⊢ (∀𝑥∀𝑦∀𝑧((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧) → ((𝑆 ∘ 𝑆) ⊆ 𝑆 → ∀𝑥∀𝑦∀𝑧((𝑥(𝑅 ∩ 𝑆)𝑦 ∧ 𝑦(𝑅 ∩ 𝑆)𝑧) → 𝑥(𝑅 ∩ 𝑆)𝑧)))
20	1, 19	sylbi 120	. . 3 ⊢ ((𝑅 ∘ 𝑅) ⊆ 𝑅 → ((𝑆 ∘ 𝑆) ⊆ 𝑆 → ∀𝑥∀𝑦∀𝑧((𝑥(𝑅 ∩ 𝑆)𝑦 ∧ 𝑦(𝑅 ∩ 𝑆)𝑧) → 𝑥(𝑅 ∩ 𝑆)𝑧)))
21	20	imp 123	. 2 ⊢ (((𝑅 ∘ 𝑅) ⊆ 𝑅 ∧ (𝑆 ∘ 𝑆) ⊆ 𝑆) → ∀𝑥∀𝑦∀𝑧((𝑥(𝑅 ∩ 𝑆)𝑦 ∧ 𝑦(𝑅 ∩ 𝑆)𝑧) → 𝑥(𝑅 ∩ 𝑆)𝑧))
22		cotr 4992	. 2 ⊢ (((𝑅 ∩ 𝑆) ∘ (𝑅 ∩ 𝑆)) ⊆ (𝑅 ∩ 𝑆) ↔ ∀𝑥∀𝑦∀𝑧((𝑥(𝑅 ∩ 𝑆)𝑦 ∧ 𝑦(𝑅 ∩ 𝑆)𝑧) → 𝑥(𝑅 ∩ 𝑆)𝑧))
23	21, 22	sylibr 133	1 ⊢ (((𝑅 ∘ 𝑅) ⊆ 𝑅 ∧ (𝑆 ∘ 𝑆) ⊆ 𝑆) → ((𝑅 ∩ 𝑆) ∘ (𝑅 ∩ 𝑆)) ⊆ (𝑅 ∩ 𝑆))

Syntax hints:   → wi 4   ∧ wa 103  ∀wal 1346   ∩ cin 3120   ⊆ wss 3121   class class class wbr 3989   ∘ ccom 4615

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 704  ax-5 1440  ax-7 1441  ax-gen 1442  ax-ie1 1486  ax-ie2 1487  ax-8 1497  ax-10 1498  ax-11 1499  ax-i12 1500  ax-bndl 1502  ax-4 1503  ax-17 1519  ax-i9 1523  ax-ial 1527  ax-i5r 1528  ax-14 2144  ax-ext 2152  ax-sep 4107  ax-pow 4160  ax-pr 4194

This theorem depends on definitions:  df-bi 116  df-3an 975  df-tru 1351  df-nf 1454  df-sb 1756  df-eu 2022  df-mo 2023  df-clab 2157  df-cleq 2163  df-clel 2166  df-nfc 2301  df-ral 2453  df-rex 2454  df-v 2732  df-un 3125  df-in 3127  df-ss 3134  df-pw 3568  df-sn 3589  df-pr 3590  df-op 3592  df-br 3990  df-opab 4051  df-xp 4617  df-rel 4618  df-co 4620

This theorem is referenced by:  trinxp  5004