refactor: replace some simp with exact
This commit is contained in:
parent
167145acef
commit
81f3566be8
13 changed files with 82 additions and 102 deletions
|
@ -106,7 +106,7 @@ lemma quadSolToSolInv_1 (S : (PlusU1 n).Sols) :
|
|||
lemma quadSolToSolInv_α₁_α₂_zero (S : (PlusU1 n).Sols) (h : α₁ S.1 = 0) :
|
||||
α₁ (quadSolToSolInv S).1 = 0 ∧ α₂ (quadSolToSolInv S).1 = 0 := by
|
||||
rw [quadSolToSolInv_1, α₂_AF S, h]
|
||||
simp
|
||||
exact Prod.mk_eq_zero.mp rfl
|
||||
|
||||
lemma quadSolToSolInv_α₁_α₂_neq_zero (S : (PlusU1 n).Sols) (h : α₁ S.1 ≠ 0) :
|
||||
¬ (α₁ (quadSolToSolInv S).1 = 0 ∧ α₂ (quadSolToSolInv S).1 = 0) := by
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue