Squarefree elements of monoids

An element of a monoid is squarefree when it is not divisible by any squares except the squares of units.

Results about squarefree natural numbers are proved in Data.Nat.Squarefree.

Main Definitions

• Squarefree r indicates that r is only divisible by x * x if x is a unit.

Main Results

• multiplicity.squarefree_iff_multiplicity_le_one: x is Squarefree iff for every y, either multiplicity y x ≤ 1 or IsUnit y.
• UniqueFactorizationMonoid.squarefree_iff_nodup_factors: A nonzero element x of a unique factorization monoid is squarefree iff factors x has no duplicate factors.

Tags

squarefree, multiplicity

def Squarefree {R : Type u_1} [Monoid R] (r : R) : Prop

An element of a monoid is squarefree if the only squares that divide it are the squares of units.

Equations

• Squarefree r = ∀ (x : R), x * x ∣ r → IsUnit x

@[simp]

theorem IsUnit.squarefree {R : Type u_1} [CommMonoid R] {x : R} (h : IsUnit x) : Squarefree x

theorem squarefree_one {R : Type u_1} [CommMonoid R] : Squarefree 1

@[simp]

theorem not_squarefree_zero {R : Type u_1} [MonoidWithZero R] [Nontrivial R] : ¬Squarefree 0

theorem Squarefree.ne_zero {R : Type u_1} [MonoidWithZero R] [Nontrivial R] {m : R} (hm : Squarefree m) : m ≠ 0

@[simp]

theorem Irreducible.squarefree {R : Type u_1} [CommMonoid R] {x : R} (h : Irreducible x) : Squarefree x

@[simp]

theorem Prime.squarefree {R : Type u_1} [CancelCommMonoidWithZero R] {x : R} (h : Prime x) : Squarefree x

theorem Squarefree.of_mul_left {R : Type u_1} [CommMonoid R] {m : R} {n : R} (hmn : Squarefree (m * n)) : Squarefree m

theorem Squarefree.of_mul_right {R : Type u_1} [CommMonoid R] {m : R} {n : R} (hmn : Squarefree (m * n)) : Squarefree n

theorem Squarefree.squarefree_of_dvd {R : Type u_1} [CommMonoid R] {x : R} {y : R} (hdvd : x ∣ y) (hsq : Squarefree y) : Squarefree x

theorem Squarefree.eq_zero_or_one_of_pow_of_not_isUnit {R : Type u_1} [CommMonoid R] {x : R} {n : ℕ} (h : Squarefree (x ^ n)) (h' : ¬IsUnit x) : n = 0 ∨ n = 1

theorem Squarefree.gcd_right {α : Type u_2} [CancelCommMonoidWithZero α] [GCDMonoid α] (a : α) {b : α} (hb : Squarefree b) : Squarefree (gcd a b)

theorem Squarefree.gcd_left {α : Type u_2} [CancelCommMonoidWithZero α] [GCDMonoid α] {a : α} (b : α) (ha : Squarefree a) : Squarefree (gcd a b)

theorem multiplicity.squarefree_iff_multiplicity_le_one {R : Type u_1} [CommMonoid R] [DecidableRel Dvd.dvd] (r : R) : Squarefree r ↔ ∀ (x : R), multiplicity x r ≤ 1 ∨ IsUnit x

theorem multiplicity.finite_prime_left {R : Type u_1} [CancelCommMonoidWithZero R] [WfDvdMonoid R] {a : R} {b : R} (ha : Prime a) (hb : b ≠ 0) : multiplicity.Finite a b

theorem irreducible_sq_not_dvd_iff_eq_zero_and_no_irreducibles_or_squarefree {R : Type u_1} [CommMonoidWithZero R] [WfDvdMonoid R] (r : R) : (∀ (x : R), Irreducible x → ¬x * x ∣ r) ↔ (r = 0 ∧ ∀ (x : R), ¬Irreducible x) ∨ Squarefree r

theorem squarefree_iff_irreducible_sq_not_dvd_of_ne_zero {R : Type u_1} [CommMonoidWithZero R] [WfDvdMonoid R] {r : R} (hr : r ≠ 0) : Squarefree r ↔ ∀ (x : R), Irreducible x → ¬x * x ∣ r

theorem squarefree_iff_irreducible_sq_not_dvd_of_exists_irreducible {R : Type u_1} [CommMonoidWithZero R] [WfDvdMonoid R] {r : R} (hr : ∃ (x : R), Irreducible x) : Squarefree r ↔ ∀ (x : R), Irreducible x → ¬x * x ∣ r

theorem IsRadical.squarefree {R : Type u_1} [CancelCommMonoidWithZero R] {x : R} (h0 : x ≠ 0) (h : IsRadical x) : Squarefree x

theorem Squarefree.isRadical {R : Type u_1} [CancelCommMonoidWithZero R] [GCDMonoid R] {x : R} (hx : Squarefree x) : IsRadical x

theorem isRadical_iff_squarefree_or_zero {R : Type u_1} [CancelCommMonoidWithZero R] [GCDMonoid R] {x : R} : IsRadical x ↔ Squarefree x ∨ x = 0

theorem isRadical_iff_squarefree_of_ne_zero {R : Type u_1} [CancelCommMonoidWithZero R] [GCDMonoid R] {x : R} (h : x ≠ 0) : IsRadical x ↔ Squarefree x

theorem UniqueFactorizationMonoid.squarefree_iff_nodup_normalizedFactors {R : Type u_1} [CancelCommMonoidWithZero R] [UniqueFactorizationMonoid R] [NormalizationMonoid R] [DecidableEq R] {x : R} (x0 : x ≠ 0) : Squarefree x ↔ Multiset.Nodup (UniqueFactorizationMonoid.normalizedFactors x)

theorem UniqueFactorizationMonoid.dvd_pow_iff_dvd_of_squarefree {R : Type u_1} [CancelCommMonoidWithZero R] [UniqueFactorizationMonoid R] {x : R} {y : R} {n : ℕ} (hsq : Squarefree x) (h0 : n ≠ 0) : x ∣ y ^ n ↔ x ∣ y

@[simp]

theorem Int.squarefree_natAbs {n : ℤ} : Squarefree (Int.natAbs n) ↔ Squarefree n

@[simp]

theorem Int.squarefree_coe_nat {n : ℕ} : Squarefree ↑n ↔ Squarefree n