Skip to content

Commit

Permalink
add comment
Browse files Browse the repository at this point in the history
  • Loading branch information
dupuisf committed Nov 8, 2023
1 parent 2a02f7b commit 5512d2d
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions Mathlib/Tactic/Positivity/Basic.lean
Original file line number Diff line number Diff line change
Expand Up @@ -383,6 +383,7 @@ def evalZpow : PositivityExt where eval {u α} zα pα e := do
let .true := b.isAppOfArity ``OfNat.ofNat 3 | throwError "not a ^ n where n is a literal"
let some n := (b.getRevArg! 1).natLit? | throwError "not a ^ n where n is a literal"
guard (n % 2 = 0)
-- The next line is flagged by the unusedHavesSuffices linter even though it is clearly needed
have b_mod_two : ($b % 2) =Q 0 := ⟨⟩
have b_even : Q(Even $b) := q(Int.even_iff.mpr $b_mod_two)
let _a ← synthInstanceQ q(LinearOrderedField $α)
Expand Down

0 comments on commit 5512d2d

Please sign in to comment.