Skip to content

Commit

Permalink
fix lint problems
Browse files Browse the repository at this point in the history
  • Loading branch information
abentkamp committed Sep 4, 2020
1 parent af0b3fa commit 7f2c78f
Showing 1 changed file with 4 additions and 5 deletions.
9 changes: 4 additions & 5 deletions src/linear_algebra/finite_dimensional.lean
Original file line number Diff line number Diff line change
Expand Up @@ -791,6 +791,7 @@ begin
exact nat.not_lt_zero _ lt }
end

@[nolint unused_arguments]
lemma findim_lt_findim_of_lt [finite_dimensional K V] {s t : submodule K V} (hst: s < t) :
findim K s < findim K t :=
begin
Expand Down Expand Up @@ -957,9 +958,7 @@ end is_basis
namespace module
namespace End

variables [finite_dimensional K V]

lemma exists_ker_pow_eq_ker_pow_succ (f : End K V) :
lemma exists_ker_pow_eq_ker_pow_succ [finite_dimensional K V] (f : End K V) :
∃ (k : ℕ), k ≤ findim K V ∧ (f ^ k).ker = (f ^ k.succ).ker :=
begin
classical,
Expand Down Expand Up @@ -1002,7 +1001,7 @@ lemma ker_pow_constant {f : End K V} {k : ℕ} (h : (f ^ k).ker = (f ^ k.succ).k
exact le_refl _, }
end

lemma ker_pow_findim_add {f : End K V} {m : ℕ} :
lemma ker_pow_findim_add [finite_dimensional K V] {f : End K V} {m : ℕ} :
(f ^ (findim K V + m)).ker = (f ^ findim K V).ker :=
begin
obtain ⟨k, h_k_le, hk⟩ :
Expand All @@ -1015,7 +1014,7 @@ begin
... = (f ^ findim K V).ker : by rw nat.add_sub_of_le h_k_le
end

lemma ker_pow_le_ker_pow_findim (f : End K V) (m : ℕ) :
lemma ker_pow_le_ker_pow_findim [finite_dimensional K V] (f : End K V) (m : ℕ) :
(f ^ m).ker ≤ (f ^ findim K V).ker :=
begin
by_cases h_cases: m < findim K V,
Expand Down

0 comments on commit 7f2c78f

Please sign in to comment.