chore: remove set_option grind.warning false (#8714)
This PR removes the now unnecessary `set_option grind.warning false` statements, now that the warning is disabled by default.
This commit is contained in:
parent
d8c54fb93d
commit
eccc472e8d
110 changed files with 0 additions and 188 deletions
|
|
@ -9,8 +9,6 @@ import Std.Tactic.BVDecide.LRAT.Internal.Entails
|
|||
import Std.Tactic.BVDecide.LRAT.Internal.PosFin
|
||||
import Init.Grind
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
namespace Std.Tactic.BVDecide
|
||||
namespace LRAT
|
||||
namespace Internal
|
||||
|
|
|
|||
|
|
@ -6,8 +6,6 @@ Authors: Josh Clune
|
|||
prelude
|
||||
import Std.Tactic.BVDecide.LRAT.Internal.Formula.Class
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
namespace Std.Tactic.BVDecide
|
||||
namespace LRAT
|
||||
namespace Internal
|
||||
|
|
|
|||
|
|
@ -12,8 +12,6 @@ import Std.Tactic.BVDecide.LRAT.Internal.PosFin
|
|||
import Std.Tactic.BVDecide.LRAT.Internal.Assignment
|
||||
import Init.Grind
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
namespace Std.Tactic.BVDecide
|
||||
namespace LRAT
|
||||
namespace Internal
|
||||
|
|
|
|||
|
|
@ -7,8 +7,6 @@ prelude
|
|||
import Std.Tactic.BVDecide.LRAT.Internal.Formula.Implementation
|
||||
import Std.Tactic.BVDecide.LRAT.Internal.CNF
|
||||
|
||||
set_option grind.warning false -- I've only made a partial effort to use grind here so far.
|
||||
|
||||
/-!
|
||||
This module contains basic statements about the invariants that are satisfied by the LRAT checker
|
||||
implementation in `Implementation`.
|
||||
|
|
|
|||
|
|
@ -11,8 +11,6 @@ This module contains the implementation of RAT-based clause adding for the defau
|
|||
implementation.
|
||||
-/
|
||||
|
||||
set_option grind.warning false -- I've only made a partial effort to use grind here so far.
|
||||
|
||||
namespace Std.Tactic.BVDecide
|
||||
namespace LRAT
|
||||
namespace Internal
|
||||
|
|
|
|||
|
|
@ -11,8 +11,6 @@ This module contains the verification of RAT-based clause adding for the default
|
|||
implementation.
|
||||
-/
|
||||
|
||||
set_option grind.warning false -- I've only made a partial effort to use grind here so far.
|
||||
|
||||
namespace Std.Tactic.BVDecide
|
||||
namespace LRAT
|
||||
namespace Internal
|
||||
|
|
|
|||
|
|
@ -11,8 +11,6 @@ This module contains the implementation of RUP-based clause adding for the defau
|
|||
implementation.
|
||||
-/
|
||||
|
||||
set_option grind.warning false -- I've only made a partial effort to use grind here so far.
|
||||
|
||||
namespace Std.Tactic.BVDecide
|
||||
namespace LRAT
|
||||
namespace Internal
|
||||
|
|
|
|||
|
|
@ -11,7 +11,6 @@ This module contains the verification of RUP-based clause adding for the default
|
|||
implementation.
|
||||
-/
|
||||
|
||||
set_option grind.warning false -- I've only made a partial effort to use grind here so far.
|
||||
namespace Std.Tactic.BVDecide
|
||||
namespace LRAT
|
||||
namespace Internal
|
||||
|
|
|
|||
|
|
@ -8,8 +8,6 @@ import Std.Tactic.BVDecide.LRAT.Internal.LRATChecker
|
|||
import Std.Tactic.BVDecide.LRAT.Internal.CNF
|
||||
import Std.Tactic.BVDecide.LRAT.Internal.Actions
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
namespace Std.Tactic.BVDecide
|
||||
namespace LRAT
|
||||
namespace Internal
|
||||
|
|
|
|||
|
|
@ -6,8 +6,6 @@ It may still be a good source of ideas for `grind` attributes, or `grind` bugs!
|
|||
But it's also fine to just delete it at some point.
|
||||
-/
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
-- Rejected `grind` attributes:
|
||||
-- attribute [grind] List.getElem?_eq_getElem -- This is way too slow, it adds about 30% time to this file.
|
||||
-- attribute [grind] List.not_mem_nil -- unnecessary
|
||||
|
|
|
|||
|
|
@ -1,8 +1,6 @@
|
|||
import Std.Data.HashMap
|
||||
import Std.Data.DHashMap
|
||||
import Std.Data.ExtHashMap
|
||||
set_option grind.warning false
|
||||
|
||||
open Std
|
||||
|
||||
-- Do we want this?
|
||||
|
|
|
|||
|
|
@ -1,7 +1,5 @@
|
|||
open Option
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
-- TODO: the following lemmas currently fail, but could be solved with some subset of the following attributes:
|
||||
-- I haven't added them yet, because the nuclear option of `[grind cases]` is tempting, but a bit scary.
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
namespace Std
|
||||
namespace Sat
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
def IsPalindrome (xs : Array Nat) : Prop := xs.reverse = xs
|
||||
|
||||
def checkPalin1 (xs : Array Nat) : Bool :=
|
||||
|
|
|
|||
|
|
@ -1,7 +1,5 @@
|
|||
open Lean.Grind
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
variable (R : Type u) [IntModule R] [NoNatZeroDivisors R] [Preorder R] [IntModule.IsOrdered R]
|
||||
|
||||
example (a b c : R) (h : a < b) : a + c < b + c := by grind
|
||||
|
|
|
|||
|
|
@ -1,7 +1,5 @@
|
|||
open List
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
example (h : zs <+ ys) (w : xs ++ ys <+ zs) (h' : ¬xs = []) : False := by
|
||||
fail_if_success grind
|
||||
-- I'm not sure how to make progress here without manually adding that since `xs ≠ []`, it must be a `cons`.
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (xs : Array Nat)
|
||||
(w : ∀ (j : Nat), 0 ≤ j → ∀ (x : j < xs.size / 2), xs[j] = xs[xs.size - 1 - j])
|
||||
(i : Nat) (hi₁ : i < xs.reverse.size) (hi₂ : i < xs.size) (h : i < xs.size / 2) : xs.reverse[i] = xs[i] := by
|
||||
|
|
|
|||
|
|
@ -1,6 +1,4 @@
|
|||
reset_grind_attrs%
|
||||
set_option grind.warning false
|
||||
|
||||
attribute [grind] List.length_cons List.length_nil List.length_append
|
||||
attribute [grind] List.nil_append List.getElem_cons
|
||||
attribute [grind] List.eq_nil_of_length_eq_zero List.getElem_append_right
|
||||
|
|
|
|||
|
|
@ -1,4 +1,2 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example {l : List α} {i : USize} {a : α} {h : i.toNat < l.toArray.size} :
|
||||
l.toArray.uset i a h = (l.set i.toNat a).toArray := by grind
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
reset_grind_attrs%
|
||||
|
||||
attribute [grind] List.append_assoc List.cons_append List.nil_append
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (f : Bool → Nat) : (x = y ↔ q) → ¬ q → y = false → f x = 0 → f true = 0 := by
|
||||
grind (splits := 0)
|
||||
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
example (f : Bool → Nat) : f (a && b) = 0 → a = false → f false = 0 := by grind (splits := 0)
|
||||
example (f : Bool → Nat) : f (a && b) = 0 → b = false → f false = 0 := by grind (splits := 0)
|
||||
example (f : Bool → Nat) : f (a && b) = 0 → a = true → f b = 0 := by grind (splits := 0)
|
||||
|
|
|
|||
|
|
@ -1,5 +1,4 @@
|
|||
|
||||
set_option grind.warning false
|
||||
@[grind] def codelen (c: List Bool) : Int := c.length
|
||||
|
||||
theorem issue1 : codelen [] = 0 := by grind
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
universe v v₁ v₂ v₃ u u₁ u₂ u₃
|
||||
|
||||
namespace CategoryTheory
|
||||
|
|
|
|||
|
|
@ -1,6 +1,4 @@
|
|||
reset_grind_attrs%
|
||||
set_option grind.warning false
|
||||
|
||||
attribute [grind] List.not_mem_nil
|
||||
|
||||
/--
|
||||
|
|
|
|||
|
|
@ -1,6 +1,4 @@
|
|||
import Lean
|
||||
set_option grind.warning false
|
||||
|
||||
def f (a : Nat) := a + a + a
|
||||
def g (a : Nat) := a + a
|
||||
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
|
||||
opaque f : Nat → Nat
|
||||
|
|
|
|||
|
|
@ -1,7 +1,5 @@
|
|||
reset_grind_attrs%
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
attribute [grind cases] Or
|
||||
attribute [grind =] List.length_nil List.length_cons Option.getD
|
||||
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
reset_grind_attrs%
|
||||
|
||||
attribute [grind] List.map_append
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
variable {α : Type u} {l : List α} {P Q : α → Bool}
|
||||
|
||||
attribute [grind] List.countP_nil List.countP_cons
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example : ∀ x : Int, x > 7 → 2 * x > 14 := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,6 +1,4 @@
|
|||
import Std.Internal.Rat
|
||||
set_option grind.warning false
|
||||
|
||||
example (x y : Int) :
|
||||
27 ≤ 11*x + 13*y →
|
||||
11*x + 13*y ≤ 45 →
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
open Int.Linear
|
||||
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
open Int.Linear
|
||||
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
open Int.Linear
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
theorem ex1 (x : Int) : 10 ≤ x → x ≤ 20 → x ≠ 11 → 11 ∣ x → False := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
set_option pp.structureInstances false
|
||||
open Int.Linear
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (x y : Int) : x / 2 + y = 3 → x = 5 → y = 1 := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
open Int.Linear
|
||||
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
|
||||
/--
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
open Int.Linear
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (a b : Nat) : a = a + b - b := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
theorem ex₁ (a : Nat) (h₁ : 2 ∣ a) (h₂ : 2 ∣ a + 1) : False := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (a b c : Nat) : a = 0 → b = 0 → c ≥ a + b := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
theorem ex1 (x y z : Nat) : x < y + z → y + 1 < z → z + x < 3*z := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (_ : (1 : Int) < (0 : Int)) : False := by grind
|
||||
example (_ : (0 : Int) < (0 : Int)) : False := by grind
|
||||
example (_ : (0 : Int) < (1 : Int)) : True := by grind
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (w x y z : Int) :
|
||||
2*w + 3*x - 4*y + z = 10 →
|
||||
w - x + 2*y - 3*z = 5 →
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
def f (x : Option Nat) (h : x ≠ none) : Nat :=
|
||||
match x with
|
||||
| none => by contradiction
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (a : Nat) : max a a = a := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,6 +1,4 @@
|
|||
reset_grind_attrs%
|
||||
set_option grind.warning false
|
||||
|
||||
attribute [grind] List.length_set
|
||||
attribute [grind →] List.eq_nil_of_length_eq_zero
|
||||
attribute [grind] List.getElem_set
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (xs : Array Nat) (w : xs.reverse = xs) (j : Nat) (hj : 0 ≤ j) (hj' : j < xs.size / 2) :
|
||||
xs[j] = xs[xs.size - 1 - j] := by
|
||||
grind
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
theorem dummy (x : Nat) : x = x :=
|
||||
rfl
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,4 @@
|
|||
reset_grind_attrs%
|
||||
set_option grind.warning false
|
||||
open List
|
||||
|
||||
attribute [grind] List.map_nil
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
/--
|
||||
trace: [grind.eqResolution] ∀ (x : Nat), p x a → ∀ (y : Nat), p y b → ¬x = y, ∀ (y : Nat), p y a → p y b → False
|
||||
[grind.ematch.instance] local_0: p c a → ¬p c b
|
||||
|
|
|
|||
|
|
@ -1,6 +1,4 @@
|
|||
reset_grind_attrs%
|
||||
set_option grind.warning false
|
||||
|
||||
example {l : List α} {f : β → α → β} {b : β} :
|
||||
l.foldl f b = l.reverse.foldr (fun x y => f y x) b := by
|
||||
grind [List.foldr_reverse]
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
opaque f (a : Nat) : Nat × Bool
|
||||
|
||||
example (a b : Nat) : (f a).1 = (f b).1 → (f a).2 = (f b).2 → f a = f b := by
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (x : Nat) (h : x < 0) : Nat → Nat := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -3,8 +3,6 @@ import Std.Data.HashSet
|
|||
|
||||
open Std
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
namespace List
|
||||
|
||||
-- Fast duplicate-removing function, using a hash set to check if an element was seen before
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (f : (Nat → Nat) → Nat → Nat → Nat) : a = b → f (fun x => a + x) 1 b = f (fun x => b + x) 1 a := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
reset_grind_attrs%
|
||||
|
||||
attribute [grind]
|
||||
|
|
|
|||
|
|
@ -1,6 +1,4 @@
|
|||
reset_grind_attrs%
|
||||
set_option grind.warning false
|
||||
|
||||
open List
|
||||
|
||||
theorem length_pos_of_ne_nil {l : List α} (h : l ≠ []) : 0 < l.length := by
|
||||
|
|
|
|||
|
|
@ -11,8 +11,6 @@ we keep all the facts we know about the current goal.
|
|||
Remark: Terms known to be true (false) belong to the equivalence class of the term `True` (`False`).
|
||||
-/
|
||||
|
||||
set_option grind.warning false -- Disables warning messages stating that `grind` is WIP.
|
||||
|
||||
example (a b c : α) (f : α → α) : f a = c → a = b → c = f b := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,4 @@
|
|||
import Std.Data.HashMap
|
||||
set_option grind.warning false
|
||||
reset_grind_attrs%
|
||||
|
||||
open Std
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
def Matrix (m : Type) (n : Type) (α : Type) : Type :=
|
||||
m → n → α
|
||||
|
||||
|
|
|
|||
|
|
@ -1,6 +1,4 @@
|
|||
import Lean
|
||||
set_option grind.warning false
|
||||
|
||||
/-
|
||||
Use `grind` as one of the tactics for array-element access and termination proofs.
|
||||
-/
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
opaque f : Nat → Nat
|
||||
opaque op : Nat → Nat → Nat
|
||||
@[grind] theorem op_comm : op x y = op y x := sorry
|
||||
|
|
|
|||
|
|
@ -4,8 +4,6 @@
|
|||
|
||||
import Std.Data.HashMap
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
macro_rules | `(tactic| get_elem_tactic_extensible) => `(tactic| grind)
|
||||
|
||||
open Std
|
||||
|
|
|
|||
|
|
@ -3,8 +3,6 @@
|
|||
|
||||
import Std.Data.HashMap
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
open Std
|
||||
|
||||
structure IndexMap (α : Type u) (β : Type v) [BEq α] [Hashable α] where
|
||||
|
|
|
|||
|
|
@ -111,8 +111,6 @@ def IfNormalization : Type := { Z : IfExpr → IfExpr // ∀ e, (Z e).normalized
|
|||
-/
|
||||
|
||||
-- `grind` is currently experimental, but for now we can suppress the warnings about this.
|
||||
set_option grind.warning false
|
||||
|
||||
namespace IfExpr
|
||||
|
||||
/--
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example : ((if true then id else id) false) = false := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (a b : Int) : min a b = 10 → a ≥ 10 := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -99,8 +99,6 @@ def IfNormalization : Type := { Z : IfExpr → IfExpr // ∀ e, (Z e).normalized
|
|||
-/
|
||||
|
||||
-- `grind` is currently experimental, but for now we can suppress the warnings about this.
|
||||
set_option grind.warning false
|
||||
|
||||
namespace IfExpr
|
||||
|
||||
attribute [grind] List.mem_cons List.not_mem_nil List.mem_append
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
open Lean.Grind
|
||||
|
||||
example [IntModule α] [Preorder α] [IntModule.IsOrdered α] (a b : α)
|
||||
|
|
|
|||
|
|
@ -1,6 +1,4 @@
|
|||
reset_grind_attrs%
|
||||
set_option grind.warning false
|
||||
|
||||
namespace List
|
||||
|
||||
attribute [local grind =] List.length_cons in
|
||||
|
|
|
|||
|
|
@ -10,7 +10,6 @@
|
|||
-- `tests/lean/grind/experiments/list.lean` contains everything from `Data/List/Lemmas.lean`
|
||||
-- that still resists `grind`!
|
||||
|
||||
set_option grind.warning false
|
||||
open List Nat
|
||||
|
||||
namespace Hidden
|
||||
|
|
|
|||
|
|
@ -1,6 +1,4 @@
|
|||
|
||||
set_option grind.warning false
|
||||
|
||||
open List Nat
|
||||
|
||||
namespace List'
|
||||
|
|
|
|||
|
|
@ -1,5 +1,4 @@
|
|||
reset_grind_attrs%
|
||||
set_option grind.warning false
|
||||
open List Nat
|
||||
|
||||
attribute [grind] List.filter_nil List.filter_cons
|
||||
|
|
|
|||
|
|
@ -1,7 +1,5 @@
|
|||
open List
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
variable {α} {l₁ l₂ l₃ l₄ l₅ : List α}
|
||||
|
||||
example : l₂ ++ l₄ ⊆ l₁ ++ l₂ ++ l₃ ++ l₄ ++ l₅ := by
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
reset_grind_attrs%
|
||||
|
||||
attribute [grind] List.eq_nil_of_length_eq_zero
|
||||
|
|
|
|||
|
|
@ -4,8 +4,6 @@ import Std.Data.ExtHashMap
|
|||
import Std.Data.HashSet
|
||||
import Std.Data.TreeMap
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
open Std
|
||||
|
||||
section
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (as bs cs : Array α) (v : α)
|
||||
(i : Nat)
|
||||
(h₁ : i < as.size)
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
def f (a : Option Nat) (h : a ≠ none) : Nat :=
|
||||
match a with
|
||||
| some a => a
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (f : Int → Int) (x : Int)
|
||||
: 0 ≤ x → x ≠ 0 → x ≤ 1 → f x = 2 → f 1 = 2 := by
|
||||
grind
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (as : Array α) (lo hi i j : Nat) (h₁ : lo ≤ i) (_ : i < j) (_ : j ≤ hi) (_ : j < as.size)
|
||||
(_ : ¬as.size = 0) : min lo (as.size - 1) ≤ i := by
|
||||
grind
|
||||
|
|
|
|||
|
|
@ -1,7 +1,5 @@
|
|||
open List
|
||||
reset_grind_attrs%
|
||||
set_option grind.warning false
|
||||
|
||||
attribute [grind →] Array.eq_empty_of_append_eq_empty eq_nil_of_length_eq_zero
|
||||
attribute [grind] Vector.getElem?_append getElem?_dropLast
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example (x : Nat) : x ≥ (0 : Int) := by grind
|
||||
example (x : Nat) : Int.ofNat x ≥ (0 : Int) := by grind
|
||||
example (x : Nat) : NatCast.natCast x ≥ 0 := by grind
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
-- In the following test, the first 8 case-splits are irrelevant,
|
||||
-- and non-choronological backtracking is used to avoid searching
|
||||
-- (2^8 - 1) irrelevant branches
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
|
||||
/--
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
example {x y : Nat} (_ : x + y > 10) (_ : x < 5) (_ : y < 5) : False := by grind
|
||||
example {x y : Nat} (_ : x + y > 10) (_ : 2 * x < 11) (_ : y < 5) : False := by grind
|
||||
example {x y : Nat} (_ : 2 * x + 4 * y = 5) : False := by grind
|
||||
|
|
|
|||
|
|
@ -2,8 +2,6 @@
|
|||
-- This may prove fragile, so remember it is okay to update the expected output if appropriate!
|
||||
-- Hopefully these will act as regression tests against `grind` activating irrelevant lemmas.
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
section
|
||||
|
||||
variable [BEq α] {o₁ o₂ o₃ o₄ o₅ : Option α}
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
example : (if (!false) = true then id else id) false = false := by
|
||||
grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,5 +1,3 @@
|
|||
set_option grind.warning false
|
||||
|
||||
def IsPalindrome (xs : Array Nat) : Prop := xs.reverse = xs
|
||||
|
||||
def checkPalin1 (xs : Array Nat) : Bool :=
|
||||
|
|
|
|||
|
|
@ -5,8 +5,6 @@
|
|||
| star_step : ∀ x y z, R x y → star R y z → star R x z
|
||||
|
||||
set_option grind.debug true
|
||||
set_option grind.warning false
|
||||
|
||||
inductive com: Type where
|
||||
| SKIP
|
||||
| ASSIGN
|
||||
|
|
|
|||
|
|
@ -1,5 +1,4 @@
|
|||
abbrev f (a : α) := a
|
||||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
set_option grind.debug.proofs true
|
||||
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
|
||||
def α : Type := Unit × Unit
|
||||
|
|
|
|||
|
|
@ -5,8 +5,6 @@ Authors: Kim Morrison
|
|||
-/
|
||||
|
||||
-- TODO: when `grind` is ready for production use, move this file to `src/Init/Data/Array/QSort/Lemmas.lean`.
|
||||
set_option grind.warning false
|
||||
|
||||
/-!
|
||||
# Verification of `Array.qsort`
|
||||
|
||||
|
|
|
|||
|
|
@ -4,7 +4,6 @@ Released under Apache 2.0 license as described in the file LICENSE.
|
|||
Authors: Marcus Rossel, Kim Morrison
|
||||
-/
|
||||
import Lean.Elab.Term
|
||||
set_option grind.warning false
|
||||
/-!
|
||||
These tests are originally from the `lean-egg` repository at
|
||||
https://github.com/marcusrossel/lean-egg and were written by Marcus Rossel.
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
|
||||
open Lean.Grind
|
||||
|
|
|
|||
|
|
@ -1,4 +1,3 @@
|
|||
set_option grind.warning false
|
||||
set_option grind.debug true
|
||||
open Lean.Grind
|
||||
|
||||
|
|
|
|||
|
|
@ -1,7 +1,5 @@
|
|||
open Lean.Grind
|
||||
|
||||
set_option grind.warning false
|
||||
|
||||
example {α} [CommRing α] [IsCharP α 0]
|
||||
(d t : α)
|
||||
(Δ40 : d + t + d * t = 0)
|
||||
|
|
|
|||
Some files were not shown because too many files have changed in this diff Show more
Loading…
Add table
Reference in a new issue