Skip to content

Commit 5f939f8

Browse files
committed
chore: round 37 - remove unused simp args
1 parent ac59f87 commit 5f939f8

2 files changed

Lines changed: 4 additions & 6 deletions

File tree

Mathlib/CategoryTheory/Limits/Shapes/Biproducts.lean

Lines changed: 1 addition & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -616,9 +616,7 @@ instance biproduct.map_epi {f g : J → C} [HasBiproduct f] [HasBiproduct g] (p
616616
have : biproduct.map p =
617617
(biproduct.isoCoproduct _).hom ≫ Sigma.map p ≫ (biproduct.isoCoproduct _).inv := by
618618
ext
619-
simp only [map_π, isoCoproduct_hom, isoCoproduct_inv, Category.assoc, ι_desc_assoc,
620-
ι_colimMap_assoc, Discrete.functor_obj_eq_as, Discrete.natTrans_app, colimit.ι_desc_assoc,
621-
Cofan.mk_ι_app, ι_π, ι_π_assoc]
619+
simp only [map_π, isoCoproduct_hom, isoCoproduct_inv, Category.assoc, ι_desc_assoc, ι_π_assoc]
622620
split
623621
· subst_vars
624622
simp

Mathlib/CategoryTheory/Limits/Shapes/SequentialProduct.lean

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -86,7 +86,7 @@ lemma functorMap_commSq_aux {n m k : ℕ} (h : n ≤ m) (hh : ¬(k < m)) :
8686
rw [this, op_comp, Functor.map_comp]
8787
slice_lhs 2 4 => rw [ih]
8888
simp only [ homOfLE_leOfHom, Functor.ofOpSequence_map_homOfLE_succ,
89-
functorMap, dite_eq_ite, limMap_π_assoc, Discrete.functor_obj_eq_as, Discrete.natTrans_app]
89+
functorMap, dite_eq_ite]
9090
split_ifs
9191
· omega
9292
simp [dif_neg (by lia : ¬(k < m)), dif_neg hh]
@@ -149,14 +149,14 @@ set_option backward.isDefEq.respectTransparency false in
149149
lemma cone_π_app_comp_Pi_π_pos (m n : ℕ) (h : n < m) : (cone f).π.app ⟨m⟩ ≫
150150
Pi.π (fun i ↦ if _ : i < m then M i else N i) n =
151151
Pi.π _ n ≫ eqToHom (functorObj_eq_pos h).symm := by
152-
simp [cone_π_app, limMap_π, Discrete.functor_obj_eq_as, Discrete.natTrans_app, dif_pos h]
152+
simp [cone_π_app, dif_pos h]
153153

154154
set_option backward.defeqAttrib.useBackward true in
155155
set_option backward.isDefEq.respectTransparency false in
156156
@[reassoc]
157157
lemma cone_π_app_comp_Pi_π_neg (m n : ℕ) (h : ¬(n < m)) : (cone f).π.app ⟨m⟩ ≫ Pi.π _ n =
158158
Pi.π _ n ≫ f n ≫ eqToHom (functorObj_eq_neg h).symm := by
159-
simp [cone_π_app, limMap_π, Discrete.functor_obj_eq_as, Discrete.natTrans_app, dif_neg h]
159+
simp [cone_π_app, dif_neg h]
160160

161161
set_option backward.isDefEq.respectTransparency false in
162162
/--

0 commit comments

Comments
 (0)