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

Theorem mndlactf1o 33381
Description: An element 𝑋 of a monoid 𝐸 is invertible iff its left-translation 𝐹 is bijective. See also grplactf1o 19141. Remark in chapter I. of [BourbakiAlg1] p. 17. (Contributed by Thierry Arnoux, 3-Aug-2025.)
Hypotheses
Ref Expression
mndlactf1o.b 𝐵 = (Base‘𝐸)
mndlactf1o.z 0 = (0g𝐸)
mndlactf1o.p + = (+g𝐸)
mndlactf1o.f 𝐹 = (𝑎𝐵 ↦ (𝑋 + 𝑎))
mndlactf1o.e (𝜑𝐸 ∈ Mnd)
mndlactf1o.x (𝜑𝑋𝐵)
Assertion
Ref Expression
mndlactf1o (𝜑 → (𝐹:𝐵1-1-onto𝐵 ↔ ∃𝑦𝐵 ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 )))
Distinct variable groups:   + ,𝑎,𝑦   0 ,𝑎,𝑦   𝐵,𝑎,𝑦   𝐹,𝑎,𝑦   𝑋,𝑎,𝑦   𝜑,𝑎,𝑦
Allowed substitution hints:   𝐸(𝑦, 𝑎)

Proof of Theorem mndlactf1o
Dummy variables 𝑢 𝑣 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 oveq2 7431 . . . . . . 7 (𝑦 = 𝑢 → (𝑋 + 𝑦) = (𝑋 + 𝑢))
21eqeq1d 2768 . . . . . 6 (𝑦 = 𝑢 → ((𝑋 + 𝑦) = 0 ↔ (𝑋 + 𝑢) = 0 ))
3 oveq1 7430 . . . . . . 7 (𝑦 = 𝑢 → (𝑦 + 𝑋) = (𝑢 + 𝑋))
43eqeq1d 2768 . . . . . 6 (𝑦 = 𝑢 → ((𝑦 + 𝑋) = 0 ↔ (𝑢 + 𝑋) = 0 ))
52, 4anbi12d 644 . . . . 5 (𝑦 = 𝑢 → (((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 ) ↔ ((𝑋 + 𝑢) = 0 ∧ (𝑢 + 𝑋) = 0 )))
6 simplr 781 . . . . 5 ((((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) ∧ 𝑢𝐵) ∧ (𝑋 + 𝑢) = 0 ) → 𝑢𝐵)
7 simpr 490 . . . . . 6 ((((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) ∧ 𝑢𝐵) ∧ (𝑋 + 𝑢) = 0 ) → (𝑋 + 𝑢) = 0 )
8 mndlactf1o.b . . . . . . . . 9 𝐵 = (Base‘𝐸)
9 mndlactf1o.z . . . . . . . . 9 0 = (0g𝐸)
10 mndlactf1o.p . . . . . . . . 9 + = (+g𝐸)
11 mndlactf1o.e . . . . . . . . . 10 (𝜑𝐸 ∈ Mnd)
1211ad5antr 747 . . . . . . . . 9 ((((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) ∧ 𝑢𝐵) ∧ (𝑋 + 𝑢) = 0 ) → 𝐸 ∈ Mnd)
13 mndlactf1o.x . . . . . . . . . 10 (𝜑𝑋𝐵)
1413ad5antr 747 . . . . . . . . 9 ((((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) ∧ 𝑢𝐵) ∧ (𝑋 + 𝑢) = 0 ) → 𝑋𝐵)
15 simp-4r 796 . . . . . . . . 9 ((((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) ∧ 𝑢𝐵) ∧ (𝑋 + 𝑢) = 0 ) → 𝑣𝐵)
16 simpllr 788 . . . . . . . . 9 ((((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) ∧ 𝑢𝐵) ∧ (𝑋 + 𝑢) = 0 ) → (𝑣 + 𝑋) = 0 )
178, 9, 10, 12, 14, 15, 6, 16, 7mndlrinv 33375 . . . . . . . 8 ((((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) ∧ 𝑢𝐵) ∧ (𝑋 + 𝑢) = 0 ) → 𝑣 = 𝑢)
1817oveq1d 7438 . . . . . . 7 ((((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) ∧ 𝑢𝐵) ∧ (𝑋 + 𝑢) = 0 ) → (𝑣 + 𝑋) = (𝑢 + 𝑋))
1918, 16eqtr3d 2803 . . . . . 6 ((((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) ∧ 𝑢𝐵) ∧ (𝑋 + 𝑢) = 0 ) → (𝑢 + 𝑋) = 0 )
207, 19jca 521 . . . . 5 ((((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) ∧ 𝑢𝐵) ∧ (𝑋 + 𝑢) = 0 ) → ((𝑋 + 𝑢) = 0 ∧ (𝑢 + 𝑋) = 0 ))
215, 6, 20rspcedvdw 3587 . . . 4 ((((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) ∧ 𝑢𝐵) ∧ (𝑋 + 𝑢) = 0 ) → ∃𝑦𝐵 ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 ))
22 f1ofo 6835 . . . . . . 7 (𝐹:𝐵1-1-onto𝐵𝐹:𝐵onto𝐵)
2322adantl 487 . . . . . 6 ((𝜑𝐹:𝐵1-1-onto𝐵) → 𝐹:𝐵onto𝐵)
24 mndlactf1o.f . . . . . . . 8 𝐹 = (𝑎𝐵 ↦ (𝑋 + 𝑎))
258, 9, 10, 24, 11, 13mndlactfo 33378 . . . . . . 7 (𝜑 → (𝐹:𝐵onto𝐵 ↔ ∃𝑢𝐵 (𝑋 + 𝑢) = 0 ))
2625biimpa 482 . . . . . 6 ((𝜑𝐹:𝐵onto𝐵) → ∃𝑢𝐵 (𝑋 + 𝑢) = 0 )
2723, 26syldan 603 . . . . 5 ((𝜑𝐹:𝐵1-1-onto𝐵) → ∃𝑢𝐵 (𝑋 + 𝑢) = 0 )
2827ad2antrr 739 . . . 4 ((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) → ∃𝑢𝐵 (𝑋 + 𝑢) = 0 )
2921, 28r19.29a 3176 . . 3 ((((𝜑𝐹:𝐵1-1-onto𝐵) ∧ 𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) → ∃𝑦𝐵 ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 ))
30 oveq1 7430 . . . . 5 (𝑣 = (𝐹0 ) → (𝑣 + 𝑋) = ((𝐹0 ) + 𝑋))
3130eqeq1d 2768 . . . 4 (𝑣 = (𝐹0 ) → ((𝑣 + 𝑋) = 0 ↔ ((𝐹0 ) + 𝑋) = 0 ))
32 f1ocnv 6840 . . . . . . 7 (𝐹:𝐵1-1-onto𝐵𝐹:𝐵1-1-onto𝐵)
33 f1of 6827 . . . . . . 7 (𝐹:𝐵1-1-onto𝐵𝐹:𝐵𝐵)
3432, 33syl 18 . . . . . 6 (𝐹:𝐵1-1-onto𝐵𝐹:𝐵𝐵)
3534adantl 487 . . . . 5 ((𝜑𝐹:𝐵1-1-onto𝐵) → 𝐹:𝐵𝐵)
368, 9mndidcl 18836 . . . . . . 7 (𝐸 ∈ Mnd → 0𝐵)
3711, 36syl 18 . . . . . 6 (𝜑0𝐵)
3837adantr 486 . . . . 5 ((𝜑𝐹:𝐵1-1-onto𝐵) → 0𝐵)
3935, 38ffvelcdmd 7087 . . . 4 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝐹0 ) ∈ 𝐵)
40 f1of1 6826 . . . . . 6 (𝐹:𝐵1-1-onto𝐵𝐹:𝐵1-1𝐵)
4140adantl 487 . . . . 5 ((𝜑𝐹:𝐵1-1-onto𝐵) → 𝐹:𝐵1-1𝐵)
4211adantr 486 . . . . . . 7 ((𝜑𝐹:𝐵1-1-onto𝐵) → 𝐸 ∈ Mnd)
4313adantr 486 . . . . . . 7 ((𝜑𝐹:𝐵1-1-onto𝐵) → 𝑋𝐵)
448, 10, 42, 39, 43mndcld 33373 . . . . . 6 ((𝜑𝐹:𝐵1-1-onto𝐵) → ((𝐹0 ) + 𝑋) ∈ 𝐵)
4544, 38jca 521 . . . . 5 ((𝜑𝐹:𝐵1-1-onto𝐵) → (((𝐹0 ) + 𝑋) ∈ 𝐵0𝐵))
468, 10, 9mndrid 18842 . . . . . . 7 ((𝐸 ∈ Mnd ∧ 𝑋𝐵) → (𝑋 + 0 ) = 𝑋)
4742, 43, 46syl2anc 596 . . . . . 6 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝑋 + 0 ) = 𝑋)
48 oveq2 7431 . . . . . . 7 (𝑎 = 0 → (𝑋 + 𝑎) = (𝑋 + 0 ))
49 ovexd 7458 . . . . . . 7 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝑋 + 0 ) ∈ V)
5024, 48, 38, 49fvmptd3 7020 . . . . . 6 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝐹0 ) = (𝑋 + 0 ))
51 oveq2 7431 . . . . . . . 8 (𝑎 = ((𝐹0 ) + 𝑋) → (𝑋 + 𝑎) = (𝑋 + ((𝐹0 ) + 𝑋)))
52 ovexd 7458 . . . . . . . 8 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝑋 + ((𝐹0 ) + 𝑋)) ∈ V)
5324, 51, 44, 52fvmptd3 7020 . . . . . . 7 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝐹‘((𝐹0 ) + 𝑋)) = (𝑋 + ((𝐹0 ) + 𝑋)))
54 oveq2 7431 . . . . . . . . . . 11 (𝑎 = (𝐹0 ) → (𝑋 + 𝑎) = (𝑋 + (𝐹0 )))
55 ovexd 7458 . . . . . . . . . . 11 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝑋 + (𝐹0 )) ∈ V)
5624, 54, 39, 55fvmptd3 7020 . . . . . . . . . 10 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝐹‘(𝐹0 )) = (𝑋 + (𝐹0 )))
57 simpr 490 . . . . . . . . . . 11 ((𝜑𝐹:𝐵1-1-onto𝐵) → 𝐹:𝐵1-1-onto𝐵)
58 f1ocnvfv2 7286 . . . . . . . . . . 11 ((𝐹:𝐵1-1-onto𝐵0𝐵) → (𝐹‘(𝐹0 )) = 0 )
5957, 38, 58syl2anc 596 . . . . . . . . . 10 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝐹‘(𝐹0 )) = 0 )
6056, 59eqtr3d 2803 . . . . . . . . 9 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝑋 + (𝐹0 )) = 0 )
6160oveq1d 7438 . . . . . . . 8 ((𝜑𝐹:𝐵1-1-onto𝐵) → ((𝑋 + (𝐹0 )) + 𝑋) = ( 0 + 𝑋))
628, 10, 42, 43, 39, 43mndassd 33374 . . . . . . . 8 ((𝜑𝐹:𝐵1-1-onto𝐵) → ((𝑋 + (𝐹0 )) + 𝑋) = (𝑋 + ((𝐹0 ) + 𝑋)))
638, 10, 9mndlid 18841 . . . . . . . . 9 ((𝐸 ∈ Mnd ∧ 𝑋𝐵) → ( 0 + 𝑋) = 𝑋)
6442, 43, 63syl2anc 596 . . . . . . . 8 ((𝜑𝐹:𝐵1-1-onto𝐵) → ( 0 + 𝑋) = 𝑋)
6561, 62, 643eqtr3d 2809 . . . . . . 7 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝑋 + ((𝐹0 ) + 𝑋)) = 𝑋)
6653, 65eqtrd 2801 . . . . . 6 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝐹‘((𝐹0 ) + 𝑋)) = 𝑋)
6747, 50, 663eqtr4rd 2812 . . . . 5 ((𝜑𝐹:𝐵1-1-onto𝐵) → (𝐹‘((𝐹0 ) + 𝑋)) = (𝐹0 ))
68 f1fveq 7267 . . . . . 6 ((𝐹:𝐵1-1𝐵 ∧ (((𝐹0 ) + 𝑋) ∈ 𝐵0𝐵)) → ((𝐹‘((𝐹0 ) + 𝑋)) = (𝐹0 ) ↔ ((𝐹0 ) + 𝑋) = 0 ))
6968biimpa 482 . . . . 5 (((𝐹:𝐵1-1𝐵 ∧ (((𝐹0 ) + 𝑋) ∈ 𝐵0𝐵)) ∧ (𝐹‘((𝐹0 ) + 𝑋)) = (𝐹0 )) → ((𝐹0 ) + 𝑋) = 0 )
7041, 45, 67, 69syl21anc 851 . . . 4 ((𝜑𝐹:𝐵1-1-onto𝐵) → ((𝐹0 ) + 𝑋) = 0 )
7131, 39, 70rspcedvdw 3587 . . 3 ((𝜑𝐹:𝐵1-1-onto𝐵) → ∃𝑣𝐵 (𝑣 + 𝑋) = 0 )
7229, 71r19.29a 3176 . 2 ((𝜑𝐹:𝐵1-1-onto𝐵) → ∃𝑦𝐵 ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 ))
73 oveq1 7430 . . . . . . 7 (𝑣 = 𝑦 → (𝑣 + 𝑋) = (𝑦 + 𝑋))
7473eqeq1d 2768 . . . . . 6 (𝑣 = 𝑦 → ((𝑣 + 𝑋) = 0 ↔ (𝑦 + 𝑋) = 0 ))
75 simplr 781 . . . . . 6 (((𝜑𝑦𝐵) ∧ ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 )) → 𝑦𝐵)
76 simprr 785 . . . . . 6 (((𝜑𝑦𝐵) ∧ ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 )) → (𝑦 + 𝑋) = 0 )
7774, 75, 76rspcedvdw 3587 . . . . 5 (((𝜑𝑦𝐵) ∧ ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 )) → ∃𝑣𝐵 (𝑣 + 𝑋) = 0 )
78 oveq2 7431 . . . . . . 7 (𝑢 = 𝑦 → (𝑋 + 𝑢) = (𝑋 + 𝑦))
7978eqeq1d 2768 . . . . . 6 (𝑢 = 𝑦 → ((𝑋 + 𝑢) = 0 ↔ (𝑋 + 𝑦) = 0 ))
80 simprl 783 . . . . . 6 (((𝜑𝑦𝐵) ∧ ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 )) → (𝑋 + 𝑦) = 0 )
8179, 75, 80rspcedvdw 3587 . . . . 5 (((𝜑𝑦𝐵) ∧ ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 )) → ∃𝑢𝐵 (𝑋 + 𝑢) = 0 )
8277, 81jca 521 . . . 4 (((𝜑𝑦𝐵) ∧ ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 )) → (∃𝑣𝐵 (𝑣 + 𝑋) = 0 ∧ ∃𝑢𝐵 (𝑋 + 𝑢) = 0 ))
8382r19.29an 3172 . . 3 ((𝜑 ∧ ∃𝑦𝐵 ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 )) → (∃𝑣𝐵 (𝑣 + 𝑋) = 0 ∧ ∃𝑢𝐵 (𝑋 + 𝑢) = 0 ))
8411ad2antrr 739 . . . . . . 7 (((𝜑𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) → 𝐸 ∈ Mnd)
8513ad2antrr 739 . . . . . . 7 (((𝜑𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) → 𝑋𝐵)
86 simplr 781 . . . . . . 7 (((𝜑𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) → 𝑣𝐵)
87 simpr 490 . . . . . . 7 (((𝜑𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) → (𝑣 + 𝑋) = 0 )
888, 9, 10, 24, 84, 85, 86, 87mndlactf1 33377 . . . . . 6 (((𝜑𝑣𝐵) ∧ (𝑣 + 𝑋) = 0 ) → 𝐹:𝐵1-1𝐵)
8988r19.29an 3172 . . . . 5 ((𝜑 ∧ ∃𝑣𝐵 (𝑣 + 𝑋) = 0 ) → 𝐹:𝐵1-1𝐵)
9025biimpar 483 . . . . 5 ((𝜑 ∧ ∃𝑢𝐵 (𝑋 + 𝑢) = 0 ) → 𝐹:𝐵onto𝐵)
9189, 90anim12dan 631 . . . 4 ((𝜑 ∧ (∃𝑣𝐵 (𝑣 + 𝑋) = 0 ∧ ∃𝑢𝐵 (𝑋 + 𝑢) = 0 )) → (𝐹:𝐵1-1𝐵𝐹:𝐵onto𝐵))
92 df-f1o 6550 . . . 4 (𝐹:𝐵1-1-onto𝐵 ↔ (𝐹:𝐵1-1𝐵𝐹:𝐵onto𝐵))
9391, 92sylibr 237 . . 3 ((𝜑 ∧ (∃𝑣𝐵 (𝑣 + 𝑋) = 0 ∧ ∃𝑢𝐵 (𝑋 + 𝑢) = 0 )) → 𝐹:𝐵1-1-onto𝐵)
9483, 93syldan 603 . 2 ((𝜑 ∧ ∃𝑦𝐵 ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 )) → 𝐹:𝐵1-1-onto𝐵)
9572, 94impbida 813 1 (𝜑 → (𝐹:𝐵1-1-onto𝐵 ↔ ∃𝑦𝐵 ((𝑋 + 𝑦) = 0 ∧ (𝑦 + 𝑋) = 0 )))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401   = wceq 1570  wcel 2146  wrex 3092  Vcvv 3458  cmpt 5197  ccnv 5665  wf 6539  1-1wf1 6540  ontowfo 6541  1-1-ontowf1o 6542  cfv 6543  (class class class)co 7423  Basecbs 17294  +gcplusg 17335  0gc0g 17517  Mndcmnd 18821
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2738  ax-sep 5262  ax-nul 5274  ax-pr 5409
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-ral 3083  df-rex 3093  df-rmo 3372  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-nul 4290  df-if 4493  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4878  df-br 5115  df-opab 5179  df-mpt 5198  df-id 5561  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-iota 6499  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-riota 7380  df-ov 7426  df-0g 17519  df-mgm 18723  df-sgrp 18806  df-mnd 18822
This theorem is used by:  assarrginv  34057
  Copyright terms: Public domain W3C validator