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 33221
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 5680 . . . . 5 (𝜑 → ⟨𝐸, 𝐺⟩ ∈ (𝐵 × 𝑆))
51, 4eqeltrd 2829 . . . 4 (𝜑𝑈 ∈ (𝐵 × 𝑆))
6 erlbrd.v . . . . 5 (𝜑𝑉 = ⟨𝐹, 𝐻⟩)
7 erlbrd.f . . . . . 6 (𝜑𝐹𝐵)
8 erlbrd.h . . . . . 6 (𝜑𝐻𝑆)
97, 8opelxpd 5680 . . . . 5 (𝜑 → ⟨𝐹, 𝐻⟩ ∈ (𝐵 × 𝑆))
106, 9eqeltrd 2829 . . . 4 (𝜑𝑉 ∈ (𝐵 × 𝑆))
115, 10jca 511 . . 3 (𝜑 → (𝑈 ∈ (𝐵 × 𝑆) ∧ 𝑉 ∈ (𝐵 × 𝑆)))
12 erlbrd.1 . . . 4 (𝜑𝑇𝑆)
13 simpr 484 . . . . . 6 ((𝜑𝑡 = 𝑇) → 𝑡 = 𝑇)
1413oveq1d 7405 . . . . 5 ((𝜑𝑡 = 𝑇) → (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))))
1514eqeq1d 2732 . . . 4 ((𝜑𝑡 = 𝑇) → ((𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ↔ (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
16 erlbrd.2 . . . 4 (𝜑 → (𝑇 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )
1712, 15, 16rspcedvd 3593 . . 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 2730 . . . . 5 (𝐵 × 𝑆) = (𝐵 × 𝑆)
25 eqid 2730 . . . . 5 {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )}
26 erlcl1.s . . . . 5 (𝜑𝑆𝐵)
2720, 21, 22, 23, 24, 25, 26erlval 33216 . . . 4 (𝜑 → (𝑅 ~RL 𝑆) = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )})
2819, 27eqtrid 2777 . . 3 (𝜑 = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝐵 × 𝑆) ∧ 𝑏 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 )})
29 simprl 770 . . . . . . . . . 10 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → 𝑎 = 𝑈)
3029fveq2d 6865 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑎) = (1st𝑈))
311fveq2d 6865 . . . . . . . . . . 11 (𝜑 → (1st𝑈) = (1st ‘⟨𝐸, 𝐺⟩))
32 op1stg 7983 . . . . . . . . . . . 12 ((𝐸𝐵𝐺𝑆) → (1st ‘⟨𝐸, 𝐺⟩) = 𝐸)
332, 3, 32syl2anc 584 . . . . . . . . . . 11 (𝜑 → (1st ‘⟨𝐸, 𝐺⟩) = 𝐸)
3431, 33eqtrd 2765 . . . . . . . . . 10 (𝜑 → (1st𝑈) = 𝐸)
3534adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑈) = 𝐸)
3630, 35eqtrd 2765 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑎) = 𝐸)
37 simprr 772 . . . . . . . . . 10 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → 𝑏 = 𝑉)
3837fveq2d 6865 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑏) = (2nd𝑉))
396fveq2d 6865 . . . . . . . . . . 11 (𝜑 → (2nd𝑉) = (2nd ‘⟨𝐹, 𝐻⟩))
40 op2ndg 7984 . . . . . . . . . . . 12 ((𝐹𝐵𝐻𝑆) → (2nd ‘⟨𝐹, 𝐻⟩) = 𝐻)
417, 8, 40syl2anc 584 . . . . . . . . . . 11 (𝜑 → (2nd ‘⟨𝐹, 𝐻⟩) = 𝐻)
4239, 41eqtrd 2765 . . . . . . . . . 10 (𝜑 → (2nd𝑉) = 𝐻)
4342adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑉) = 𝐻)
4438, 43eqtrd 2765 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑏) = 𝐻)
4536, 44oveq12d 7408 . . . . . . 7 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → ((1st𝑎) · (2nd𝑏)) = (𝐸 · 𝐻))
4637fveq2d 6865 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑏) = (1st𝑉))
476fveq2d 6865 . . . . . . . . . . 11 (𝜑 → (1st𝑉) = (1st ‘⟨𝐹, 𝐻⟩))
48 op1stg 7983 . . . . . . . . . . . 12 ((𝐹𝐵𝐻𝑆) → (1st ‘⟨𝐹, 𝐻⟩) = 𝐹)
497, 8, 48syl2anc 584 . . . . . . . . . . 11 (𝜑 → (1st ‘⟨𝐹, 𝐻⟩) = 𝐹)
5047, 49eqtrd 2765 . . . . . . . . . 10 (𝜑 → (1st𝑉) = 𝐹)
5150adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑉) = 𝐹)
5246, 51eqtrd 2765 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (1st𝑏) = 𝐹)
5329fveq2d 6865 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑎) = (2nd𝑈))
541fveq2d 6865 . . . . . . . . . . 11 (𝜑 → (2nd𝑈) = (2nd ‘⟨𝐸, 𝐺⟩))
55 op2ndg 7984 . . . . . . . . . . . 12 ((𝐸𝐵𝐺𝑆) → (2nd ‘⟨𝐸, 𝐺⟩) = 𝐺)
562, 3, 55syl2anc 584 . . . . . . . . . . 11 (𝜑 → (2nd ‘⟨𝐸, 𝐺⟩) = 𝐺)
5754, 56eqtrd 2765 . . . . . . . . . 10 (𝜑 → (2nd𝑈) = 𝐺)
5857adantr 480 . . . . . . . . 9 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑈) = 𝐺)
5953, 58eqtrd 2765 . . . . . . . 8 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (2nd𝑎) = 𝐺)
6052, 59oveq12d 7408 . . . . . . 7 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → ((1st𝑏) · (2nd𝑎)) = (𝐹 · 𝐺))
6145, 60oveq12d 7408 . . . . . 6 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎))) = ((𝐸 · 𝐻) (𝐹 · 𝐺)))
6261oveq2d 7406 . . . . 5 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))))
6362eqeq1d 2732 . . . 4 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → ((𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 ↔ (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
6463rexbidv 3158 . . 3 ((𝜑 ∧ (𝑎 = 𝑈𝑏 = 𝑉)) → (∃𝑡𝑆 (𝑡 · (((1st𝑎) · (2nd𝑏)) ((1st𝑏) · (2nd𝑎)))) = 0 ↔ ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 ))
6528, 64brab2d 32542 . 2 (𝜑 → (𝑈 𝑉 ↔ ((𝑈 ∈ (𝐵 × 𝑆) ∧ 𝑉 ∈ (𝐵 × 𝑆)) ∧ ∃𝑡𝑆 (𝑡 · ((𝐸 · 𝐻) (𝐹 · 𝐺))) = 0 )))
6618, 65mpbird 257 1 (𝜑𝑈 𝑉)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1540  wcel 2109  wrex 3054  wss 3917  cop 4598   class class class wbr 5110  {copab 5172   × cxp 5639  cfv 6514  (class class class)co 7390  1st c1st 7969  2nd c2nd 7970  Basecbs 17186  .rcmulr 17228  0gc0g 17409  -gcsg 18874   ~RL cerl 33211
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-sep 5254  ax-nul 5264  ax-pow 5323  ax-pr 5390  ax-un 7714
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-ral 3046  df-rex 3055  df-rab 3409  df-v 3452  df-sbc 3757  df-csb 3866  df-dif 3920  df-un 3922  df-in 3924  df-ss 3934  df-nul 4300  df-if 4492  df-pw 4568  df-sn 4593  df-pr 4595  df-op 4599  df-uni 4875  df-br 5111  df-opab 5173  df-mpt 5192  df-id 5536  df-xp 5647  df-rel 5648  df-cnv 5649  df-co 5650  df-dm 5651  df-rn 5652  df-iota 6467  df-fun 6516  df-fv 6522  df-ov 7393  df-oprab 7394  df-mpo 7395  df-1st 7971  df-2nd 7972  df-erl 33213
This theorem is referenced by:  erlbr2d  33222  erler  33223  rlocaddval  33226  rlocmulval  33227  rloccring  33228
  Copyright terms: Public domain W3C validator