Skip to content

Commit

Permalink
Merge pull request #880 from GaloisInc/fast-f2
Browse files Browse the repository at this point in the history
submodule updates for the `fast-f2` cryptol branch
  • Loading branch information
robdockins authored Oct 28, 2020
2 parents d12eb10 + 7f57175 commit 9d85f06
Show file tree
Hide file tree
Showing 4 changed files with 16 additions and 2 deletions.
13 changes: 13 additions & 0 deletions intTests/test0063_polyarith/test.saw
Original file line number Diff line number Diff line change
@@ -0,0 +1,13 @@
let {{

thm : {n,m} (fin n, fin m, n > m, m >= 1) => [n] -> [m] -> Bit
thm x y = y != 0 ==>
pmult y (pdiv x y) ^ (zero # pmod x y) == zero`{[m-1]}#x

}};

print_term (rewrite (cryptol_ss ())
(unfold_term ["thm"] {{ thm`{16,4} }}));

prove_print rme {{ thm`{16,8} }};
prove_print rme {{ thm`{20,10} }};
1 change: 1 addition & 0 deletions intTests/test0063_polyarith/test.sh
Original file line number Diff line number Diff line change
@@ -0,0 +1 @@
$SAW test.saw

0 comments on commit 9d85f06

Please sign in to comment.