ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  trin2 GIF version

Theorem trin2 4736
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.
StepHypRef Expression
1 cotr 4726 . . . 4 ((𝑅𝑅) ⊆ 𝑅 ↔ ∀𝑥𝑦𝑧((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧))
2 cotr 4726 . . . . . 6 ((𝑆𝑆) ⊆ 𝑆 ↔ ∀𝑥𝑦𝑧((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧))
3 brin 3832 . . . . . . . . . . . . 13 (𝑥(𝑅𝑆)𝑦 ↔ (𝑥𝑅𝑦𝑥𝑆𝑦))
4 brin 3832 . . . . . . . . . . . . 13 (𝑦(𝑅𝑆)𝑧 ↔ (𝑦𝑅𝑧𝑦𝑆𝑧))
5 simpr 108 . . . . . . . . . . . . . . . 16 ((((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧))
6 simpl 107 . . . . . . . . . . . . . . . 16 ((((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧))
75, 6anim12d 328 . . . . . . . . . . . . . . 15 ((((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → (((𝑥𝑅𝑦𝑦𝑅𝑧) ∧ (𝑥𝑆𝑦𝑦𝑆𝑧)) → (𝑥𝑅𝑧𝑥𝑆𝑧)))
87com12 30 . . . . . . . . . . . . . 14 (((𝑥𝑅𝑦𝑦𝑅𝑧) ∧ (𝑥𝑆𝑦𝑦𝑆𝑧)) → ((((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → (𝑥𝑅𝑧𝑥𝑆𝑧)))
98an4s 552 . . . . . . . . . . . . 13 (((𝑥𝑅𝑦𝑥𝑆𝑦) ∧ (𝑦𝑅𝑧𝑦𝑆𝑧)) → ((((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → (𝑥𝑅𝑧𝑥𝑆𝑧)))
103, 4, 9syl2anb 285 . . . . . . . . . . . 12 ((𝑥(𝑅𝑆)𝑦𝑦(𝑅𝑆)𝑧) → ((((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → (𝑥𝑅𝑧𝑥𝑆𝑧)))
1110com12 30 . . . . . . . . . . 11 ((((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ((𝑥(𝑅𝑆)𝑦𝑦(𝑅𝑆)𝑧) → (𝑥𝑅𝑧𝑥𝑆𝑧)))
12 brin 3832 . . . . . . . . . . 11 (𝑥(𝑅𝑆)𝑧 ↔ (𝑥𝑅𝑧𝑥𝑆𝑧))
1311, 12syl6ibr 160 . . . . . . . . . 10 ((((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ((𝑥(𝑅𝑆)𝑦𝑦(𝑅𝑆)𝑧) → 𝑥(𝑅𝑆)𝑧))
1413alanimi 1388 . . . . . . . . 9 ((∀𝑧((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ∀𝑧((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ∀𝑧((𝑥(𝑅𝑆)𝑦𝑦(𝑅𝑆)𝑧) → 𝑥(𝑅𝑆)𝑧))
1514alanimi 1388 . . . . . . . 8 ((∀𝑦𝑧((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ∀𝑦𝑧((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ∀𝑦𝑧((𝑥(𝑅𝑆)𝑦𝑦(𝑅𝑆)𝑧) → 𝑥(𝑅𝑆)𝑧))
1615alanimi 1388 . . . . . . 7 ((∀𝑥𝑦𝑧((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧) ∧ ∀𝑥𝑦𝑧((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧)) → ∀𝑥𝑦𝑧((𝑥(𝑅𝑆)𝑦𝑦(𝑅𝑆)𝑧) → 𝑥(𝑅𝑆)𝑧))
1716ex 113 . . . . . 6 (∀𝑥𝑦𝑧((𝑥𝑆𝑦𝑦𝑆𝑧) → 𝑥𝑆𝑧) → (∀𝑥𝑦𝑧((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧) → ∀𝑥𝑦𝑧((𝑥(𝑅𝑆)𝑦𝑦(𝑅𝑆)𝑧) → 𝑥(𝑅𝑆)𝑧)))
182, 17sylbi 119 . . . . 5 ((𝑆𝑆) ⊆ 𝑆 → (∀𝑥𝑦𝑧((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧) → ∀𝑥𝑦𝑧((𝑥(𝑅𝑆)𝑦𝑦(𝑅𝑆)𝑧) → 𝑥(𝑅𝑆)𝑧)))
1918com12 30 . . . 4 (∀𝑥𝑦𝑧((𝑥𝑅𝑦𝑦𝑅𝑧) → 𝑥𝑅𝑧) → ((𝑆𝑆) ⊆ 𝑆 → ∀𝑥𝑦𝑧((𝑥(𝑅𝑆)𝑦𝑦(𝑅𝑆)𝑧) → 𝑥(𝑅𝑆)𝑧)))
201, 19sylbi 119 . . 3 ((𝑅𝑅) ⊆ 𝑅 → ((𝑆𝑆) ⊆ 𝑆 → ∀𝑥𝑦𝑧((𝑥(𝑅𝑆)𝑦𝑦(𝑅𝑆)𝑧) → 𝑥(𝑅𝑆)𝑧)))
2120imp 122 . 2 (((𝑅𝑅) ⊆ 𝑅 ∧ (𝑆𝑆) ⊆ 𝑆) → ∀𝑥𝑦𝑧((𝑥(𝑅𝑆)𝑦𝑦(𝑅𝑆)𝑧) → 𝑥(𝑅𝑆)𝑧))
22 cotr 4726 . 2 (((𝑅𝑆) ∘ (𝑅𝑆)) ⊆ (𝑅𝑆) ↔ ∀𝑥𝑦𝑧((𝑥(𝑅𝑆)𝑦𝑦(𝑅𝑆)𝑧) → 𝑥(𝑅𝑆)𝑧))
2321, 22sylibr 132 1 (((𝑅𝑅) ⊆ 𝑅 ∧ (𝑆𝑆) ⊆ 𝑆) → ((𝑅𝑆) ∘ (𝑅𝑆)) ⊆ (𝑅𝑆))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 102  wal 1282  cin 2972  wss 2973   class class class wbr 3785  ccom 4367
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-io 662  ax-5 1376  ax-7 1377  ax-gen 1378  ax-ie1 1422  ax-ie2 1423  ax-8 1435  ax-10 1436  ax-11 1437  ax-i12 1438  ax-bndl 1439  ax-4 1440  ax-14 1445  ax-17 1459  ax-i9 1463  ax-ial 1467  ax-i5r 1468  ax-ext 2063  ax-sep 3896  ax-pow 3948  ax-pr 3964
This theorem depends on definitions:  df-bi 115  df-3an 921  df-tru 1287  df-nf 1390  df-sb 1686  df-eu 1944  df-mo 1945  df-clab 2068  df-cleq 2074  df-clel 2077  df-nfc 2208  df-ral 2353  df-rex 2354  df-v 2603  df-un 2977  df-in 2979  df-ss 2986  df-pw 3384  df-sn 3404  df-pr 3405  df-op 3407  df-br 3786  df-opab 3840  df-xp 4369  df-rel 4370  df-co 4372
This theorem is referenced by:  trinxp  4738
  Copyright terms: Public domain W3C validator