mathlib documentation

algebra.group.units

Units (i.e., invertible elements) of a monoid #

An element of a monoid is a unit if it has a two-sided inverse.

Main declarations #

For both declarations, there is an additive counterpart: add_units and is_add_unit.

Notation #

We provide as notation for units M, resembling the notation $R^{\times}$ for the units of a ring, which is common in mathematics.

structure units (α : Type u) [monoid α] :
Type u
  • val : α
  • inv : α
  • val_inv : self.val * self.inv = 1
  • inv_val : self.inv * self.val = 1

Units of a monoid, bundled version. Notation: αˣ.

An element of a monoid is a unit if it has a two-sided inverse. This version bundles the inverse element so that it can be computed. For a predicate see is_unit.

Instances for units
theorem unique_has_zero {α : Type u_1} [unique α] [has_zero α] :
theorem unique_has_one {α : Type u_1} [unique α] [has_one α] :
@[protected, instance]
def add_units.has_coe {α : Type u} [add_monoid α] :
Equations
@[protected, instance]
def units.has_coe {α : Type u} [monoid α] :
has_coe αˣ α
Equations
@[protected, instance]
def units.has_inv {α : Type u} [monoid α] :
Equations
@[protected, instance]
def add_units.has_neg {α : Type u} [add_monoid α] :
Equations
def units.simps.coe {α : Type u} [monoid α] (u : αˣ) :
α

See Note [custom simps projection]

Equations
def units.simps.coe_inv {α : Type u} [monoid α] (u : αˣ) :
α

See Note [custom simps projection]

Equations
@[simp]
theorem units.coe_mk {α : Type u} [monoid α] (a b : α) (h₁ : a * b = 1) (h₂ : b * a = 1) :
{val := a, inv := b, val_inv := h₁, inv_val := h₂} = a
@[simp]
theorem add_units.coe_mk {α : Type u} [add_monoid α] (a b : α) (h₁ : a + b = 0) (h₂ : b + a = 0) :
{val := a, neg := b, val_neg := h₁, neg_val := h₂} = a
@[ext]
theorem units.ext {α : Type u} [monoid α] :
theorem add_units.ext {α : Type u} [add_monoid α] :
@[norm_cast]
theorem units.eq_iff {α : Type u} [monoid α] {a b : αˣ} :
a = b a = b
@[norm_cast]
theorem add_units.eq_iff {α : Type u} [add_monoid α] {a b : add_units α} :
a = b a = b
theorem add_units.ext_iff {α : Type u} [add_monoid α] {a b : add_units α} :
a = b a = b
theorem units.ext_iff {α : Type u} [monoid α] {a b : αˣ} :
a = b a = b
@[protected, instance]
Equations
@[protected, instance]
def units.decidable_eq {α : Type u} [monoid α] [decidable_eq α] :
Equations
@[simp]
theorem units.mk_coe {α : Type u} [monoid α] (u : αˣ) (y : α) (h₁ : u * y = 1) (h₂ : y * u = 1) :
{val := u, inv := y, val_inv := h₁, inv_val := h₂} = u
@[simp]
theorem add_units.mk_coe {α : Type u} [add_monoid α] (u : add_units α) (y : α) (h₁ : u + y = 0) (h₂ : y + u = 0) :
{val := u, neg := y, val_neg := h₁, neg_val := h₂} = u
@[simp]
theorem units.coe_copy {α : Type u} [monoid α] (u : αˣ) (val : α) (hv : val = u) (inv : α) (hi : inv = u⁻¹) :
(u.copy val hv inv hi) = val
@[simp]
theorem add_units.coe_copy {α : Type u} [add_monoid α] (u : add_units α) (val : α) (hv : val = u) (inv : α) (hi : inv = -u) :
(u.copy val hv inv hi) = val
@[simp]
theorem units.coe_inv_copy {α : Type u} [monoid α] (u : αˣ) (val : α) (hv : val = u) (inv : α) (hi : inv = u⁻¹) :
(u.copy val hv inv hi)⁻¹ = inv
@[simp]
theorem add_units.coe_neg_copy {α : Type u} [add_monoid α] (u : add_units α) (val : α) (hv : val = u) (inv : α) (hi : inv = -u) :
-u.copy val hv inv hi = inv
def units.copy {α : Type u} [monoid α] (u : αˣ) (val : α) (hv : val = u) (inv : α) (hi : inv = u⁻¹) :
αˣ

Copy a unit, adjusting definition equalities.

Equations
def add_units.copy {α : Type u} [add_monoid α] (u : add_units α) (val : α) (hv : val = u) (inv : α) (hi : inv = -u) :

Copy an add_unit, adjusting definitional equalities.

Equations
theorem add_units.copy_eq {α : Type u} [add_monoid α] (u : add_units α) (val : α) (hv : val = u) (inv : α) (hi : inv = -u) :
u.copy val hv inv hi = u
theorem units.copy_eq {α : Type u} [monoid α] (u : αˣ) (val : α) (hv : val = u) (inv : α) (hi : inv = u⁻¹) :
u.copy val hv inv hi = u
@[protected, instance]
def units.group {α : Type u} [monoid α] :

Units of a monoid form a group.

Equations
@[protected, instance]
def add_units.add_group {α : Type u} [add_monoid α] :

Additive units of an additive monoid form an additive group.

Equations
@[protected, instance]
def units.inhabited {α : Type u} [monoid α] :
Equations
@[protected, instance]
def add_units.inhabited {α : Type u} [add_monoid α] :
Equations
@[protected, instance]
def units.has_repr {α : Type u} [monoid α] [has_repr α] :
Equations
@[protected, instance]
def add_units.has_repr {α : Type u} [add_monoid α] [has_repr α] :
Equations
@[simp, norm_cast]
theorem add_units.coe_add {α : Type u} [add_monoid α] (a b : add_units α) :
(a + b) = a + b
@[simp, norm_cast]
theorem units.coe_mul {α : Type u} [monoid α] (a b : αˣ) :
(a * b) = a * b
@[simp, norm_cast]
theorem units.coe_one {α : Type u} [monoid α] :
1 = 1
@[simp, norm_cast]
theorem add_units.coe_zero {α : Type u} [add_monoid α] :
0 = 0
@[simp, norm_cast]
theorem units.coe_eq_one {α : Type u} [monoid α] {a : αˣ} :
a = 1 a = 1
@[simp, norm_cast]
theorem add_units.coe_eq_zero {α : Type u} [add_monoid α] {a : add_units α} :
a = 0 a = 0
@[simp]
theorem add_units.neg_mk {α : Type u} [add_monoid α] (x y : α) (h₁ : x + y = 0) (h₂ : y + x = 0) :
-{val := x, neg := y, val_neg := h₁, neg_val := h₂} = {val := y, neg := x, val_neg := h₂, neg_val := h₁}
@[simp]
theorem units.inv_mk {α : Type u} [monoid α] (x y : α) (h₁ : x * y = 1) (h₂ : y * x = 1) :
{val := x, inv := y, val_inv := h₁, inv_val := h₂}⁻¹ = {val := y, inv := x, val_inv := h₂, inv_val := h₁}
@[simp]
theorem units.val_eq_coe {α : Type u} [monoid α] (a : αˣ) :
a.val = a
@[simp]
theorem add_units.val_eq_coe {α : Type u} [add_monoid α] (a : add_units α) :
a.val = a
@[simp]
theorem units.inv_eq_coe_inv {α : Type u} [monoid α] (a : αˣ) :
@[simp]
theorem add_units.neg_eq_coe_neg {α : Type u} [add_monoid α] (a : add_units α) :
@[simp]
theorem units.inv_mul {α : Type u} [monoid α] (a : αˣ) :
@[simp]
theorem add_units.neg_add {α : Type u} [add_monoid α] (a : add_units α) :
-a + a = 0
@[simp]
theorem units.mul_inv {α : Type u} [monoid α] (a : αˣ) :
@[simp]
theorem add_units.add_neg {α : Type u} [add_monoid α] (a : add_units α) :
a + -a = 0
theorem add_units.neg_add_of_eq {α : Type u} [add_monoid α] {u : add_units α} {a : α} (h : u = a) :
-u + a = 0
theorem units.inv_mul_of_eq {α : Type u} [monoid α] {u : αˣ} {a : α} (h : u = a) :
u⁻¹ * a = 1
theorem add_units.add_neg_of_eq {α : Type u} [add_monoid α] {u : add_units α} {a : α} (h : u = a) :
a + -u = 0
theorem units.mul_inv_of_eq {α : Type u} [monoid α] {u : αˣ} {a : α} (h : u = a) :
a * u⁻¹ = 1
@[simp]
theorem add_units.add_neg_cancel_left {α : Type u} [add_monoid α] (a : add_units α) (b : α) :
a + (-a + b) = b
@[simp]
theorem units.mul_inv_cancel_left {α : Type u} [monoid α] (a : αˣ) (b : α) :
a * (a⁻¹ * b) = b
@[simp]
theorem units.inv_mul_cancel_left {α : Type u} [monoid α] (a : αˣ) (b : α) :
a⁻¹ * (a * b) = b
@[simp]
theorem add_units.neg_add_cancel_left {α : Type u} [add_monoid α] (a : add_units α) (b : α) :
-a + (a + b) = b
@[simp]
theorem add_units.add_neg_cancel_right {α : Type u} [add_monoid α] (a : α) (b : add_units α) :
a + b + -b = a
@[simp]
theorem units.mul_inv_cancel_right {α : Type u} [monoid α] (a : α) (b : αˣ) :
a * b * b⁻¹ = a
@[simp]
theorem add_units.neg_add_cancel_right {α : Type u} [add_monoid α] (a : α) (b : add_units α) :
a + -b + b = a
@[simp]
theorem units.inv_mul_cancel_right {α : Type u} [monoid α] (a : α) (b : αˣ) :
a * b⁻¹ * b = a
@[simp]
theorem add_units.add_right_inj {α : Type u} [add_monoid α] (a : add_units α) {b c : α} :
a + b = a + c b = c
@[simp]
theorem units.mul_right_inj {α : Type u} [monoid α] (a : αˣ) {b c : α} :
a * b = a * c b = c
@[simp]
theorem units.mul_left_inj {α : Type u} [monoid α] (a : αˣ) {b c : α} :
b * a = c * a b = c
@[simp]
theorem add_units.add_left_inj {α : Type u} [add_monoid α] (a : add_units α) {b c : α} :
b + a = c + a b = c
theorem add_units.eq_add_neg_iff_add_eq {α : Type u} [add_monoid α] (c : add_units α) {a b : α} :
a = b + -c a + c = b
theorem units.eq_mul_inv_iff_mul_eq {α : Type u} [monoid α] (c : αˣ) {a b : α} :
a = b * c⁻¹ a * c = b
theorem units.eq_inv_mul_iff_mul_eq {α : Type u} [monoid α] (b : αˣ) {a c : α} :
a = b⁻¹ * c b * a = c
theorem add_units.eq_neg_add_iff_add_eq {α : Type u} [add_monoid α] (b : add_units α) {a c : α} :
a = -b + c b + a = c
theorem add_units.neg_add_eq_iff_eq_add {α : Type u} [add_monoid α] (a : add_units α) {b c : α} :
-a + b = c b = a + c
theorem units.inv_mul_eq_iff_eq_mul {α : Type u} [monoid α] (a : αˣ) {b c : α} :
a⁻¹ * b = c b = a * c
theorem units.mul_inv_eq_iff_eq_mul {α : Type u} [monoid α] (b : αˣ) {a c : α} :
a * b⁻¹ = c a = c * b
theorem add_units.add_neg_eq_iff_eq_add {α : Type u} [add_monoid α] (b : add_units α) {a c : α} :
a + -b = c a = c + b
@[protected]
theorem units.inv_eq_of_mul_eq_one_left {α : Type u} [monoid α] {u : αˣ} {a : α} (h : a * u = 1) :
@[protected]
theorem add_units.neg_eq_of_add_eq_zero_left {α : Type u} [add_monoid α] {u : add_units α} {a : α} (h : a + u = 0) :
-u = a
@[protected]
theorem add_units.neg_eq_of_add_eq_zero_right {α : Type u} [add_monoid α] {u : add_units α} {a : α} (h : u + a = 0) :
-u = a
@[protected]
theorem units.inv_eq_of_mul_eq_one_right {α : Type u} [monoid α] {u : αˣ} {a : α} (h : u * a = 1) :
@[protected]
theorem add_units.eq_neg_of_add_eq_zero_left {α : Type u} [add_monoid α] {u : add_units α} {a : α} (h : u + a = 0) :
a = -u
@[protected]
theorem units.eq_inv_of_mul_eq_one_left {α : Type u} [monoid α] {u : αˣ} {a : α} (h : u * a = 1) :
@[protected]
theorem add_units.eq_neg_of_add_eq_zero_right {α : Type u} [add_monoid α] {u : add_units α} {a : α} (h : a + u = 0) :
a = -u
@[protected]
theorem units.eq_inv_of_mul_eq_one_right {α : Type u} [monoid α] {u : αˣ} {a : α} (h : a * u = 1) :
@[simp]
theorem add_units.add_neg_eq_zero {α : Type u} [add_monoid α] {u : add_units α} {a : α} :
a + -u = 0 a = u
@[simp]
theorem units.mul_inv_eq_one {α : Type u} [monoid α] {u : αˣ} {a : α} :
a * u⁻¹ = 1 a = u
@[simp]
theorem add_units.neg_add_eq_zero {α : Type u} [add_monoid α] {u : add_units α} {a : α} :
-u + a = 0 u = a
@[simp]
theorem units.inv_mul_eq_one {α : Type u} [monoid α] {u : αˣ} {a : α} :
u⁻¹ * a = 1 u = a
theorem add_units.add_eq_zero_iff_eq_neg {α : Type u} [add_monoid α] {u : add_units α} {a : α} :
a + u = 0 a = -u
theorem units.mul_eq_one_iff_eq_inv {α : Type u} [monoid α] {u : αˣ} {a : α} :
a * u = 1 a = u⁻¹
theorem units.mul_eq_one_iff_inv_eq {α : Type u} [monoid α] {u : αˣ} {a : α} :
u * a = 1 u⁻¹ = a
theorem add_units.add_eq_zero_iff_neg_eq {α : Type u} [add_monoid α] {u : add_units α} {a : α} :
u + a = 0 -u = a
theorem units.inv_unique {α : Type u} [monoid α] {u₁ u₂ : αˣ} (h : u₁ = u₂) :
def add_units.mk_of_add_eq_zero {α : Type u} [add_comm_monoid α] (a b : α) (hab : a + b = 0) :

For a, b in an add_comm_monoid such that a + b = 0, makes an add_unit out of a.

Equations
def units.mk_of_mul_eq_one {α : Type u} [comm_monoid α] (a b : α) (hab : a * b = 1) :
αˣ

For a, b in a comm_monoid such that a * b = 1, makes a unit out of a.

Equations
@[simp]
theorem units.coe_mk_of_mul_eq_one {α : Type u} [comm_monoid α] {a b : α} (h : a * b = 1) :
@[simp]
theorem add_units.coe_mk_of_add_eq_zero {α : Type u} [add_comm_monoid α] {a b : α} (h : a + b = 0) :
def divp {α : Type u} [monoid α] (a : α) (u : αˣ) :
α

Partial division. It is defined when the second argument is invertible, and unlike the division operator in division_ring it is not totalized at zero.

Equations
@[simp]
theorem divp_self {α : Type u} [monoid α] (u : αˣ) :
u /ₚ u = 1
@[simp]
theorem divp_one {α : Type u} [monoid α] (a : α) :
a /ₚ 1 = a
theorem divp_assoc {α : Type u} [monoid α] (a b : α) (u : αˣ) :
a * b /ₚ u = a * (b /ₚ u)
@[simp]
theorem divp_inv {α : Type u} [monoid α] {a : α} (u : αˣ) :
a /ₚ u⁻¹ = a * u
@[simp]
theorem divp_mul_cancel {α : Type u} [monoid α] (a : α) (u : αˣ) :
a /ₚ u * u = a
@[simp]
theorem mul_divp_cancel {α : Type u} [monoid α] (a : α) (u : αˣ) :
a * u /ₚ u = a
@[simp]
theorem divp_left_inj {α : Type u} [monoid α] (u : αˣ) {a b : α} :
a /ₚ u = b /ₚ u a = b
theorem divp_divp_eq_divp_mul {α : Type u} [monoid α] (x : α) (u₁ u₂ : αˣ) :
x /ₚ u₁ /ₚ u₂ = x /ₚ (u₂ * u₁)
theorem divp_eq_iff_mul_eq {α : Type u} [monoid α] {x : α} {u : αˣ} {y : α} :
x /ₚ u = y y * u = x
theorem divp_eq_one_iff_eq {α : Type u} [monoid α] {a : α} {u : αˣ} :
a /ₚ u = 1 a = u
@[simp]
theorem one_divp {α : Type u} [monoid α] (u : αˣ) :
theorem divp_eq_divp_iff {α : Type u} [comm_monoid α] {x y : α} {ux uy : αˣ} :
x /ₚ ux = y /ₚ uy x * uy = y * ux
theorem divp_mul_divp {α : Type u} [comm_monoid α] (x y : α) (ux uy : αˣ) :
x /ₚ ux * (y /ₚ uy) = x * y /ₚ (ux * uy)

is_unit predicate #

In this file we define the is_unit predicate on a monoid, and prove a few basic properties. For the bundled version see units. See also prime, associated, and irreducible in algebra/associated.

def is_unit {M : Type u_1} [monoid M] (a : M) :
Prop

An element a : M of a monoid is a unit if it has a two-sided inverse. The actual definition says that a is equal to some u : Mˣ, where is a bundled version of is_unit.

Equations
Instances for is_unit
def is_add_unit {M : Type u_1} [add_monoid M] (a : M) :
Prop

An element a : M of an add_monoid is an add_unit if it has a two-sided additive inverse. The actual definition says that a is equal to some u : add_units M, where add_units M is a bundled version of is_add_unit.

Equations
theorem is_unit_of_subsingleton {M : Type u_1} [monoid M] [subsingleton M] (a : M) :
theorem is_add_unit_of_subsingleton {M : Type u_1} [add_monoid M] [subsingleton M] (a : M) :
@[protected, instance]
def units.can_lift {M : Type u_1} [monoid M] :
Equations
@[protected, instance]
def add_units.can_lift {M : Type u_1} [add_monoid M] :
Equations
@[protected, instance]
def units.unique {M : Type u_1} [monoid M] [subsingleton M] :
Equations
@[protected, instance]
def add_units.unique {M : Type u_1} [add_monoid M] [subsingleton M] :
Equations
@[protected, simp]
theorem units.is_unit {M : Type u_1} [monoid M] (u : Mˣ) :
@[protected, simp]
theorem add_units.is_add_unit_add_unit {M : Type u_1} [add_monoid M] (u : add_units M) :
@[simp]
theorem is_unit_one {M : Type u_1} [monoid M] :
@[simp]
theorem is_add_unit_zero {M : Type u_1} [add_monoid M] :
theorem is_unit_of_mul_eq_one {M : Type u_1} [comm_monoid M] (a b : M) (h : a * b = 1) :
theorem is_add_unit_of_add_eq_zero {M : Type u_1} [add_comm_monoid M] (a b : M) (h : a + b = 0) :
theorem is_unit.exists_right_inv {M : Type u_1} [monoid M] {a : M} (h : is_unit a) :
∃ (b : M), a * b = 1
theorem is_add_unit.exists_neg {M : Type u_1} [add_monoid M] {a : M} (h : is_add_unit a) :
∃ (b : M), a + b = 0
theorem is_unit.exists_left_inv {M : Type u_1} [monoid M] {a : M} (h : is_unit a) :
∃ (b : M), b * a = 1
theorem is_add_unit.exists_neg' {M : Type u_1} [add_monoid M] {a : M} (h : is_add_unit a) :
∃ (b : M), b + a = 0
theorem is_unit_iff_exists_inv {M : Type u_1} [comm_monoid M] {a : M} :
is_unit a ∃ (b : M), a * b = 1
theorem is_add_unit_iff_exists_neg {M : Type u_1} [add_comm_monoid M] {a : M} :
is_add_unit a ∃ (b : M), a + b = 0
theorem is_add_unit_iff_exists_neg' {M : Type u_1} [add_comm_monoid M] {a : M} :
is_add_unit a ∃ (b : M), b + a = 0
theorem is_unit_iff_exists_inv' {M : Type u_1} [comm_monoid M] {a : M} :
is_unit a ∃ (b : M), b * a = 1
theorem is_add_unit.add {M : Type u_1} [add_monoid M] {x y : M} :
theorem is_unit.mul {M : Type u_1} [monoid M] {x y : M} :
is_unit xis_unit yis_unit (x * y)
@[simp]
theorem add_units.is_add_unit_add_add_units {M : Type u_1} [add_monoid M] (a : M) (u : add_units M) :

Addition of a u : add_units M on the right doesn't affect is_add_unit.

@[simp]
theorem units.is_unit_mul_units {M : Type u_1} [monoid M] (a : M) (u : Mˣ) :

Multiplication by a u : Mˣ on the right doesn't affect is_unit.

@[simp]
theorem add_units.is_add_unit_add_units_add {M : Type u_1} [add_monoid M] (u : add_units M) (a : M) :

Addition of a u : add_units M on the left doesn't affect is_add_unit.

@[simp]
theorem units.is_unit_units_mul {M : Type u_1} [monoid M] (u : Mˣ) (a : M) :

Multiplication by a u : Mˣ on the left doesn't affect is_unit.

theorem is_unit_of_mul_is_unit_left {M : Type u_1} [comm_monoid M] {x y : M} (hu : is_unit (x * y)) :
theorem is_add_unit_of_add_is_add_unit_left {M : Type u_1} [add_comm_monoid M] {x y : M} (hu : is_add_unit (x + y)) :
theorem is_add_unit_of_add_is_add_unit_right {M : Type u_1} [add_comm_monoid M] {x y : M} (hu : is_add_unit (x + y)) :
theorem is_unit_of_mul_is_unit_right {M : Type u_1} [comm_monoid M] {x y : M} (hu : is_unit (x * y)) :
@[simp]
theorem is_unit.mul_iff {M : Type u_1} [comm_monoid M] {x y : M} :
@[simp]
theorem is_add_unit.add_iff {M : Type u_1} [add_comm_monoid M] {x y : M} :
noncomputable def is_add_unit.add_unit {M : Type u_1} [add_monoid M] {a : M} (h : is_add_unit a) :

The element of the additive group of additive units, corresponding to an element of an additive monoid which is an additive unit. When α is a subtraction_monoid, use is_add_unit.add_unit' instead.

Equations
noncomputable def is_unit.unit {M : Type u_1} [monoid M] {a : M} (h : is_unit a) :

The element of the group of units, corresponding to an element of a monoid which is a unit. When α is a division_monoid, use is_unit.unit' instead.

Equations
@[simp]
theorem is_unit.unit_of_coe_units {M : Type u_1} [monoid M] {a : Mˣ} (h : is_unit a) :
h.unit = a
@[simp]
theorem is_add_unit.add_unit_of_coe_add_units {M : Type u_1} [add_monoid M] {a : add_units M} (h : is_add_unit a) :
theorem is_add_unit.add_unit_spec {M : Type u_1} [add_monoid M] {a : M} (h : is_add_unit a) :
theorem is_unit.unit_spec {M : Type u_1} [monoid M] {a : M} (h : is_unit a) :
(h.unit) = a
theorem is_add_unit.coe_neg_add {M : Type u_1} [add_monoid M] {a : M} (h : is_add_unit a) :
theorem is_unit.coe_inv_mul {M : Type u_1} [monoid M] {a : M} (h : is_unit a) :
(h.unit)⁻¹ * a = 1
theorem is_add_unit.add_coe_neg {M : Type u_1} [add_monoid M] {a : M} (h : is_add_unit a) :
theorem is_unit.mul_coe_inv {M : Type u_1} [monoid M] {a : M} (h : is_unit a) :
a * (h.unit)⁻¹ = 1
@[protected, instance]
def is_unit.decidable {M : Type u_1} [monoid M] (x : M) [h : decidable (∃ (u : Mˣ), u = x)] :

is_unit x is decidable if we can decide if x comes from .

Equations
theorem is_unit.mul_left_inj {M : Type u_1} [monoid M] {a b c : M} (h : is_unit a) :
b * a = c * a b = c
theorem is_add_unit.add_left_inj {M : Type u_1} [add_monoid M] {a b c : M} (h : is_add_unit a) :
b + a = c + a b = c
theorem is_add_unit.add_right_inj {M : Type u_1} [add_monoid M] {a b c : M} (h : is_add_unit a) :
a + b = a + c b = c
theorem is_unit.mul_right_inj {M : Type u_1} [monoid M] {a b c : M} (h : is_unit a) :
a * b = a * c b = c
@[protected]
theorem is_unit.mul_left_cancel {M : Type u_1} [monoid M] {a b c : M} (h : is_unit a) :
a * b = a * cb = c
@[protected]
theorem is_add_unit.add_left_cancel {M : Type u_1} [add_monoid M] {a b c : M} (h : is_add_unit a) :
a + b = a + cb = c
@[protected]
theorem is_add_unit.add_right_cancel {M : Type u_1} [add_monoid M] {a b c : M} (h : is_add_unit b) :
a + b = c + ba = c
@[protected]
theorem is_unit.mul_right_cancel {M : Type u_1} [monoid M] {a b c : M} (h : is_unit b) :
a * b = c * ba = c
@[protected]
theorem is_add_unit.add_right_injective {M : Type u_1} [add_monoid M] {a : M} (h : is_add_unit a) :
@[protected]
theorem is_unit.mul_right_injective {M : Type u_1} [monoid M] {a : M} (h : is_unit a) :
@[protected]
theorem is_add_unit.add_left_injective {M : Type u_1} [add_monoid M] {b : M} (h : is_add_unit b) :
function.injective (λ (_x : M), _x + b)
@[protected]
theorem is_unit.mul_left_injective {M : Type u_1} [monoid M] {b : M} (h : is_unit b) :
function.injective (λ (_x : M), _x * b)
noncomputable def group_of_is_unit {M : Type u_1} [hM : monoid M] (h : ∀ (a : M), is_unit a) :

Constructs a group structure on a monoid consisting only of units.

Equations