diff options
author | Son Ho | 2023-08-04 22:59:21 +0200 |
---|---|---|
committer | Son Ho | 2023-08-04 22:59:21 +0200 |
commit | a106d3170eb784d23cd3614a21ef8f1bbb3be2f4 (patch) | |
tree | 8f87659d99bfc687e2cb86c18e049b79051fbfd6 /tests/lean | |
parent | cb603d47be46a6957ec16b9bc68176694542e99a (diff) |
Fix a heart beat issue in a Lean proof
Diffstat (limited to 'tests/lean')
-rw-r--r-- | tests/lean/Hashmap/Properties.lean | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/lean/Hashmap/Properties.lean b/tests/lean/Hashmap/Properties.lean index 3652f608..ab95b854 100644 --- a/tests/lean/Hashmap/Properties.lean +++ b/tests/lean/Hashmap/Properties.lean @@ -284,6 +284,10 @@ def mk_opaque {α : Sort u} (x : α) : { y : α // y = x} := attribute [pp_dot] List.length -- use the dot notation when printing set_option pp.coercions false -- do not print coercions with ↑ (this doesn't parse) +-- The proof below is a bit expensive, so we need to increase the maximum number +-- of heart beats +set_option maxHeartbeats 400000 + theorem insert_no_resize_spec {α : Type} (hm : HashMap α) (key : Usize) (value : α) (hinv : hm.inv) (hnsat : hm.lookup key = none → hm.len_s < Usize.max) : ∃ nhm, hm.insert_no_resize α key value = ret nhm ∧ |