diff --git a/Cslib/Languages/LambdaCalculus/LocallyNameless/Untyped/FullEta.lean b/Cslib/Languages/LambdaCalculus/LocallyNameless/Untyped/FullEta.lean index a830d898f..1fb91ecae 100644 --- a/Cslib/Languages/LambdaCalculus/LocallyNameless/Untyped/FullEta.lean +++ b/Cslib/Languages/LambdaCalculus/LocallyNameless/Untyped/FullEta.lean @@ -40,9 +40,7 @@ variable {M M' N N' : Term Var} /-- The right side of an η-reduction is locally closed. -/ @[scoped grind →] -lemma step_lc_r (step : M ⭢ηᶠ M') : LC M' := by - refine Xi.step_lc_r ?_ step - grind +lemma step_lc_r (step : M ⭢ηᶠ M') : LC M' := Xi.step_lc_r (by grind) step /-- The left side of an η-reduction is locally closed. -/ @[scoped grind →]