diff options
| author | Hannes Schulze <haschu0103@outlook.de> | 2025-10-24 18:20:43 +0200 |
|---|---|---|
| committer | Hannes Schulze <haschu0103@outlook.de> | 2025-10-24 18:20:43 +0200 |
| commit | 6df3f662f0f23e837b70ef1f4a8b8dde4a7aa521 (patch) | |
| tree | c56ca4d707e88d49c0f52e99d5e1c07edb58e3fe /Nominal/Category.lean | |
| parent | ac2363701c3d2a03116af449ca7bc4f918fbfda7 (diff) | |
use simp only everywhere except for last goal
Diffstat (limited to 'Nominal/Category.lean')
| -rw-r--r-- | Nominal/Category.lean | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/Nominal/Category.lean b/Nominal/Category.lean index 29a0b73..721dfb0 100644 --- a/Nominal/Category.lean +++ b/Nominal/Category.lean @@ -66,6 +66,10 @@ instance : ConcreteCategory (Nom 𝔸) (· →ₑ[𝔸] ·) where instance : HasForget₂ (Nom 𝔸) (Action Type (FPerm 𝔸)) where forget₂ := { obj X := Action.ofMulAction (FPerm 𝔸) X.carrier - map f := ⟨f.toFun, by intro π; ext x; simp; apply f.equivariant⟩ } + map f := ⟨f.toFun, by + intro π + ext x + simp only [EquivariantMap.toFun_eq_coe, types_comp_apply, Action.ofMulAction_apply] + apply f.equivariant⟩ } end Forget |