MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  isosolem Structured version   Visualization version   GIF version

Theorem isosolem 7089
Description: Lemma for isoso 7090. (Contributed by Stefan O'Rear, 16-Nov-2014.)
Assertion
Ref Expression
isosolem (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → (𝑆 Or 𝐵𝑅 Or 𝐴))

Proof of Theorem isosolem
Dummy variables 𝑎 𝑏 𝑐 𝑑 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 isopolem 7087 . . 3 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → (𝑆 Po 𝐵𝑅 Po 𝐴))
2 isof1o 7065 . . . . . . . 8 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → 𝐻:𝐴1-1-onto𝐵)
3 f1of 6608 . . . . . . . 8 (𝐻:𝐴1-1-onto𝐵𝐻:𝐴𝐵)
4 ffvelrn 6841 . . . . . . . . . 10 ((𝐻:𝐴𝐵𝑐𝐴) → (𝐻𝑐) ∈ 𝐵)
54ex 413 . . . . . . . . 9 (𝐻:𝐴𝐵 → (𝑐𝐴 → (𝐻𝑐) ∈ 𝐵))
6 ffvelrn 6841 . . . . . . . . . 10 ((𝐻:𝐴𝐵𝑑𝐴) → (𝐻𝑑) ∈ 𝐵)
76ex 413 . . . . . . . . 9 (𝐻:𝐴𝐵 → (𝑑𝐴 → (𝐻𝑑) ∈ 𝐵))
85, 7anim12d 608 . . . . . . . 8 (𝐻:𝐴𝐵 → ((𝑐𝐴𝑑𝐴) → ((𝐻𝑐) ∈ 𝐵 ∧ (𝐻𝑑) ∈ 𝐵)))
92, 3, 83syl 18 . . . . . . 7 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → ((𝑐𝐴𝑑𝐴) → ((𝐻𝑐) ∈ 𝐵 ∧ (𝐻𝑑) ∈ 𝐵)))
109imp 407 . . . . . 6 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑐𝐴𝑑𝐴)) → ((𝐻𝑐) ∈ 𝐵 ∧ (𝐻𝑑) ∈ 𝐵))
11 breq1 5060 . . . . . . . 8 (𝑎 = (𝐻𝑐) → (𝑎𝑆𝑏 ↔ (𝐻𝑐)𝑆𝑏))
12 eqeq1 2822 . . . . . . . 8 (𝑎 = (𝐻𝑐) → (𝑎 = 𝑏 ↔ (𝐻𝑐) = 𝑏))
13 breq2 5061 . . . . . . . 8 (𝑎 = (𝐻𝑐) → (𝑏𝑆𝑎𝑏𝑆(𝐻𝑐)))
1411, 12, 133orbi123d 1426 . . . . . . 7 (𝑎 = (𝐻𝑐) → ((𝑎𝑆𝑏𝑎 = 𝑏𝑏𝑆𝑎) ↔ ((𝐻𝑐)𝑆𝑏 ∨ (𝐻𝑐) = 𝑏𝑏𝑆(𝐻𝑐))))
15 breq2 5061 . . . . . . . 8 (𝑏 = (𝐻𝑑) → ((𝐻𝑐)𝑆𝑏 ↔ (𝐻𝑐)𝑆(𝐻𝑑)))
16 eqeq2 2830 . . . . . . . 8 (𝑏 = (𝐻𝑑) → ((𝐻𝑐) = 𝑏 ↔ (𝐻𝑐) = (𝐻𝑑)))
17 breq1 5060 . . . . . . . 8 (𝑏 = (𝐻𝑑) → (𝑏𝑆(𝐻𝑐) ↔ (𝐻𝑑)𝑆(𝐻𝑐)))
1815, 16, 173orbi123d 1426 . . . . . . 7 (𝑏 = (𝐻𝑑) → (((𝐻𝑐)𝑆𝑏 ∨ (𝐻𝑐) = 𝑏𝑏𝑆(𝐻𝑐)) ↔ ((𝐻𝑐)𝑆(𝐻𝑑) ∨ (𝐻𝑐) = (𝐻𝑑) ∨ (𝐻𝑑)𝑆(𝐻𝑐))))
1914, 18rspc2v 3630 . . . . . 6 (((𝐻𝑐) ∈ 𝐵 ∧ (𝐻𝑑) ∈ 𝐵) → (∀𝑎𝐵𝑏𝐵 (𝑎𝑆𝑏𝑎 = 𝑏𝑏𝑆𝑎) → ((𝐻𝑐)𝑆(𝐻𝑑) ∨ (𝐻𝑐) = (𝐻𝑑) ∨ (𝐻𝑑)𝑆(𝐻𝑐))))
2010, 19syl 17 . . . . 5 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑐𝐴𝑑𝐴)) → (∀𝑎𝐵𝑏𝐵 (𝑎𝑆𝑏𝑎 = 𝑏𝑏𝑆𝑎) → ((𝐻𝑐)𝑆(𝐻𝑑) ∨ (𝐻𝑐) = (𝐻𝑑) ∨ (𝐻𝑑)𝑆(𝐻𝑐))))
21 isorel 7068 . . . . . 6 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑐𝐴𝑑𝐴)) → (𝑐𝑅𝑑 ↔ (𝐻𝑐)𝑆(𝐻𝑑)))
22 f1of1 6607 . . . . . . . . 9 (𝐻:𝐴1-1-onto𝐵𝐻:𝐴1-1𝐵)
232, 22syl 17 . . . . . . . 8 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → 𝐻:𝐴1-1𝐵)
24 f1fveq 7011 . . . . . . . 8 ((𝐻:𝐴1-1𝐵 ∧ (𝑐𝐴𝑑𝐴)) → ((𝐻𝑐) = (𝐻𝑑) ↔ 𝑐 = 𝑑))
2523, 24sylan 580 . . . . . . 7 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑐𝐴𝑑𝐴)) → ((𝐻𝑐) = (𝐻𝑑) ↔ 𝑐 = 𝑑))
2625bicomd 224 . . . . . 6 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑐𝐴𝑑𝐴)) → (𝑐 = 𝑑 ↔ (𝐻𝑐) = (𝐻𝑑)))
27 isorel 7068 . . . . . . 7 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑑𝐴𝑐𝐴)) → (𝑑𝑅𝑐 ↔ (𝐻𝑑)𝑆(𝐻𝑐)))
2827ancom2s 646 . . . . . 6 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑐𝐴𝑑𝐴)) → (𝑑𝑅𝑐 ↔ (𝐻𝑑)𝑆(𝐻𝑐)))
2921, 26, 283orbi123d 1426 . . . . 5 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑐𝐴𝑑𝐴)) → ((𝑐𝑅𝑑𝑐 = 𝑑𝑑𝑅𝑐) ↔ ((𝐻𝑐)𝑆(𝐻𝑑) ∨ (𝐻𝑐) = (𝐻𝑑) ∨ (𝐻𝑑)𝑆(𝐻𝑐))))
3020, 29sylibrd 260 . . . 4 ((𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) ∧ (𝑐𝐴𝑑𝐴)) → (∀𝑎𝐵𝑏𝐵 (𝑎𝑆𝑏𝑎 = 𝑏𝑏𝑆𝑎) → (𝑐𝑅𝑑𝑐 = 𝑑𝑑𝑅𝑐)))
3130ralrimdvva 3191 . . 3 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → (∀𝑎𝐵𝑏𝐵 (𝑎𝑆𝑏𝑎 = 𝑏𝑏𝑆𝑎) → ∀𝑐𝐴𝑑𝐴 (𝑐𝑅𝑑𝑐 = 𝑑𝑑𝑅𝑐)))
321, 31anim12d 608 . 2 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → ((𝑆 Po 𝐵 ∧ ∀𝑎𝐵𝑏𝐵 (𝑎𝑆𝑏𝑎 = 𝑏𝑏𝑆𝑎)) → (𝑅 Po 𝐴 ∧ ∀𝑐𝐴𝑑𝐴 (𝑐𝑅𝑑𝑐 = 𝑑𝑑𝑅𝑐))))
33 df-so 5468 . 2 (𝑆 Or 𝐵 ↔ (𝑆 Po 𝐵 ∧ ∀𝑎𝐵𝑏𝐵 (𝑎𝑆𝑏𝑎 = 𝑏𝑏𝑆𝑎)))
34 df-so 5468 . 2 (𝑅 Or 𝐴 ↔ (𝑅 Po 𝐴 ∧ ∀𝑐𝐴𝑑𝐴 (𝑐𝑅𝑑𝑐 = 𝑑𝑑𝑅𝑐)))
3532, 33, 343imtr4g 297 1 (𝐻 Isom 𝑅, 𝑆 (𝐴, 𝐵) → (𝑆 Or 𝐵𝑅 Or 𝐴))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396  w3o 1078   = wceq 1528  wcel 2105  wral 3135   class class class wbr 5057   Po wpo 5465   Or wor 5466  wf 6344  1-1wf1 6345  1-1-ontowf1o 6347  cfv 6348   Isom wiso 6349
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1787  ax-4 1801  ax-5 1902  ax-6 1961  ax-7 2006  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2151  ax-12 2167  ax-ext 2790  ax-sep 5194  ax-nul 5201  ax-pr 5320
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 842  df-3or 1080  df-3an 1081  df-tru 1531  df-ex 1772  df-nf 1776  df-sb 2061  df-mo 2615  df-eu 2647  df-clab 2797  df-cleq 2811  df-clel 2890  df-nfc 2960  df-ral 3140  df-rex 3141  df-rab 3144  df-v 3494  df-sbc 3770  df-dif 3936  df-un 3938  df-in 3940  df-ss 3949  df-nul 4289  df-if 4464  df-sn 4558  df-pr 4560  df-op 4564  df-uni 4831  df-br 5058  df-opab 5120  df-id 5453  df-po 5467  df-so 5468  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-iota 6307  df-fun 6350  df-fn 6351  df-f 6352  df-f1 6353  df-f1o 6355  df-fv 6356  df-isom 6357
This theorem is referenced by:  isoso  7090  isowe2  7092
  Copyright terms: Public domain W3C validator