diff options
author | Son Ho | 2023-03-07 19:24:16 +0100 |
---|---|---|
committer | Son HO | 2023-06-04 21:44:33 +0200 |
commit | a946df8b716695f4d387d852b7e74cf288ddb03e (patch) | |
tree | ba4f91ae1e6e24f342edac9d6db35d52be385b99 /tests/lean | |
parent | 27df0acdce31c3afc6e44a7b3161cb5372cdfc60 (diff) |
Make minor modifications to the Lean files
Diffstat (limited to '')
-rw-r--r-- | tests/lean/hashmap/Hashmap/Clauses/Clauses.lean | 24 | ||||
-rw-r--r-- | tests/lean/hashmap/lake-manifest.json | 2 | ||||
-rw-r--r-- | tests/lean/hashmap_on_disk/HashmapMain/Clauses/Clauses.lean | 3 |
3 files changed, 14 insertions, 15 deletions
diff --git a/tests/lean/hashmap/Hashmap/Clauses/Clauses.lean b/tests/lean/hashmap/Hashmap/Clauses/Clauses.lean index eec8ef96..fad5c11a 100644 --- a/tests/lean/hashmap/Hashmap/Clauses/Clauses.lean +++ b/tests/lean/hashmap/Hashmap/Clauses/Clauses.lean @@ -4,23 +4,23 @@ import Hashmap.Types /- [hashmap::HashMap::{0}::allocate_slots]: termination measure -/ @[simp] -def hash_map_allocate_slots_loop_terminates (T : Type) (slots : vec (list_t T)) +def hash_map_allocate_slots_loop_terminates (T : Type) (slots : Vec (list_t T)) (n : USize) := (slots, n) +/- [hashmap::HashMap::{0}::allocate_slots]: decreases_by tactic -/ syntax "hash_map_allocate_slots_loop_decreases" term+ : tactic - macro_rules | `(tactic| hash_map_allocate_slots_loop_decreases $slots $n) =>`(tactic| sorry) /- [hashmap::HashMap::{0}::clear]: termination measure -/ @[simp] -def hash_map_clear_loop_terminates (T : Type) (slots : vec (list_t T)) +def hash_map_clear_loop_terminates (T : Type) (slots : Vec (list_t T)) (i : USize) := (slots, i) +/- [hashmap::HashMap::{0}::clear]: decreases_by tactic -/ syntax "hash_map_clear_loop_decreases" term+ : tactic - macro_rules | `(tactic| hash_map_clear_loop_decreases $slots $i) =>`(tactic| sorry) @@ -30,8 +30,8 @@ def hash_map_insert_in_list_loop_terminates (T : Type) (key : USize) (value : T) (ls : list_t T) := (key, value, ls) +/- [hashmap::HashMap::{0}::insert_in_list]: decreases_by tactic -/ syntax "hash_map_insert_in_list_loop_decreases" term+ : tactic - macro_rules | `(tactic| hash_map_insert_in_list_loop_decreases $key $value $ls) => `(tactic| sorry) @@ -42,8 +42,8 @@ def hash_map_move_elements_from_list_loop_terminates (T : Type) (ntable : hash_map_t T) (ls : list_t T) := (ntable, ls) +/- [hashmap::HashMap::{0}::move_elements_from_list]: decreases_by tactic -/ syntax "hash_map_move_elements_from_list_loop_decreases" term+ : tactic - macro_rules | `(tactic| hash_map_move_elements_from_list_loop_decreases $ntable $ls) => `(tactic| sorry) @@ -51,11 +51,11 @@ macro_rules /- [hashmap::HashMap::{0}::move_elements]: termination measure -/ @[simp] def hash_map_move_elements_loop_terminates (T : Type) (ntable : hash_map_t T) - (slots : vec (list_t T)) (i : USize) := + (slots : Vec (list_t T)) (i : USize) := (ntable, slots, i) +/- [hashmap::HashMap::{0}::move_elements]: decreases_by tactic -/ syntax "hash_map_move_elements_loop_decreases" term+ : tactic - macro_rules | `(tactic| hash_map_move_elements_loop_decreases $ntable $slots $i) => `(tactic| sorry) @@ -66,8 +66,8 @@ def hash_map_contains_key_in_list_loop_terminates (T : Type) (key : USize) (ls : list_t T) := (key, ls) +/- [hashmap::HashMap::{0}::contains_key_in_list]: decreases_by tactic -/ syntax "hash_map_contains_key_in_list_loop_decreases" term+ : tactic - macro_rules | `(tactic| hash_map_contains_key_in_list_loop_decreases $key $ls) => `(tactic| sorry) @@ -78,8 +78,8 @@ def hash_map_get_in_list_loop_terminates (T : Type) (key : USize) (ls : list_t T) := (key, ls) +/- [hashmap::HashMap::{0}::get_in_list]: decreases_by tactic -/ syntax "hash_map_get_in_list_loop_decreases" term+ : tactic - macro_rules | `(tactic| hash_map_get_in_list_loop_decreases $key $ls) =>`(tactic| sorry) @@ -89,8 +89,8 @@ def hash_map_get_mut_in_list_loop_terminates (T : Type) (ls : list_t T) (key : USize) := (ls, key) +/- [hashmap::HashMap::{0}::get_mut_in_list]: decreases_by tactic -/ syntax "hash_map_get_mut_in_list_loop_decreases" term+ : tactic - macro_rules | `(tactic| hash_map_get_mut_in_list_loop_decreases $ls $key) =>`(tactic| sorry) @@ -100,8 +100,8 @@ def hash_map_remove_from_list_loop_terminates (T : Type) (key : USize) (ls : list_t T) := (key, ls) +/- [hashmap::HashMap::{0}::remove_from_list]: decreases_by tactic -/ syntax "hash_map_remove_from_list_loop_decreases" term+ : tactic - macro_rules | `(tactic| hash_map_remove_from_list_loop_decreases $key $ls) =>`(tactic| sorry) diff --git a/tests/lean/hashmap/lake-manifest.json b/tests/lean/hashmap/lake-manifest.json index 57b071ca..88e446e5 100644 --- a/tests/lean/hashmap/lake-manifest.json +++ b/tests/lean/hashmap/lake-manifest.json @@ -4,7 +4,7 @@ [{"git": {"url": "https://github.com/leanprover-community/mathlib4.git", "subDir?": null, - "rev": "4037792ead804d7bfa8868e2c4684d4223c15ece", + "rev": "1c5ed7840906e29e1f8ca7dbf088cf155e5397e9", "name": "mathlib", "inputRev?": null}}, {"git": diff --git a/tests/lean/hashmap_on_disk/HashmapMain/Clauses/Clauses.lean b/tests/lean/hashmap_on_disk/HashmapMain/Clauses/Clauses.lean index a514c58a..1b69eb2f 100644 --- a/tests/lean/hashmap_on_disk/HashmapMain/Clauses/Clauses.lean +++ b/tests/lean/hashmap_on_disk/HashmapMain/Clauses/Clauses.lean @@ -1,5 +1,4 @@ --- THIS FILE WAS AUTOMATICALLY GENERATED BY AENEAS --- [hashmap_main]: templates for the decreases clauses +-- [hashmap_main]: the decreases clauses import Base.Primitives import HashmapMain.Types |