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 33342
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 5664 . . . . 5 (𝜑 → ⟨𝐸, 𝐺⟩ ∈ (𝐵 × 𝑆))
51, 4eqeltrd 2837 . . . 4 (𝜑𝑈 ∈ (𝐵 × 𝑆))
6 erlbrd.v . . . . 5 (𝜑𝑉 = ⟨𝐹, 𝐻⟩)
7 erlbrd.f . . . . . 6 (𝜑𝐹𝐵)
8 erlbrd.h . . . . . 6 (𝜑𝐻𝑆)
97, 8opelxpd 5664 . . . . 5 (𝜑 → ⟨𝐹, 𝐻⟩ ∈ (𝐵 × 𝑆))
106, 9eqeltrd 2837 . . . 4 (𝜑𝑉 ∈ (𝐵 × 𝑆))
115, 10jca 511 . . 3 (𝜑 → (𝑈 ∈ (𝐵 × 𝑆) ∧ 𝑉 ∈ (𝐵 × 𝑆)))
12 erlbrd.1 . . . 4 (𝜑𝑇𝑆)
13 simpr 484 . . . . . 6 ((𝜑𝑡 = 𝑇) → 𝑡 = 𝑇)
1413oveq1d 7376 . . . . 5 ((𝜑𝑡 = 𝑇) → (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))))
1514eqeq1d 2739 . . . 4 ((𝜑𝑡 = 𝑇) → ((𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ↔ (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
16 erlbrd.2 . . . 4 (𝜑 → (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )
1712, 15, 16rspcedvd 3567 . . 3 (𝜑 → ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )
1811, 17jca 511 . 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 2737 . . . . 5 (𝐵 × 𝑆) = (𝐵 × 𝑆)
25 eqid 2737 . . . . 5 {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )}
26 erlcl1.s . . . . 5 (𝜑𝑆𝐵)
2720, 21, 22, 23, 24, 25, 26erlval 33337 . . . 4 (𝜑 → (𝑅 ~RL 𝑆) = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )})
2819, 27eqtrid 2784 . . 3 (𝜑 = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )})
29 simprl 771 . . . . . . . . . 10 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → 𝑎 = 𝑈)
3029fveq2d 6839 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑎) = (1st𝑈))
311fveq2d 6839 . . . . . . . . . . 11 (𝜑 → (1st𝑈) = (1st ‘⟨𝐸, 𝐺⟩))
32 op1stg 7948 . . . . . . . . . . . 12 ((𝐸𝐵𝐺𝑆) → (1st ‘⟨𝐸, 𝐺⟩) = 𝐸)
332, 3, 32syl2anc 585 . . . . . . . . . . 11 (𝜑 → (1st ‘⟨𝐸, 𝐺⟩) = 𝐸)
3431, 33eqtrd 2772 . . . . . . . . . 10 (𝜑 → (1st𝑈) = 𝐸)
3534adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑈) = 𝐸)
3630, 35eqtrd 2772 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑎) = 𝐸)
37 simprr 773 . . . . . . . . . 10 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → 𝑏 = 𝑉)
3837fveq2d 6839 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑏) = (2nd𝑉))
396fveq2d 6839 . . . . . . . . . . 11 (𝜑 → (2nd𝑉) = (2nd ‘⟨𝐹, 𝐻⟩))
40 op2ndg 7949 . . . . . . . . . . . 12 ((𝐹𝐵𝐻𝑆) → (2nd ‘⟨𝐹, 𝐻⟩) = 𝐻)
417, 8, 40syl2anc 585 . . . . . . . . . . 11 (𝜑 → (2nd ‘⟨𝐹, 𝐻⟩) = 𝐻)
4239, 41eqtrd 2772 . . . . . . . . . 10 (𝜑 → (2nd𝑉) = 𝐻)
4342adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑉) = 𝐻)
4438, 43eqtrd 2772 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑏) = 𝐻)
4536, 44oveq12d 7379 . . . . . . 7 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → ((1st𝑎) · (2nd𝑏)) = (𝐸 · 𝐻))
4637fveq2d 6839 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑏) = (1st𝑉))
476fveq2d 6839 . . . . . . . . . . 11 (𝜑 → (1st𝑉) = (1st ‘⟨𝐹, 𝐻⟩))
48 op1stg 7948 . . . . . . . . . . . 12 ((𝐹𝐵𝐻𝑆) → (1st ‘⟨𝐹, 𝐻⟩) = 𝐹)
497, 8, 48syl2anc 585 . . . . . . . . . . 11 (𝜑 → (1st ‘⟨𝐹, 𝐻⟩) = 𝐹)
5047, 49eqtrd 2772 . . . . . . . . . 10 (𝜑 → (1st𝑉) = 𝐹)
5150adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑉) = 𝐹)
5246, 51eqtrd 2772 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑏) = 𝐹)
5329fveq2d 6839 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑎) = (2nd𝑈))
541fveq2d 6839 . . . . . . . . . . 11 (𝜑 → (2nd𝑈) = (2nd ‘⟨𝐸, 𝐺⟩))
55 op2ndg 7949 . . . . . . . . . . . 12 ((𝐸𝐵𝐺𝑆) → (2nd ‘⟨𝐸, 𝐺⟩) = 𝐺)
562, 3, 55syl2anc 585 . . . . . . . . . . 11 (𝜑 → (2nd ‘⟨𝐸, 𝐺⟩) = 𝐺)
5754, 56eqtrd 2772 . . . . . . . . . 10 (𝜑 → (2nd𝑈) = 𝐺)
5857adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑈) = 𝐺)
5953, 58eqtrd 2772 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑎) = 𝐺)
6052, 59oveq12d 7379 . . . . . . 7 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → ((1st𝑏) · (2nd𝑎)) = (𝐹 · 𝐺))
6145, 60oveq12d 7379 . . . . . 6 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎))) = ((𝐸 · 𝐻) (𝐹 · 𝐺)))
6261oveq2d 7377 . . . . 5 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))))
6362eqeq1d 2739 . . . 4 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → ((𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 ↔ (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
6463rexbidv 3162 . . 3 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 ↔ ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
6528, 64brab2d 32696 . 2 (𝜑 → (𝑈 𝑉 ↔ ((𝑈 ∈ (𝐵 × 𝑆) ∧ 𝑉 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )))
6618, 65mpbird 257 1 (𝜑𝑈 𝑉)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1542  wcel 2114  wrex 3062  wss 3890  cop 4574   class class class wbr 5086  {copab 5148   × cxp 5623  cfv 6493  (class class class)co 7361  1st c1st 7934  2nd c2nd 7935  Basecbs 17173  .rcmulr 17215  0gc0g 17396  -gcsg 18905   ~RL cerl 33332
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5232  ax-nul 5242  ax-pow 5303  ax-pr 5371  ax-un 7683
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-br 5087  df-opab 5149  df-mpt 5168  df-id 5520  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-iota 6449  df-fun 6495  df-fv 6501  df-ov 7364  df-oprab 7365  df-mpo 7366  df-1st 7936  df-2nd 7937  df-erl 33334
This theorem is referenced by:  erlbr2d  33343  erler  33344  rlocaddval  33347  rlocmulval  33348  rloccring  33349
  Copyright terms: Public domain W3C validator