diff options
author | Son Ho | 2023-01-06 16:51:27 +0100 |
---|---|---|
committer | Son HO | 2023-02-03 11:21:46 +0100 |
commit | 46381652adbece2d7ccfd57fae8b5ee2365fb374 (patch) | |
tree | 80e1d1e2cf5728c76736e213c9bedab5191b8376 /tests/fstar/misc/Loops.Clauses.fst | |
parent | 2935706e2670a6aad0a01f4ffa29803574a687ed (diff) |
Fix some issues with the values given back by loop backward translations
Diffstat (limited to '')
-rw-r--r-- | tests/fstar/misc/Loops.Clauses.fst | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/fstar/misc/Loops.Clauses.fst b/tests/fstar/misc/Loops.Clauses.fst index e673d4ff..57849896 100644 --- a/tests/fstar/misc/Loops.Clauses.fst +++ b/tests/fstar/misc/Loops.Clauses.fst @@ -37,6 +37,16 @@ unfold let list_nth_shared_loop_decreases (t : Type0) (ls : list_t t) (i : u32) : list_t t = ls +(** [loops::get_elem_mut]: decreases clause *) +unfold +let get_elem_mut_decreases (x : usize) (ls : list_t usize) : list_t usize = ls + +(** [loops::get_elem_shared]: decreases clause *) +unfold +let get_elem_shared_decreases (x : usize) (v : vec (list_t usize)) + (l : list_t usize) (ls : list_t usize) : list_t usize = + ls + (** [loops::list_nth_mut_loop_with_id]: decreases clause *) unfold let list_nth_mut_loop_with_id_decreases (t : Type0) (i : u32) (ls : list_t t) : |