Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  erlbrd Structured version   Visualization version   GIF version

Theorem erlbrd 33344
Description: Deduce the ring localization equivalence relation. If for some 𝑇𝑆 we have 𝑇 · (𝐸 · 𝐻𝐹 · 𝐺) = 0, then pairs 𝐸, 𝐺 and 𝐹, 𝐻 are equivalent under the localization relation. (Contributed by Thierry Arnoux, 4-May-2025.)
Hypotheses
Ref Expression
erlcl1.b 𝐵 = (Base‘𝑅)
erlcl1.e = (𝑅 ~RL 𝑆)
erlcl1.s (𝜑𝑆𝐵)
erldi.1 0 = (0g𝑅)
erldi.2 · = (.r𝑅)
erldi.3 = (-g𝑅)
erlbrd.u (𝜑𝑈 = ⟨𝐸, 𝐺⟩)
erlbrd.v (𝜑𝑉 = ⟨𝐹, 𝐻⟩)
erlbrd.e (𝜑𝐸𝐵)
erlbrd.f (𝜑𝐹𝐵)
erlbrd.g (𝜑𝐺𝑆)
erlbrd.h (𝜑𝐻𝑆)
erlbrd.1 (𝜑𝑇𝑆)
erlbrd.2 (𝜑 → (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )
Assertion
Ref Expression
erlbrd (𝜑𝑈 𝑉)

Proof of Theorem erlbrd
Dummy variables 𝑎 𝑏 𝑡 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 erlbrd.u . . . . 5 (𝜑𝑈 = ⟨𝐸, 𝐺⟩)
2 erlbrd.e . . . . . 6 (𝜑𝐸𝐵)
3 erlbrd.g . . . . . 6 (𝜑𝐺𝑆)
42, 3opelxpd 5657 . . . . 5 (𝜑 → ⟨𝐸, 𝐺⟩ ∈ (𝐵 × 𝑆))
51, 4eqeltrd 2839 . . . 4 (𝜑𝑈 ∈ (𝐵 × 𝑆))
6 erlbrd.v . . . . 5 (𝜑𝑉 = ⟨𝐹, 𝐻⟩)
7 erlbrd.f . . . . . 6 (𝜑𝐹𝐵)
8 erlbrd.h . . . . . 6 (𝜑𝐻𝑆)
97, 8opelxpd 5657 . . . . 5 (𝜑 → ⟨𝐹, 𝐻⟩ ∈ (𝐵 × 𝑆))
106, 9eqeltrd 2839 . . . 4 (𝜑𝑉 ∈ (𝐵 × 𝑆))
115, 10jca 516 . . 3 (𝜑 → (𝑈 ∈ (𝐵 × 𝑆) ∧ 𝑉 ∈ (𝐵 × 𝑆)))
12 erlbrd.1 . . . 4 (𝜑𝑇𝑆)
13 simpr 485 . . . . . 6 ((𝜑𝑡 = 𝑇) → 𝑡 = 𝑇)
1413oveq1d 7371 . . . . 5 ((𝜑𝑡 = 𝑇) → (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))))
1514eqeq1d 2741 . . . 4 ((𝜑𝑡 = 𝑇) → ((𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ↔ (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
16 erlbrd.2 . . . 4 (𝜑 → (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )
1712, 15, 16rspcedvd 3562 . . 3 (𝜑 → ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )
1811, 17jca 516 . 2 (𝜑 → ((𝑈 ∈ (𝐵 × 𝑆) ∧ 𝑉 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
19 erlcl1.e . . . 4 = (𝑅 ~RL 𝑆)
20 erlcl1.b . . . . 5 𝐵 = (Base‘𝑅)
21 erldi.1 . . . . 5 0 = (0g𝑅)
22 erldi.2 . . . . 5 · = (.r𝑅)
23 erldi.3 . . . . 5 = (-g𝑅)
24 eqid 2739 . . . . 5 (𝐵 × 𝑆) = (𝐵 × 𝑆)
25 eqid 2739 . . . . 5 {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )}
26 erlcl1.s . . . . 5 (𝜑𝑆𝐵)
2720, 21, 22, 23, 24, 25, 26erlval 33339 . . . 4 (𝜑 → (𝑅 ~RL 𝑆) = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )})
2819, 27eqtrid 2786 . . 3 (𝜑 = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )})
29 simprl 776 . . . . . . . . . 10 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → 𝑎 = 𝑈)
3029fveq2d 6831 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑎) = (1st𝑈))
311fveq2d 6831 . . . . . . . . . . 11 (𝜑 → (1st𝑈) = (1st ‘⟨𝐸, 𝐺⟩))
32 op1stg 7943 . . . . . . . . . . . 12 ((𝐸𝐵𝐺𝑆) → (1st ‘⟨𝐸, 𝐺⟩) = 𝐸)
332, 3, 32syl2anc 590 . . . . . . . . . . 11 (𝜑 → (1st ‘⟨𝐸, 𝐺⟩) = 𝐸)
3431, 33eqtrd 2774 . . . . . . . . . 10 (𝜑 → (1st𝑈) = 𝐸)
3534adantr 481 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑈) = 𝐸)
3630, 35eqtrd 2774 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑎) = 𝐸)
37 simprr 778 . . . . . . . . . 10 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → 𝑏 = 𝑉)
3837fveq2d 6831 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑏) = (2nd𝑉))
396fveq2d 6831 . . . . . . . . . . 11 (𝜑 → (2nd𝑉) = (2nd ‘⟨𝐹, 𝐻⟩))
40 op2ndg 7944 . . . . . . . . . . . 12 ((𝐹𝐵𝐻𝑆) → (2nd ‘⟨𝐹, 𝐻⟩) = 𝐻)
417, 8, 40syl2anc 590 . . . . . . . . . . 11 (𝜑 → (2nd ‘⟨𝐹, 𝐻⟩) = 𝐻)
4239, 41eqtrd 2774 . . . . . . . . . 10 (𝜑 → (2nd𝑉) = 𝐻)
4342adantr 481 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑉) = 𝐻)
4438, 43eqtrd 2774 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑏) = 𝐻)
4536, 44oveq12d 7374 . . . . . . 7 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → ((1st𝑎) · (2nd𝑏)) = (𝐸 · 𝐻))
4637fveq2d 6831 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑏) = (1st𝑉))
476fveq2d 6831 . . . . . . . . . . 11 (𝜑 → (1st𝑉) = (1st ‘⟨𝐹, 𝐻⟩))
48 op1stg 7943 . . . . . . . . . . . 12 ((𝐹𝐵𝐻𝑆) → (1st ‘⟨𝐹, 𝐻⟩) = 𝐹)
497, 8, 48syl2anc 590 . . . . . . . . . . 11 (𝜑 → (1st ‘⟨𝐹, 𝐻⟩) = 𝐹)
5047, 49eqtrd 2774 . . . . . . . . . 10 (𝜑 → (1st𝑉) = 𝐹)
5150adantr 481 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑉) = 𝐹)
5246, 51eqtrd 2774 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑏) = 𝐹)
5329fveq2d 6831 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑎) = (2nd𝑈))
541fveq2d 6831 . . . . . . . . . . 11 (𝜑 → (2nd𝑈) = (2nd ‘⟨𝐸, 𝐺⟩))
55 op2ndg 7944 . . . . . . . . . . . 12 ((𝐸𝐵𝐺𝑆) → (2nd ‘⟨𝐸, 𝐺⟩) = 𝐺)
562, 3, 55syl2anc 590 . . . . . . . . . . 11 (𝜑 → (2nd ‘⟨𝐸, 𝐺⟩) = 𝐺)
5754, 56eqtrd 2774 . . . . . . . . . 10 (𝜑 → (2nd𝑈) = 𝐺)
5857adantr 481 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑈) = 𝐺)
5953, 58eqtrd 2774 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑎) = 𝐺)
6052, 59oveq12d 7374 . . . . . . 7 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → ((1st𝑏) · (2nd𝑎)) = (𝐹 · 𝐺))
6145, 60oveq12d 7374 . . . . . 6 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎))) = ((𝐸 · 𝐻) (𝐹 · 𝐺)))
6261oveq2d 7372 . . . . 5 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))))
6362eqeq1d 2741 . . . 4 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → ((𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 ↔ (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
6463rexbidv 3163 . . 3 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 ↔ ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
6528, 64brab2d 32697 . 2 (𝜑 → (𝑈 𝑉 ↔ ((𝑈 ∈ (𝐵 × 𝑆) ∧ 𝑉 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )))
6618, 65mpbird 258 1 (𝜑𝑈 𝑉)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 396   = wceq 1547  wcel 2119  wrex 3063  wss 3883  cop 4561   class class class wbr 5072  {copab 5134   × cxp 5616  cfv 6485  (class class class)co 7356  1st c1st 7929  2nd c2nd 7930  Basecbs 17170  .rcmulr 17212  0gc0g 17393  -gcsg 18902   ~RL cerl 33334
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-sep 5218  ax-nul 5228  ax-pow 5294  ax-pr 5362  ax-un 7678
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-ral 3054  df-rex 3064  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-nul 4262  df-if 4455  df-pw 4531  df-sn 4556  df-pr 4558  df-op 4562  df-uni 4839  df-br 5073  df-opab 5135  df-mpt 5154  df-id 5513  df-xp 5624  df-rel 5625  df-cnv 5626  df-co 5627  df-dm 5628  df-rn 5629  df-iota 6441  df-fun 6487  df-fv 6493  df-ov 7359  df-oprab 7360  df-mpo 7361  df-1st 7931  df-2nd 7932  df-erl 33336
This theorem is referenced by:  erlbr2d  33345  erler  33346  rlocaddval  33349  rlocmulval  33350  rloccring  33351
  Copyright terms: Public domain W3C validator