diff options
author | Son Ho | 2023-01-08 09:42:33 +0100 |
---|---|---|
committer | Son HO | 2023-02-03 11:21:46 +0100 |
commit | 1302f2830905dc63f294aad00d78d03486e13d73 (patch) | |
tree | 6a541816ba00323a30318f918fc06ce229a3508b /tests/fstar/misc/Loops.Clauses.fst | |
parent | 47c09ce99feb3e84967407d30c21bbcf42ab9736 (diff) |
Implement a pass to filter the unused input arguments in the loop functions
Diffstat (limited to 'tests/fstar/misc/Loops.Clauses.fst')
-rw-r--r-- | tests/fstar/misc/Loops.Clauses.fst | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/tests/fstar/misc/Loops.Clauses.fst b/tests/fstar/misc/Loops.Clauses.fst index c748da71..82f34de1 100644 --- a/tests/fstar/misc/Loops.Clauses.fst +++ b/tests/fstar/misc/Loops.Clauses.fst @@ -43,8 +43,7 @@ let get_elem_mut_loop_decreases (x : usize) (ls : list_t usize) : list_t usize = (** [loops::get_elem_shared]: decreases clause *) unfold -let get_elem_shared_loop_decreases (slots : vec (list_t usize)) (x : usize) - (ls : list_t usize) (ls0 : list_t usize) : list_t usize = +let get_elem_shared_loop_decreases (x : usize) (ls : list_t usize) : list_t usize = ls (** [loops::list_nth_mut_loop_with_id]: decreases clause *) @@ -55,8 +54,8 @@ let list_nth_mut_loop_with_id_loop_decreases (t : Type0) (i : u32) (ls : list_t (** [loops::list_nth_shared_loop_with_id]: decreases clause *) unfold -let list_nth_shared_loop_with_id_loop_decreases (t : Type0) (l : list_t t) - (i : u32) (ls : list_t t) : list_t t = +let list_nth_shared_loop_with_id_loop_decreases (t : Type0) (i : u32) + (ls : list_t t) : list_t t = ls (** [loops::list_nth_mut_loop_pair]: decreases clause *) |