Theorem dirtr 17680

Description: A direction is transitive. (Contributed by Jeff Hankins, 25-Nov-2009.) (Revised by Mario Carneiro, 22-Nov-2013.)

Assertion

Ref	Expression
dirtr	⊢ (((𝑅 ∈ DirRel ∧ 𝐶 ∈ 𝑉) ∧ (𝐴𝑅𝐵 ∧ 𝐵𝑅𝐶)) → 𝐴𝑅𝐶)

Proof of Theorem dirtr

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

Step	Hyp	Ref	Expression
1		reldir 17677	. . . . 5 ⊢ (𝑅 ∈ DirRel → Rel 𝑅)
2		brrelex1 5496	. . . . . . 7 ⊢ ((Rel 𝑅 ∧ 𝐴𝑅𝐵) → 𝐴 ∈ V)
3	2	ex 413	. . . . . 6 ⊢ (Rel 𝑅 → (𝐴𝑅𝐵 → 𝐴 ∈ V))
4		brrelex1 5496	. . . . . . 7 ⊢ ((Rel 𝑅 ∧ 𝐵𝑅𝐶) → 𝐵 ∈ V)
5	4	ex 413	. . . . . 6 ⊢ (Rel 𝑅 → (𝐵𝑅𝐶 → 𝐵 ∈ V))
6	3, 5	anim12d 608	. . . . 5 ⊢ (Rel 𝑅 → ((𝐴𝑅𝐵 ∧ 𝐵𝑅𝐶) → (𝐴 ∈ V ∧ 𝐵 ∈ V)))
7	1, 6	syl 17	. . . 4 ⊢ (𝑅 ∈ DirRel → ((𝐴𝑅𝐵 ∧ 𝐵𝑅𝐶) → (𝐴 ∈ V ∧ 𝐵 ∈ V)))
8		eqid 2795	. . . . . . . . . . 11 ⊢ ∪ ∪ 𝑅 = ∪ ∪ 𝑅
9	8	isdir 17676	. . . . . . . . . 10 ⊢ (𝑅 ∈ DirRel → (𝑅 ∈ DirRel ↔ ((Rel 𝑅 ∧ ( I ↾ ∪ ∪ 𝑅) ⊆ 𝑅) ∧ ((𝑅 ∘ 𝑅) ⊆ 𝑅 ∧ (∪ ∪ 𝑅 × ∪ ∪ 𝑅) ⊆ (◡𝑅 ∘ 𝑅)))))
10	9	ibi 268	. . . . . . . . 9 ⊢ (𝑅 ∈ DirRel → ((Rel 𝑅 ∧ ( I ↾ ∪ ∪ 𝑅) ⊆ 𝑅) ∧ ((𝑅 ∘ 𝑅) ⊆ 𝑅 ∧ (∪ ∪ 𝑅 × ∪ ∪ 𝑅) ⊆ (◡𝑅 ∘ 𝑅))))
11	10	simprld 768	. . . . . . . 8 ⊢ (𝑅 ∈ DirRel → (𝑅 ∘ 𝑅) ⊆ 𝑅)
12		cotr 5853	. . . . . . . 8 ⊢ ((𝑅 ∘ 𝑅) ⊆ 𝑅 ↔ ∀𝑥∀𝑦∀𝑧((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧))
13	11, 12	sylib 219	. . . . . . 7 ⊢ (𝑅 ∈ DirRel → ∀𝑥∀𝑦∀𝑧((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧))
14		breq12 4971	. . . . . . . . . . 11 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → (𝑥𝑅𝑦 ↔ 𝐴𝑅𝐵))
15	14	3adant3 1125	. . . . . . . . . 10 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵 ∧ 𝑧 = 𝐶) → (𝑥𝑅𝑦 ↔ 𝐴𝑅𝐵))
16		breq12 4971	. . . . . . . . . . 11 ⊢ ((𝑦 = 𝐵 ∧ 𝑧 = 𝐶) → (𝑦𝑅𝑧 ↔ 𝐵𝑅𝐶))
17	16	3adant1 1123	. . . . . . . . . 10 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵 ∧ 𝑧 = 𝐶) → (𝑦𝑅𝑧 ↔ 𝐵𝑅𝐶))
18	15, 17	anbi12d 630	. . . . . . . . 9 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵 ∧ 𝑧 = 𝐶) → ((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) ↔ (𝐴𝑅𝐵 ∧ 𝐵𝑅𝐶)))
19		breq12 4971	. . . . . . . . . 10 ⊢ ((𝑥 = 𝐴 ∧ 𝑧 = 𝐶) → (𝑥𝑅𝑧 ↔ 𝐴𝑅𝐶))
20	19	3adant2 1124	. . . . . . . . 9 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵 ∧ 𝑧 = 𝐶) → (𝑥𝑅𝑧 ↔ 𝐴𝑅𝐶))
21	18, 20	imbi12d 346	. . . . . . . 8 ⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵 ∧ 𝑧 = 𝐶) → (((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧) ↔ ((𝐴𝑅𝐵 ∧ 𝐵𝑅𝐶) → 𝐴𝑅𝐶)))
22	21	spc3gv 3547	. . . . . . 7 ⊢ ((𝐴 ∈ V ∧ 𝐵 ∈ V ∧ 𝐶 ∈ 𝑉) → (∀𝑥∀𝑦∀𝑧((𝑥𝑅𝑦 ∧ 𝑦𝑅𝑧) → 𝑥𝑅𝑧) → ((𝐴𝑅𝐵 ∧ 𝐵𝑅𝐶) → 𝐴𝑅𝐶)))
23	13, 22	syl5 34	. . . . . 6 ⊢ ((𝐴 ∈ V ∧ 𝐵 ∈ V ∧ 𝐶 ∈ 𝑉) → (𝑅 ∈ DirRel → ((𝐴𝑅𝐵 ∧ 𝐵𝑅𝐶) → 𝐴𝑅𝐶)))
24	23	3expia 1114	. . . . 5 ⊢ ((𝐴 ∈ V ∧ 𝐵 ∈ V) → (𝐶 ∈ 𝑉 → (𝑅 ∈ DirRel → ((𝐴𝑅𝐵 ∧ 𝐵𝑅𝐶) → 𝐴𝑅𝐶))))
25	24	com4t 93	. . . 4 ⊢ (𝑅 ∈ DirRel → ((𝐴𝑅𝐵 ∧ 𝐵𝑅𝐶) → ((𝐴 ∈ V ∧ 𝐵 ∈ V) → (𝐶 ∈ 𝑉 → 𝐴𝑅𝐶))))
26	7, 25	mpdd 43	. . 3 ⊢ (𝑅 ∈ DirRel → ((𝐴𝑅𝐵 ∧ 𝐵𝑅𝐶) → (𝐶 ∈ 𝑉 → 𝐴𝑅𝐶)))
27	26	imp31 418	. 2 ⊢ (((𝑅 ∈ DirRel ∧ (𝐴𝑅𝐵 ∧ 𝐵𝑅𝐶)) ∧ 𝐶 ∈ 𝑉) → 𝐴𝑅𝐶)
28	27	an32s 648	1 ⊢ (((𝑅 ∈ DirRel ∧ 𝐶 ∈ 𝑉) ∧ (𝐴𝑅𝐵 ∧ 𝐵𝑅𝐶)) → 𝐴𝑅𝐶)

Syntax hints:   → wi 4   ↔ wb 207   ∧ wa 396   ∧ w3a 1080  ∀wal 1520   = wceq 1522   ∈ wcel 2081  Vcvv 3437   ⊆ wss 3863  ∪ cuni 4749   class class class wbr 4966   I cid 5352   × cxp 5446  ^◡ccnv 5447   ↾ cres 5450   ∘ ccom 5452  Rel wrel 5453  DirRelcdir 17672

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1777  ax-4 1791  ax-5 1888  ax-6 1947  ax-7 1992  ax-8 2083  ax-9 2091  ax-10 2112  ax-11 2126  ax-12 2141  ax-13 2344  ax-ext 2769  ax-sep 5099  ax-nul 5106  ax-pr 5226

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3an 1082  df-tru 1525  df-ex 1762  df-nf 1766  df-sb 2043  df-mo 2576  df-eu 2612  df-clab 2776  df-cleq 2788  df-clel 2863  df-nfc 2935  df-ral 3110  df-rex 3111  df-rab 3114  df-v 3439  df-dif 3866  df-un 3868  df-in 3870  df-ss 3878  df-nul 4216  df-if 4386  df-sn 4477  df-pr 4479  df-op 4483  df-uni 4750  df-br 4967  df-opab 5029  df-xp 5454  df-rel 5455  df-cnv 5456  df-co 5457  df-res 5460  df-dir 17674

This theorem is referenced by:  tailfb  33340